Bug oder Feature ? MySQL + Zeos + viele Datensätze

[Stevie]

Hi Ulf,

du machst das viel zu umständlich.
Wenn man schon diese schicken Variants hat,
dann sollte man sie auch benutzen

Delphi-Quellcode:

procedure TForm1.DataKopieren(Sender: TObject); 
var
  i: Integer; 
begin 
  Table1.First;
  while not Table1.Eof do
  begin
    ZQuery1.Append; // Append versetzt schon in den Edit-Mode!
    for i := 0 to Pred(Table1.FieldCount) do
      ZQuery1.FieldValues[i] := Table1.FieldValues[i];
    ZQuery1.Post; 
    Table1.Next;
  end;
end;