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;