bitbtn.glyph --> imagelist --->bmp?

[viperrr]

каким образом можно картинки c imagelist записать в файл bmp? delphi

[Neeter]

Вот как вариант:

procedure TForm1.Button1Click(Sender: TObject);
var
 b: TBitmap;
begin
 b := TBitmap.Create;
 try
  ImageList1.GetBitmap(0, b);   //0 - индекс картинки в IMageList
  b.SaveToFile('D:\1.bmp');
 finally
  b.Free;
 end;
end;

[viperrr]

ImageList1.GetBitmap(0, b);
по сути я вот до этой строчки недопер, поскольку с графикой раньше не работал, спс

[uberchel]

procedure TForm1.Button1Click(Sender: TObject);
var 
 b: TBitmap; // BitMap(bmp)
begin
 b := TBitmap.Create; //Создание
 try 
  ImageList1.GetBitmap(0, b); //0 - индекс картинки в IMageList / b BitMap(bmp)
  b.SaveToFile('D:\1.bmp'); //Сохранение
 finally
  b.Free; // Выгрузить
 end;
end;

P.S ImageList1.GetBitmap(0, b); - получение картинки по индексу из ImageList

[viperrr]

а чтобы все картинки из имейджлиста в файл выводил можно сделать?