LookUp feld zur laufzeit erstellen

[Hausmarke]

Hallo Leute,

ich habe ein objekt in welchem ich dynamisch alle komponenten erzeuge die man für den zugriff auf eine Datenbank benötigt.
Soweit funktioniert das auch ganz gut, und ich kann die Daten in einem Grid ausgeben.
Nun möchte ich in dem DataSet, welches im grid abgebildet wird, mehrere LookUp felder einfügen, so wie man das äußerst easy zur Entwurfszeit machen kann.

Aktuell bin ich soweit:

Delphi-Quellcode:

  f := TStringField.Create(DSetDaten);
  with f do
  begin
    Name := DSetDaten.Name + FieldName;
    Size := 50;
    DisplayLabel := 'FieldNachschlagen';
    DisplayWidth := 21;
    FieldName := 'FieldNachschlagen';
    FieldKind := fkLookup;
    Lookup:=True;
    LookupDataSet := DSetInfos;
    KeyFields := 'INFOID';
    LookupKeyFields := 'ID';
    LookupResultField := 'Info';
    DataSet := DSetDaten; 
    Index := 2;
  end;

nur leider bringt er mir den fehler das er "INFOID" nicht finden kann.

Woran könnte das liegen, denn dieses Feld existiert, und zur Entwurfszeit in der komponente konfiguriert funktioniert es auch.

gibt es evtl. einen einfacheren weg ein lookup feld in ein dataset zu bekommen?