Bin nicht ganz sicher, wie die Felder arbeiten, aber du gibts den Stream vor dem POST frei, das könnte zu komischen Effekten führen.
Was sind denn "komische Effekte"? Davon hab ich noch nie was bemerkt! Wieso sollte es den Eintrag in der Datenbank jucken, wenn der Stream, der ihn geliefert hatte, abkratzt? Genau so gut könntest du in einer lokalen Procedure Zuweisungen an
DB-Felder machen und in einer anderen Procedure dann erst mit Post abschließen:
Delphi-Quellcode:
Procedure Zuweisen;
Var
Feld1 : Integer;
Feld2 : String;
Feld3 : Boolean;
Begin
Feld1 := Self.Tag;
Feld2 := Application.ExeName;
Feld3 := Self.WindowState = wsMaximized;
MyDataSet.FieldByName('Field1').AsInteger := Feld1;
MyDataSet.FieldByName('Field2').AsString := Feld2;
MyDataSet.FieldByName('Field3').AsBoolean := Feld3;
End;
Procedure NeuerEintrag;
Begin
MyDataSet.Append;
Zuweisen;
MyDataSet.Post;
End;
Was meinst du: würde das funktionieren oder ergäbe das eine Fehlermeldung?