[Fehler]arithmetic exception, numeric overflow, ...

[MrSpock]

Hallo Changer,

könnte es an dem Next Statement liegen? Das muss nämlich ohne Klammern aufgerufen werden:

Delphi-Quellcode:

while not IBQuery1.Eof do
begin
   lbInstProg.Items.Add(IBQuery1.FieldByName('PROGR_STR').AsString);
   IBQuery1.Next;
end;