Hallo,
möchte die gespeicherten Artikeldaten in der Detailübersicht editieren.
Mit den (n)umerischen Feldern habe ich da noch meine Probleme:
Delphi-Quellcode:
procedure TDemoForm.BtnEditClick(Sender: TObject);
begin
FArtikel.Show;
with FArtikel do
begin
QArtikel.Edit //Änderungsmodus
EditBez1.Text := QArtikel.FieldByName('ArtBez1').AsString;
...
EditEKpreis.Text :=
FloatToStr(QArtikel.FieldByName('EKpreis').AsFloat);
EditVKbrutto.Text :=
FloatToStr(QArtikel.FieldByName('VKbrutto').AsFloat);
EditAbest.Text :=
FloatToStr(QArtikel.FieldByName('Anfangsbestand').AsFloat);
...
end;
Würdet Ihr bitte mal sehen, ob die Zuweisungen i.O. sind? Was müßte ich
ändern?
Vielen Dank!
Gruß
Lombi