Thema: Delphi Fehler bei ADOTable.Post

Einzelnen Beitrag anzeigen

Benutzerbild von Gollum
Gollum

Registriert seit: 14. Jan 2003
Ort: Boxberg
456 Beiträge
 
Delphi 10.1 Berlin Professional
 
#9

Re: Fehler bei ADOTable.Post

  Alt 17. Jan 2005, 10:07
Hallo,

ich habe mir Deinen Code noch einmal angeschaut und dabei ist mir aufgefallen, dass Du in Deinem Beispiel die Felder und nicht die Feldinhalte zuweist. Vielleicht hilft es, wenn Du Deinen Code folgendermassen umänderst:
Delphi-Quellcode:
while not adodataset1.Eof do
begin
  buchform.adotable1.append;
  buchform.ADOTable1['KNR'].AsString:=adodataset1['KNR'].AsString;
  tempbetrag:=adodataset1['Betrag'].AsFloat*100;
  strintdm(tempbetrag,stempbetrag,0);
  buchform.ADOTable1['Betrag'].AsFloat:=stempbetrag;
  buchform.ADOTable1['Empf'].AsString:=adodataset1['Empf'].AsString;
  buchform.ADOTable1['Text'].AsString:=adodataset1['Text'].AsString;
  buchform.ADOTable1.Post;
  adodataset1.next;
end;
[edit]
Da ich nicht sicher weiss, ob obiges Beispiel funktioniert, könntest Du noch evtl. folgendes probieren:
Delphi-Quellcode:
  ...
  buchform.ADOTable1.FieldByName('KNR').AsString:=adodataset1.FieldByName('KNR').AsString;
  ....
[/edit]
  Mit Zitat antworten Zitat