Текущий архив: 2003.11.27;
Скачать: CL | DM;
Вниз
Картинки из TImageList Найти похожие ветки
← →
Nucl © (2003-11-17 18:02) [0]Как подставлять картинки из TImageList в Timage ???
← →
TUser © (2003-11-17 18:04) [1]Assign
← →
Nucl © (2003-11-18 10:12) [2]а вот и нет
var
MyBitmap : TBitmap;
begin
try
MyBitmap := TBitmap.Create;
if Btn_ImageList.GetBitmap(0,MyBitmap) then
Image1.Picture.Bitmap := MyBitmap;
finally
MyBitmap.Free;
end;
end;
← →
VAleksey © (2003-11-18 10:24) [3]А одной строкой?
ImageList1.GetBitmap(0,Image1.Picture.Bitmap);
Страницы: 1 вся ветка
Текущий архив: 2003.11.27;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.017 c
