|
Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
Delphi 7 Enterprise
|
AW: In Datenbank suchen
3. Apr 2011, 22:30
Delphi-Quellcode:
procedure TForm.ButtonClick(Sender: TObject);
begin
Query.Close;
Query.SQL.Text:=Format(
' SELECT *'#13 +
' FROM Mitglieder_SSD'#13 +
' WHERE Name LIKE %0:s'#13 +
' OR Vorname LIKE %0:s',
[QuotedStr(' %' + Edit.Text + ' %')]
);
Query.Open;
end;
Geändert von omata ( 3. Apr 2011 um 22:34 Uhr)
|