FORALL in Delphi

I guess you would like to do something like this:

if OracleSession1.Connected then begin
with OracleDataSet1 do begin
Session := OracleSession1;
Open;
First;
while not Eof do begin
ShowMessage(FieldByName('FIELD').AsString);
Next;
end;
end;
end;
 
Back
Top