Registriert seit: 14. Jan 2003
Ort: Boxberg
456 Beiträge
Delphi 10.1 Berlin Professional
|
Re: Adodataset1 auslesen
12. Okt 2006, 14:23
Hallo,
folgendermaßen sollte es funktionieren:
Delphi-Quellcode:
with AdoDataset do
begin
Close();
CommandText:='SELECT id FROM test';
Open();
if (RecordCount>1) then
begin
while not Eof do
begin
ShowMessage(FieldByName('ID').AsString);
Next;
end; // while
end else ShowMessage('Nur ein Datensatz');
end; // with AdoDataset
|