Problem mit Verfügbarkeit der Funktion

[Hawkeye219]

Wenn du die Funktion - wie bereits vorgeschlagen - als einfache Routine vereinbarst, kannst du sie nach der Vereinbarung nutzen:

Delphi-Quellcode:

// Vereinbarung als *einfache* Routine, nicht als Methode
function MyEnumProc (aHandle: HWND;  aData: LPARAM): BOOL;  stdcall; 
begin
  TStrings(aData).Add(IntToStr(aHandle));
end;

// Verwendung *nach* der Vereinbarung
procedure TForm1.Button1Click(Sender: TObject);
begin
  ListBox1.Clear;
  EnumWindows(@MyEnumProc, Integer(ListBox1.Items));
end;

Gruß Hawkeye