Registriert seit: 31. Mär 2004
Ort: Frankfurt am Main
1.511 Beiträge
Delphi 7 Architect
|
Re: simple query
17. Jun 2004, 17:42
willkommen bei dp
wenn es nur um eine abfrage geht dann...
Delphi-Quellcode:
quWork:=TQuery.create(nil);
quWork.databaseName:='dbname';
quWork.sql.Text:='select * from tablename where id=:idkey';
quWork.ParamByName('idkey').AsInteger:=id;
try
quWork.open;
except
// hier fehlerbehandlung
end;
if quWork.isempty then showmessage('keine daten vorhanden')
else showmessage('id:'+id+'user:'+quWork.FieldByName('user').asString);
quWork.free;
|