🚀 go-pugleaf

Witam
Buduję komponent bazodanowy gdzie będzie można podłączyć dowolną bazę za 
pomocą TDataSource

W komponencie będzie się podawać DataField tak jak w standardowej 
kontrolce DB

za pomocą tego komponentu będzie można dodać też dane do tabeli 
podłączonej za pomocą TDataSource

i robię zwyczajne operacje wyglądającą tak

DataSource.Dataset.Append
...
..
..
DataSource.Dataset.Post



Do TDatasource są podpięte Zeosy z AutoCommit
więc dane lądują w bazie odrazu

gdy wykonam:
Append
Post
(jednorazowo) dane są bez problemu dodawane do bazy

ale gdy klikne przycisk 2 krotnie dostaje: "0 record(s) updated. Only 
one record should have been update"

próbowałem po post dołożyć Refresh ale nic to nie zmienia

Próbowałem miabu tego co radziłeś tutaj
https://forum.lazarus.freepascal.org/index.php?topic=32170.0 ale bez efektu

Rano spróbuje podłączyć coś innego niż Zeos i zobaczyć jaki będzie efekt

Baza to Firebird ale zależy mi na 2 bazach na Firebird i MSSQL bo tam 
będzie to docelowo działać

Pozdrawiam
J-23