![]() |
Ereignisbehandlungsroutine auslesen, speichern, zuweisen
Hallo,
ich habe mal eine ganz grundsätzliche Frage: Kann man den Methodenzeiger, den man einem Ereignis (z.B. OnClick) zugewiesen hat, auslesen und speichern, bis man ihn später, unter Umständen auch nach Programmneustart, wieder zuweisen kann? Zum Hintergrund: ich möchte eine vollständige Kopie eines Objekts erstellen. Da sollen auch die Ereignisbehandlungsroutinen mit eingebunden werden. Dieses Kopieren erreiche ich, indem ich jedes einzele Feld des Objekts in einem Stream speichere. Anschließend lade ich jeden einzelnen Wert aus dem Stream und weise ihn der Objektkopie zu. Das hat eigentlich den Vorteil, dass ich so auch ganz einfach das Objekt auf der Fesplatte speichern kann, wenn ich statt MemoryStream einen FileStream übergebe. Nach einem Neustart kann ich dann - erneut über einen FileStream - alles wieder laden. Bei den Methodenzeigern funktioniert das allerdings nicht. Im Folgenden ein kleines Beispiel mit einem integer Wert (hier weiß ich wie es geht) und einem Methodenzeiger (hierbei weiß ich es nicht):
Delphi-Quellcode:
Kann mir jemand weiterhelfen?type TMyClass = class; TMyClassEvent = procedure(Sender: TMyClass) of Object; TMyClass = class(TObject) private fEnabled: boolean; fOnClick: TMyClassEvent; public end; procedure TMyClass.SaveToStream(var stream: TStream); begin Stream.Write(MyClass.fEnabled, sizeOf(MyClass.fEnabled)); Stream.Write(MyClass.fOnClick, sizeOf(MyClass.fOnClick)); // das geht so nichtmal durch den Compiler end; procedure TMyClass.LoadFromStream(Stream:TStream); begin Stream.Read(MyClass.fEnabled, sizeOf(MyClass.fEnabled)); Stream.Read(MyClass.fOnClick, sizeOf(MyClass.fOnClick)); // das geht so nichtmal durch den Compiler end; procedure TMyClass.CopyFrom(MyClassSrc: TMyClass); var stream : TStream; begin stream := TMemoryStream.Create; try MyClassSrc.SaveToStream(stream); stream.Position:=0; self.LoadFromStream(stream); finally stream.Free; end; end; Viele Grüße, Stefan. |
Re: Ereignisbehandlungsroutine auslesen, speichern, zuweisen
Also ich weiß ja nicht, was die echten Experten hier im Forum dazu meinen... Aber imho geht so etwas nicht...
Du willst ja quasi speichern, auf welche Methode (einer anderen Klasse) der Methodenzeiger verweist... :gruebel: Mal angenommen der Methodenzeiger ist tatsächlich nur eine Speicheradresse (ka, obs stimmt :?: ), dann müsste diese Adresse ja nach einem Programmneustart wieder die gleiche sein, damit der Methodenzeiger noch richtig steht... Aber mir erschließt sich auch nicht so wirklich, wofür man so etwas brauchen könnte. |
Re: Ereignisbehandlungsroutine auslesen, speichern, zuweisen
Na gut. Es scheint wohl wirklich nicht möglich zu sein.
Ich werde es jetzt bei meiner manuellen Zuweisung belassen müssen. Viele Grüße, Stefan. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:56 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz