Desktop: Iconansicht -> Listenansicht ?

[gmarts]

Hallo,
kennt jemand von euch eine Möglichkeit oder ein Tool, welches die Iconansicht des Desktops in eine Listenansicht umwandelt?

Grüße GM

[Rastaman]

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ComCtrls, CommCtrl;

type
  TForm1 = class(TForm)
    ListView1: TListView;
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure SetView(hWndListView: HWND; dwView: dword);
var
  dwStyle : dword;
begin
  dwStyle := GetWindowLong(hWndListView,GWL_STYLE);
  if(dwStyle and LVS_TYPEMASK <> dwView) then
    SetWindowLong(hWndListView,GWL_STYLE,
      dwStyle and not LVS_TYPEMASK or dwView);
end;

procedure TForm1.FormCreate(Sender: TObject);
var
  wnd: HWND;
begin
  wnd := FindWindow('Progman','Program Manager');
  wnd := FindWindowEx(wnd, 0, 'SHELLDLL_DefView', nil);
  wnd := FindWindowEx(wnd, 0, 'SysListView32', nil);
  SetView(wnd, LVS_SMALLICON);
end;

end.

Funzt! Grad ausprobiert, finds ne coole Idee
SetView is von Luckies nonVCL Tutorials.
Wichtig: CommCtrl einbinden.

[gmarts]

Zitat von Rastaman:

Funzt! Grad ausprobiert, finds ne coole Idee

Ich weiß!


Vielen vielen Dank...auch noch in Delphi...bin begeistert!

So gerade noch weitergesucht: Window Styles

Gruß Gunar

[Luckie]

Gib mal einer eine Screenshot davon.

[Rastaman]

Da issa

[Palando]

... kranke Idee

[hanselmansel]

Wenn die Frage erlaubt ist: Was versprichst du dir davon Ich dachte immer, die Desktop-Icons seien so schön groß und bunt, damit man sie direkt sieht und klicken kann. Das ist bei einer Liste doch nicht gegeben. (Zumal du erschreckend wenige Objekte auf dem Desktop hast)

MfG,

hanselmansel *lovinghisdesktop*

[Rastaman]

Für mich isses auch nix, aber für Leute die die jede .pas und .mp3 Datei aufm Desktop haben (solls geben ) ist das genau das Richtige

[toms]

Und dann druekt man F5 und alle Icons sind weg...

[hanselmansel]

Stimmt, ich kenn' da so einige, die den Desktop als globales Ablagefach benutzen...
Wenn du zu viel Freizeit haben solltest, kannst du das Programm ja so umschreiben, dass es den desktop in verschiedene Felder unterteilt, sodass man trotz Listview die thematisch zusammenhängenden Sachen gruppieren kann!