Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
Delphi 12 Athens
|
AW: Übergabe von Parameters "funktioniert nicht"
12. Aug 2010, 12:09
Mal was anderes: wieso dieses Konstrukt?
Zitat:
Delphi-Quellcode:
if not ADOQuery1.eof then begin
inc(cnt1);
repeat
liste2.add(ADOQuery1.fieldbyname('idebre').asstring);
ADOQuery1.next;
until ADOQuery1.eof;
end
Und nicht so?
Delphi-Quellcode:
while not ADOQuery1.eof do
begin
inc(cnt1);
liste2.add(ADOQuery1.fieldbyname('idebre').asstring);
ADOQuery1.next;
end;
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|