shelllistview nur icons?

[Jonas]

HI! Ich liste in einer shelllistview die dateien von der Quick Launch auf. Das Problem ist jedoch das es mit dem 'ViewStyle: vsSmallIcon' nicht wirklich toll aussieht. Darum wollte ich fragen wie ich es hinbekomme, dass nur die Icons wie in der Quick Launch des Startmenüs, zu sehen sind...also das die icons sich sofort auf meinem Hintergrund des Programm's darstellen...ohne namen...?!

[jim_raynor]

Mal überlegt, ob nicht eine Toolbar dafür besser geeignet ist? Auch dort kannst du dynamisch neue Buttons erzeugen, wenn es dir darum geht ;)

[ichbins]

Du kannst die Icons ja selber ermitteln und auf dynamisch erzeugten speedbuttons platzieren.

Icons ermitteln:

Delphi-Quellcode:

var
  i:ticon;
  fileinfo:tshfileinfo;
begin
  i:=ticon.create;
  FillChar(FileInfo,SizeOf(FileInfo),#0);
  SHGetFileInfo(PChar(FileName),0,FileInfo,SizeOf(FileInfo),SHGFI_ICON or SHGFI_LARGEICON); //auch shgfi_smallicon
  i.Handle:=fileinfo.hicon;
  i.transparent:=true;
  //in I ist jetzt das Icon der Verknüpfung gespeichert
end;

[Jonas]

Also das mit der Toolbar, check ich mal überhaupt nicht.

Und das mit den Speedbuttons ist mir schon irgendwo klar.

Nur wie soll stell ich es dann an, das immer die Buttons aus der Quick Launch dort dargestellt werden? Ich mein im Prinzip funktioniert das mit der Shelllistview ja schon perfekt....die Icons werden dort dargestellt nur es sieht nicht sonderlich gut aus.

Oder vielleicht einfach erstmal den hintergrund meiner Shelllistview wegmachen...also das der hintergrund meines Programmes zu sehen ist?!

[ichbins]

du machst einfach ein paar speedbuttons, tust die nebeneinander, dann gibst du ihnen die kleinen Bildchen.

Die shelllistview brauchst du da nicht.

eine Toolbar ist eine Komponente (win32). Die ist vielleicht noch besser geeignet als speedbuttons.

[Jonas]

Zitat:

Zitat von ichbins

du machst einfach ein paar speedbuttons, tust die nebeneinander, dann gibst du ihnen die kleinen Bildchen.

Die shelllistview brauchst du da nicht.

eine Toolbar ist eine Komponente (win32). Die ist vielleicht noch besser geeignet als speedbuttons.

Joa...nur wie mach ich das mit den Bildchen?.....Zumal es sind ja immer andere? Das kann ich ja nicht beeinflussen?!

[ichbins]

Ich hab dir oben eine Funktion gegeben, wie du die Icons kriegst:

Delphi-Quellcode:

var
  i:ticon;
  fileinfo:tshfileinfo;
begin
  i:=ticon.create;
  FillChar(FileInfo,SizeOf(FileInfo),#0);
  SHGetFileInfo(PChar(FileName),0,FileInfo,SizeOf(FileInfo),SHGFI_ICON or SHGFI_SMALLICON); //auch shgfi_largeicon
  i.Handle:=fileinfo.hicon;
  i.transparent:=true;
  //in I ist jetzt das Icon der Verknüpfung gespeichert#
  form1.canvas.draw(0,0,i);
end;