Einzelnen Beitrag anzeigen

Benutzerbild von motu
motu

Registriert seit: 20. Jul 2004
76 Beiträge
 
Delphi 6 Professional
 
#1

von ADOQuery zu ADODataset

  Alt 22. Jul 2004, 11:11
Wie muss der folgende Quelltext umgeschrieben werden, damit ich statt dem ADOQuery QDODataset nutzen kann?

Delphi-Quellcode:
  ADOQuery1.SQL.Text := 'SELECT blafoo';

  ADOQuery1.Open;
  if ADOQuery1.IsEmpty then
  begin
    with ADOQuery1 do begin
     Insert;
     FieldValues['SollRadius'] := DBSollRadius;
     FieldValues['IstRadius'] := DBIstRadius;
     FieldValues['Kennzeichnung'] := DBKennzeichnung;
     FieldValues['PGlasKonvex'] := DBPGlasKonvex;
     FieldValues['PGlasKonkav'] := DBPGlasKonkav;
     FieldValues['PruefdmKonvex'] := DBPruefdmKonvex;
     FieldValues['PruefdmKonkav'] := DBPruefdmKonkav;
     FieldValues['Messart'] := DBMessart;
     FieldValues['Pruefer'] := Pruefer.Text;
     FieldValues['Bemerkungen'] := Bemerkung.Text;
     FieldValues['Passe'] := Passe.Text;
     FieldValues['PHDifferenz'] := DBPHDifferenz;
     Post;
    end;
  Mit Zitat antworten Zitat