Datenbank

[tomes-one]

firebird 1.5

Delphi-Quellcode:

ZQuery2.SQL.Clear;
ZQuery2.SQL.Text := ('SELECT * FROM DEPOT_C')
ZQuery2.Open;
while not 2Query2.Eof do
begin
  ZQuery1.Connection := ZConnection1;
  ZQuery1.Open;
  ZQuery1.Append;
  ZQuery1['BEDIENER']   := ZQuery2['BEDIENER'];
  ZQuery1.Post;
  ZQuery2.Next;
  ZQuery1.Close;
end;

[edit=mkinzler]Delphi-Tag eingefügt Mfg, mkinzler[/edit]