ich habe ein
MDI-Programm mit den ich eine Dat-Datei abspeicher. Die Daten gebe ich über Editfelder ein.
in einen weiteren Fenster habe ich eine Artikelverwaltung mit einem StringGrid. Die Artikel und Daten aus diesem Fenster werden in das StringGrid übertragen.
Jetzt möchte ich diese Dateu aus dem StringGrid in meine Dat-Datei speichern.
bekomme das aber nicht hin
Delphi-Quellcode:
// Datenstruktur für die Speicherung auf Festplatte
// deshalb SHORTSTRING
type TTaeterRec = packed record
Datensatz:ShortString;
TDatum:ShortString;
TZeit:ShortString;
TObjekt:ShortString;
TName:ShortString;
TVorname:ShortString;
VNummer:ShortString;
GZeichen:ShortString;
Ausgang:ShortString;
GBegruendung:ShortString;
end;
...
...
...
// Sichert die Datensätz ein der angegeben Datei
// Keine Sicherheitsabfrage, ob Überschrieben J/N
procedure CTaeter.Save(szDatei:string);
var kanal:file of TTaeterRec;
var pRec:PTaeterRec;
i:integer;
begin
assign(kanal,szDatei);
rewrite(kanal);
for i:=0 to Liste.Count-1 do
begin
pRec := Liste.Items[i];
write(kanal,pRec^);
end;
closefile(kanal);
end;
die Schwierigkeit ist, dass ich aus dem einem Kindfenster wo die Editfelder (Bestellung, vom, an)
und Artikelverwaltung (Artikel,Preis, Anzahl) zum einen nicht zusammen in die Dat-Datei bekomme
und zum anderen es nicht schaffe zu einer bestellung mehrere Artikel zu erfassen in der Dat-Datei.
ich schaffe es immer nur für einen Artikel. (was ja keinen sinn macht).
habt ihr einen Lösungsvorschlag für mich
Gruß Ingo
PS ich hoffe der Auszug aus meinem Quellcode ist hilfreich