Mega Code Archive

 

Categories / Delphi / ADO Database

 

Bilinmeyen bir sql ile ne zaman query1 open, ne zaman query1 execsql

{ Kullanicinin Gerek select, gerekse Update, Insert vb komutlarini hatasiz calistirmak icin kullaniniz. } procedure TForm1.Button1Click(Sender: TObject); begin Query1.Close; Query1.Sql.Text :=Memo1.Lines.Text; try Query1.Open; except on E: Exception do if not (E is ENoResultSet) then // eger bunun disinda hata varsa raise; end; end;