Zitat:
TCustomListView
Win32
Danke. Nein das
Handle kann man einfacher erfahren eine Zeile Code.
HeaderHandle := ListView_GetHeader(WinHandle);
btw. komplett.
Delphi-Quellcode:
procedure TSkinListView.SubClass(WinHandle: hWnd);
begin
FClientInstance := MakeObjectInstance(ClientWndProc);
FPrevClientProc := Pointer(GetWindowLong(WinHandle, GWL_WNDPROC));
SetWindowLong(WinHandle, GWL_WNDPROC, Integer(FClientInstance));
FHeaderInstance := MakeObjectInstance(HeaderClientWndProc);
HeaderHandle := ListView_GetHeader(WinHandle);
FPrevHeaderProc := Pointer(GetWindowLong(HeaderHandle , GWL_WNDPROC));
SetWindowLong(HeaderHandle , GWLP_WNDPROC, Integer(FHeaderInstance));
end;
Ich habe Columns auf der ListView ich benötige den Hintergrund von allen Columns. (Scheint irgendein Frame zu sein.
Der schwarze Bereich wie gezeigt.
Nebenbei:
Ein Qual ein ListView selbst zu zeichnen. (Na was soll's hab sonst nix zu tun).
Muss ich wohl irgendwie selbst lösen.
gruss