New Snippet New Snippet Recent Snippets Recent Snippets My Snippets My Snippets Web Code Search Snippets Search
Sign inor Register
Language: NoFormat

ADOQuery

48 Views
Copy Code Show/Hide Line Numbers
   1:   
   2:  procedure TForm1.SearchButtonClick(Sender: TObject);
   3:  var  HurricaneName: string;
   4:  begin
   5:  HurricaneName := HurricaneSearchBox.text;
   6:  with ADOQuery1 do begin
   7:    Close;
   8:    SQL.Text := 'SELECT * FROM Huracanes WHERE Huracanes.Nombre =' + tblname;
   9:    Open;
  10:  end;
  11:  end;
by Joel
  November 30, 2009 @ 5:53am
Tags:

Add a comment


Report Abuse
brought to you by:
West Wind Techologies


If you find this site useful and use it frequently please consider making a donation to support this free service.
Donate