fluent livebindings , bind edit @ run time

[bernhard_LA]

ich bin gerade am testen von FMX , Datenbank Zugriff & Live Bindings ,

ich habe hier ein Test Projekt erstellt um mit Fluent Livebindings zu arbeiten :

https://github.com/ImageProcessingFM...t_LiveBindings

Mein Problem : Ich kann den Field Count , als auch die Feldnamen in meiner Query nicht zur Laufzeit ermitteln, warum ?
Das Binding eines Edits würde funktionenieren wenn ich den Feldnamen als String "fest" eintrage

Delphi-Quellcode:

procedure TForm_dbtest.btn_BindEditClick(Sender: TObject);
var  QueryfieldName : String ;
     FieldCount : Integer ;
begin

  FieldCount := FDQuery1.DataSource.DataSet.FieldCount;  //  Run time error ... 

  QueryfieldName := FDQuery1.DataSource.DataSet.FieldList.Fields[1]
    .FieldName ;

  BindingsList1.BindComponent(edt_field)
    .ToField(BindSourceDB1, QueryfieldName );
end;

[himitsu]

Gibt es bei dir überhaupt eine DataSource?

Und ist das FDQuery1 nicht bereits ein das DataSet?

Delphi-Quellcode:

FieldCount := FDQuery1.FieldCount;
QueryfieldName := FDQuery1.FieldList.Fields[1].FieldName;  
QueryfieldName := FDQuery1.FieldList[1].FieldName;  // denn Fields müsste das Default-ArrayProperty sein
QueryfieldName := FDQuery1.Fields[1].FieldName;  // bzw. muß man überhaupt über FieldList gehen und kann das andere Fields nicht direkt nutzen?
BindingsList1.BindComponent(edt_field).ToField(BindSourceDB1, QueryfieldName);



BindingsList1.BindComponent(edt_field).ToField(BindSourceDB1, FDQuery1.Fields[1].FieldName);

[bernhard_LA]

Danke , 1 Schritt weiter