Luiz Americo Pereira Camara escreveu: > User escreveu: > >> Hi again, my TSQLite3Dataset components: >> >> DatasetSales with the fields: Code, Item, Amount, Price, Vendor >> DatasetItems with the fields: Code, Description >> >> I do not want that the lookup field to be editable. >> >> My new code: >> >> procedure TForm1.FormCreate(Sender: TObject); >> var >> TempField: TStringField; >> begin >> DatasetSales.Active := true; >> TempField := TStringField.Create(DatasetSales); >> with TempField do >> begin >> FieldName := 'New field'; >> Lookup := True; >> FieldKind := fkLookup; >> KeyFields := 'Item'; >> LookupDataSet := DatasetItems; >> LookupKeyFields := 'Code'; >> LookupResultField := 'Description'; >> DatasetSales := Self.DatasetSales; >> end; >> end; >> >> but nothing happen. Why? >> >> [..] > 2) It's not implemented in TSqlite3Dataset > I looked at the implementation and got how it works, so i can implement > in Sqlite3Dataset soon. >
I implemented support to Calc/Lookup fields in fpc trunk. It would be good if someone could test because i don't use this feature much. Luiz _______________________________________________ Lazarus mailing list [email protected] http://www.lazarus.freepascal.org/mailman/listinfo/lazarus
