Hallo Delphianer,
wenn ich in einem Zyklus mehrere Sätze in eine MDB-Tabelle schreibe
bekomme ich beim Post des 2. Satzes die Fehlermeldung:
'Fehler bei einem aus mehreren Schritten bestehenden Vorgang. Prüfen
Sie die einzelnen Statuswerte.'
Der Code sieht etwa so aus:
Delphi-Quellcode:
while not adodataset1.Eof do begin
buchform.adotable1.append;
buchform.ADOTable1['KNR']:=adodataset1['KNR'];
tempbetrag:=adodataset1['Betrag']*100;
strintdm(tempbetrag,stempbetrag,0);
buchform.ADOTable1['Betrag']:=stempbetrag;
buchform.ADOTable1['Empf']:=adodataset1['Empf'];
buchform.ADOTable1['Text']:=adodataset1['Text'];
buchform.ADOTable1.Post;
adodataset1.next;
end;
Die Tabellendefinition:
Delphi-Quellcode:
object ADODataSet1KNR: TStringField
DisplayWidth = 40
FieldName = 'KNR'
Size = 40
end
object ADODataSet1Betrag: TCurrencyField
FieldName = 'Betrag'
end
object ADODataSet1Empf: TWideStringField
FieldName = 'Empf'
Size = 50
end
object ADODataSet1Text: TWideStringField
FieldName = 'Text'
Size = 50
end
Der erste Satz wird ordnungsgemäß gespeichert. Erst ab dem 2.
passierts dann.
Wer hat einen Tip ?
Gruß Detlef
[edit=MrSpock]Code Tags eingefügt. Mfg, MrSpock[/edit]