Delphi组件类似于Outlook的显示附件

Question

是否有类似于Outlook用于显示附件的Delphi组件？

我是D2006.所以我还不熟悉任何新的Delphi组件.

谢谢 !

Answer 1

使用ListView:

这是ListView的DFM:

object ListView1: TListView
  Left = 8
  Top = 8
  Width = 380
  Height = 28
  BorderWidth = 4
  Columns = <>
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = [fsUnderline]
  Items.ItemData = {
    0376000000020000000500000001000000FFFFFFFF00000000FFFFFFFF000000
    00104C006F0067006F002E0067006900660020002800310020004B0042002900
    3B000500000005000000FFFFFFFF00000000FFFFFFFF000000001147006C006F
    00620065002E0067006900660020002800360020004B00420029003B00}
  ParentFont = False
  SmallImages = ImageList1
  TabOrder = 0
  ViewStyle = vsList
end