Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.157 Beiträge
 
Delphi 12 Athens
 
#12

Re: [DELPHI 2010] EnumWindows mit Handle

  Alt 4. Feb 2010, 15:33
Hast du den Code eigentlich verstanden?

Zitat:
function EnumWindowsProc(wHandle: HWND; lb: TListBox): Bool; stdcall;
heißt eigentlich

function EnumWindowsProc(wHandle: HWND; LParam: LongInt): Bool; stdcall; Wobei LParam das LParam aus dem Aufruf von EnumWindows enthält


Code:
EnumWindows(@EnumWindowsProc, [color=#ff0000]LongInt(ListBox1)[/color]);


function EnumWindowsProc(wHandle: HWND; [color=#ff0000]LParam: LongInt[/color]): LongBool; stdcall;
begin
  [color=#ff0000]TListView(LParam)[/color].Item.Add
Also, alles was du per LParam übergibst, hast du somit auch in der Prozedur
und mußt es einfach nur zurückcasten.
(Wobei man hierbei auch mal den Prozedurrumpf anpassen könnte, so wie es in der Demo gemacht wurde

Sowas wie Form1.ListView1 verursacht nur mehr Verwirrung und erzeugt fehleranfälligeren Code.



PS: Boolean (1 Byte) <> BOOL (4 Byte)
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat