Форум: "Прочее";
Текущий архив: 2006.12.24;
Скачать: [xml.tar.bz2];
ВнизКак сохранить все картинки из TImageList ? Найти похожие ветки
← →
ImageList1 (2006-12-02 02:45) [0]
var
Bm1 : TBitMap;
begin
Bm1 := TBitMap.Create;
try
CopyImage(ImageList1.GetImageBitmap, IMAGE_BITMAP, ???, ???, 0);
if SaveDialog1.Execute then
Bm1.SaveToFile(SaveDialog1.FileName);
finally
Bm1.Free;
end;
Как узнать размер картинки? Или какой ещё есть способ?
Предлагать вытягивать картинки по одной - не надо. Потому, что это называется делать через ***у.
← →
DesWind © (2006-12-02 03:01) [1]А ImageList1.GetImageBitmap.Height/Width ?
← →
ImageList1 (2006-12-02 03:14) [2]8 на 8.
← →
ImageList1 (2006-12-02 03:17) [3]В смысле ImageList1.GetImageBitmap - это просто LongWord.
а ImageList1.Height/Width - 8 на 8.
← →
DesWind © (2006-12-02 03:26) [4]var
bm: Tbitmap;
begin
bm:=TBitmap.Create;
ImageList1.GetBitmap(Index,bm);
...//и делаем с bm че хотим.
end;
← →
DesWind © (2006-12-02 03:37) [5]А понЯл! Те надо все картинки в одной!
Размер по хендлу GetBitmapDimensionEx.
Чем хороши такие вопросы, сам узнаешь много нового воспользовавшись поиском...
← →
ImageList1 (2006-12-02 06:02) [6]Чёто пустая картинка выходит почему-то ...
← →
ImageList1 (2006-12-03 01:56) [7]В смысле у картинки получается, что размер 0x0. Что не так?
Страницы: 1 вся ветка
Форум: "Прочее";
Текущий архив: 2006.12.24;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.04 c