Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Cind12,
30. Mai 2012
Hi,
@shmia
Ja, das ist natürlich eine Lösung. So ähnlich sähe es aus, wenn ich jede Komponente und jede ihrer Eigenschaften (natürlich in Schleifen zusammengefasst) speichern würde.
Es sind trotzdem noch eine Menge unterschiedlicher Komponenten von denen ich unterschiedliche Eigenschaften speichern muss, allein jede Komponente durchzugehen und zu entscheiden, welche Eigenschaften...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Cind12,
30. Mai 2012
@Popov
Ja, ich habe versucht sie freizugeben, zu zerstören zu schließen... danach habe ich versucht sie aus dem Stream zu erschaffen:
Form1 := TForm1.Create(Stream.ReadComponent(Form1) as TForm1);
Oder sie aus sich neu zu erschaffen und dann anzupassen:
Form1 := TForm1.Create(Form1);
Form1.Assign(Stream.ReadComponent(Form1) as TForm1);
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Cind12,
30. Mai 2012
Hi,
danke für die schnelle Antwort!
Ich habe mir etwas ähnliches bereits gedacht, komischerweise bekomme ich die Fehlermeldung auch dann, wenn ich lokal für die Ladeprozedur ein neues Formular deklariere und dieses direkt aus dem Stream erschaffe:
procedure TForm1.Laden1Click(Sender: TObject);
var Stream : TFileStream; Form_neu : TForm1;
begin
OpenDialog1 := TOpenDialog.Create(self);
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Cind12,
30. Mai 2012
Hi,
Ich habe ein Formular Form1, das in einem PageControl mit 11 Seiten über hundert Objekte besitzt.
Ich will von fast jedem dieser Objekte mehrere Eigenschaften in eine Datei speichern.
Deshalb habe ich mich dagegen entschieden jede wichtige Eigenschaft einzeln in einen Stream zu schicken. Stadtdessen will ich das gesamte Formular mit WriteComponent und ReadComponent über ein FileStream...