ok, ich habe bisher folgenden code:
Delphi-Quellcode:
procedure Tfrm_main.BitBtn1Click(Sender: TObject);
var db :
string;
begin
db := ExtractFilePath(ParamStr(0))+'
db\db.tdbd';
liste.TdbQuery1.Close;
liste.TdbQuery1.DatabaseName :=
db;
liste.TdbQuery1.SQL.Clear;
liste.TdbQuery1.SQL.Add('
SELECT * FROM antragsgegner WHERE ID =' + DBEdit1.Text);
showmessage(liste.TdbQuery1.SQL.text);
liste.TdbQuery1.Open;
liste.preview;
end;
wie muss ich dann so vorgehen?