Einzelnen Beitrag anzeigen

Benutzerbild von NoGAD
NoGAD

Registriert seit: 31. Jan 2006
Ort: Weimar
345 Beiträge
 
Delphi 10.4 Sydney
 
#15

AW: TDBGrid mit Master/Detail?

  Alt 22. Apr 2021, 18:53
Danke für die Erklärung.

Ich habe versucht es zur Laufzeit einzubauen, es kommt immer die Fehlermeldung, dass das Feld 'book_author' nicht existiert.

Die Tabelle wurde erstellt, im Anschluss wird das Lookup-Feld angelegt. Mein Code für das Lookup-Feld sieht jetzt so aus:

Delphi-Quellcode:
var
  NewField: TField;
begin
    if Table2.FieldDefs.Updated = False then
      Table2.FieldDefs.Update;
    if Table12FindField('lfAuthor') = nil then
    begin
      NewField := TStringField.Create(Table2);
      NewField.FieldName := 'lfAuthor'; // Lookup Field Author
      NewField.SetFieldType(ftString); // String
      NewField.Size:=255;
      NewField.KeyFields := 'book_author'; // Field aus Table1
      NewField.LookUpDataset := Table1;
      NewField.LookUpKeyFields := 'id'; // Field aus Table2
      NewField.LookUpResultField := 'autor_nachname'; // Field aus Table2, welches über die id, die in 'book_author' steht, angezeigt werden soll
      NewField.FieldKind := fkLookup;
      NewField.DataSet := Table2;
    end;
Mathias
Ich vergesse einfach zu viel.
  Mit Zitat antworten Zitat