Memtable übernimmt werte nicht?

[Nine9]

Guten Tag Community ich bekomme leider die Daten die ich abspeichern möchte nicht in die Memtable festgeschrieben.

zuerst möchte ich von der DB Tabelle in die Erste Zeile und dann das erste feld auswählen, danach die der memtable.
Ich vergleiche dann den namen der beiden und wenn diese stimmen sollen die daten gespeichert werden.
mit Showmessage habe ich es getestet und es Funktioniert soweit, Eigentlich.

Sobald ich aber nach den Schleifen mir ein feld ausgeben lassen möchte wird mir ein leerer String zurückgegeben was für mich soviel bedeutet das er doch
nichts festgeschrieben hat.
hat jemand eine idee was ich falsch mache ?

Delphi-Quellcode:

  TBLQuery.Open();

  FDMemTable1.Open();

  FDMemTable1.edit;


  while not TBLQuery.Eof do
  begin

    for i2 := 0 to TBLQuery.fields.count - 1 do
    begin

      for i := 0 to FDMemTable1.fields.count - 1 do
      begin

        if TBLQuery.fields[i2].FieldName = FDMemTable1.fields[i].Name then
        begin

          FDMemTable1.fields[i].value := TBLQuery.fields[i2].value;

        end;

      end;


    end;
    FDMemTable1.Append;

    TBLQuery.Next;

  end;

       FDMemTable1.Post;
       FDMemTable1.CheckBrowseMode;

       ShowMessage(FDMemTable1.fields[1].asstring  );