Forum: Win32/Win64 API (native code)
Delphi
by Phoenix,
24. Sep 2003
Hier die Lösung:
(was lange währt wird endilch gut heisst es doch? ;-) )
// constructor
//
constructor PhService.Create;
var
t: TMethod;
begin
t.Code := @PhService.serviceproc;
Forum: Win32/Win64 API (native code)
Delphi
by Phoenix,
24. Sep 2003
Äh, nicht ganz. Ist aber so wie es aussieht genau das, was ich brauche.
Ich verstehe nur den Code nicht, der da unten steht. Zuerst wird ein TMyMethod als procedure of object deklariert, später aber nie wieder verwendet.
Dann muss man der MakeProcInstance ein TMethod übergeben. Wie bekomme ich aus der serviceproc - Methode denn nun ein TMethod, um mir den Pointer erstellen zu lassen?
Forum: Win32/Win64 API (native code)
Delphi
by Phoenix,
24. Sep 2003
Ich hab grad ein wenig probiert: MakeObjectInstance kann nur mit eienr TWndMethod als Paramater etwas anfangen.
Die Service - Methode braucht jedoch andere Parameter als eine TWndMethod. Der Aufruf ist so also gar nicht kompatibel.
Ich brauche also definitiv eine andere Lösung.
Forum: Win32/Win64 API (native code)
Delphi
by Phoenix,
24. Sep 2003
*nochmalnachobenzupf* :wink:
Forum: Win32/Win64 API (native code)
Delphi
by Phoenix,
23. Sep 2003
Hallo,
folgendes Problem:
Ich habe ein Klasse und einige Methoden darauf. Eine dieser Methoden übergebe ich nun an den ServiceControlDispatcher um den Dienst zu starten. In dieser übergebenen Methode will bzw. muss ich aber weiterhin auf member-Variablen meines Objektes zugreifen können. In dem Augenblick in dem ich aber auf ein Element der Klasse zugreifen will (ausser einem anderen...