работа с listview

[D_E_N]

как грузить из нее? ImageIndex := что сюда писать?;
а как сделать с listimages поподробнее если это возможно?

[spamer]

Например вот так:

procedure TForm1.BitBtn1Click(Sender: TObject);
var
     h: hIcon;
     ico: TIcon;
begin
  h := ExtractIcon(HInstance, 'C:\Windows\System32\shell32.dll', 10);
  if h <> 0 then begin
  ico := TIcon.Create;
  ico.Handle := h;
  ImageList1.AddIcon(ico);
  ico.Free;
  end;
  if imagelist1.GetBitmap(0,BitBtn1.Glyph) = false then showmessage('Error');
end;

И погляди методы ImageList"a :
GetBitmap()
GetIcon();

[D_E_N]

SPAMER спасиб конечно но что смотреть? мне надо я так понял припаять к
ImageIndex иконку из imagelist подскажи как сделать пожалуста ато я чет совсем не догоню....

[mihali4]

Что-то вроде

procedure TForm1.ListView1GetImageIndex(Sender: TObject; Item: TListItem);
begin
if not FileExists(Item.Caption) then
ListView1.ItemFocused.ImageIndex:=0;
end;

А может и нет...
Засыпаю...

[D_E_N]

не эт тоже самое что просто поставить. спасибо конечно.
добился всё таки.... урррррааа!!!!!

[spamer]

добился всё таки.... урррррааа!!!!!

Ты хоть покажи чего добился, а то все что тебе предлагали - не подходило...

[D_E_N]

в listview выбрал imagelist убрал все загрузки иконок из системы при активации и создании формы.... а потом просто при добавлении нового элемента в IMAGEindex писал индекс нужной мне иконки в imagelist
напрмер imagelist:=1 <--- номер иконки в imagelist