如何在Delphi中將縮略圖視圖添加到TShellList？

TShellList組件基於TListView（不幸的是）在其ViewStyle屬性中沒有'vsThumbnail'（或類似的）。如何在Delphi中將縮略圖視圖添加到TShellList？

如何以類似的方式在Windows資源管理器中顯示TShellList中的縮略圖？

一個簡單的德爾福片段將不勝感激。

TIA

2009-12-10 John Thomas

如果你只是想更大的圖標比默認你可以調整的TImageList使用。下面的例子是TListView的，但你會得到的想法

const 
    PreviewSize = 128; 
type 
    TForm1 = class 
    PreviewList: TImageList; 
    List: TListView; 
... 

    PreviewList.Width = PreviewSize; 
    PreviewList.Height = PreviewSize; 
    PreviewList.Add(MyBitmap, Nil); 
    List.Add.ImageIndex:=0;

來源

2009-12-10 12:18:40 Maksee

也許我不明白你的答案，但不是關於任何TImageList。或者，您是否建議使用內部ImageList來繪製圖標？ – 2009-12-10 16:26:38

如果您使用圖標設計TListView，一般方法是將TImageList放置在窗體上，並將鏈接ListView與相應的屬性進行對照。但是，如果不更改ImageList的大小，您將獲得標準的32x32圖標。讓它更大更改大小。我成功使用它來生成圖像預覽 – Maksee 2009-12-10 20:15:06

我沒有用過TShellList組件。但是，如果您願意看一個不同的組件，請嘗試VirtualShellTools from Mustang Peak。組件可以有一點點的學習曲線，但是我發現它可以很好地滿足我的需求。我使用TVirtualExplorerEasyListview並將其指向一個目錄，並完成了爲該目錄中的圖像創建縮略圖的所有工作。

來源

2009-12-10 18:31:40

如何在Delphi中將縮略圖視圖添加到TShellList？

回答

相關問題