delphi快速判断sql