Thema: Delphi simple query

Einzelnen Beitrag anzeigen

Benutzerbild von ibp
ibp

Registriert seit: 31. Mär 2004
Ort: Frankfurt am Main
1.511 Beiträge
 
Delphi 7 Architect
 
#2

Re: simple query

  Alt 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;
  Mit Zitat antworten Zitat