Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
24. Feb 2008
Nachtrag:
LVS_LIST scheint nicht zu funktionieren.
Man kann auch eine Scrollbar anzeigen, wenn es viele Icons auf dem Desktop hat.
ShowScrollbar(GetDesktopWindow, SB_VERT, True)
Im Report Modus sieht es so aus (ohne Scrollbar):
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
24. Feb 2008
Hallo
Ich habe mal geschaut, wie es Wintidy macht und bin zu diesen Code gekommen.
Ein vollständiges Beispiel befindet sich im Anhang.
procedure SetDesktopStyle(AViewMode: TViewStyle);
const
STYLES: array of DWORD = (LVS_ICON, LVS_SMALLICON, LVS_LIST, LVS_REPORT);
var
S: StyleStruct;