Forum: Win32/Win64 API (native code)
Delphi
by ustra,
6. Feb 2004
Hi,
@stoxx: ich habe es nicht mehr ausprobiert, aber ich denke, dass würde laufen. Luckies variante ist auch gut. Wenn ich das nächste Mal vor dem Problem stehe, werde ich noch mal Deine Lösung ausprobieren. Vielleicht mache ich das noch. Trotzdem danke für Deine Bemühungen.
Beste Grüße
Ulrich
Forum: Win32/Win64 API (native code)
Delphi
by ustra,
5. Feb 2004
Hi alle miteinander,
erstmal Danke für Eure Bemühungen. Ich habe dank Eurer Hilfe das Problem gelöst. Nun noch mal im Detail:
@Neolithos: Ich habe es so gemacht, wie angegeben. Allerdings stürzt das Programm dann komplett ab. Irgendeine Zugriffsverletzung. Wo genau der Fehler ist, kann ich Dir nicht sagen.
@Luckie: Ich habe jetzt Deine Methode ausprobiert und tatsächlich, das...
Forum: Win32/Win64 API (native code)
Delphi
by ustra,
5. Feb 2004
Hi,
ich habe es mir angesehen. Ich sage nur: Wer lesen kann, ist klar im Vorteil. Sorry, da war ich zu schnell. Ich habe es übersehen, dass Du die Definition der Methode geändert hast. Dann kann es theoretisch laufen. Kompiliere ich nun das, meldet mir der Compiler:
Variable erforderlich in der Zeile:EnumWindows(@EnumWindowsProc, Integer(Self));
Beste Grüße
Ulrich
Forum: Win32/Win64 API (native code)
Delphi
by ustra,
5. Feb 2004
Hi,
@Neolithos: Deine Lösungsvorschlag funktioniert nicht. Dein Nachtrag ändert an der Situation auch nichts, denn der Aufruf fwaechter.kontrolle macht keinen sinn, weil es fWaechter gar nicht gibt. Du bist wohl von einem Formular ausgegangen. Zu Test und ausprobierzwecken hatte ich da such und da geht es auch. Jetzt ist es bei mir halt so, dass ich erst ein Objekt erzeugen muss, damit das...
Forum: Win32/Win64 API (native code)
Delphi
by ustra,
5. Feb 2004
Hi,
ich habe eben noch mal gesucht, weil Delphi mir static nicht als fett markiert hat, kam mir das etwas komisch vor und bin fündig geworden. Ich habe es jetzt mal als:
class function EnumWindowsProc(const hWindow : DWORD;const AdwDummy : DWORD) : Longbool; stdcall;
deklariert und nun kommt der Fehler nicht mehr. Dafür sagt mir der Compiler in der Zeile:
if (pcaption^ <> '')
then...
Forum: Win32/Win64 API (native code)
Delphi
by ustra,
5. Feb 2004
Hi,
wenn ich die Funktion aus der Klasse entferne, dann habe ich Probleme, die Funktion Kontrolle auszurufen, die wiederum in der Klasse definiert ist. Hast du da eine Lösung?
ich habe es noch probiert und hinter die Funktion static geschrieben (stdcall natürlich entfernt, macht er aber auch nicht.
Beste Grüße
Ulrich
Forum: Win32/Win64 API (native code)
Delphi
by ustra,
5. Feb 2004
Hi,
ich habe folgenden Code:
type
TWaechter = class(TObject)
private
{ Private-Deklarationen }
TZeitgeber : TTimer;