Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.04;
Скачать: CL | DM;

Вниз

Помогите создать объект   Найти похожие ветки 

 
Kupnu4   (2004-03-17 20:15) [0]

У меня есть TImage с иконкой. Мне нужно в коде описать новый объект TImage с той же иконкой.


 
lipskiy ©   (2004-03-18 00:14) [1]

Загрузи иконки в имейджлист, а из него программно грузи их в имейджи:
ImageList1.GetBitmap(0,Image1.Picture.Bitmap); // загружает в Image1 картинку из ImageList1 с индексом 0.


 
Defunct ©   (2004-03-18 02:10) [2]

> Загрузи иконки в имейджлист, а из него программно грузи их в имейджи

Все, что бы вы ни делали на компьютере, выполняется программно

> У меня есть TImage с иконкой. Мне нужно в коде описать новый объект TImage с той же иконкой.

procedure TForm1.Button1Click(Sender: TObject);
begin
 With TImage.Create(Self) Do
 Begin
   Top := 100;  
   Left := 100;  
   Parent := Self;
   Width := Image1.Width;
   Height := Image1.Height;
   Picture.Graphic := Image1.Picture.Graphic;
 End;
end;



Страницы: 1 вся ветка

Текущий архив: 2004.04.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
7-1074159901
Vyacheslav
2004-01-15 12:45
2004.04.04
Отключить, поменять в эксплорере прокси


14-1078946162
Knight
2004-03-10 22:16
2004.04.04
Кто знает хороший компонент, который выводит изображение...


3-1078270762
tchn1
2004-03-03 02:39
2004.04.04
одновременная вставка новых записей в две таблицы


3-1078810518
kaginava
2004-03-09 08:35
2004.04.04
InterBase под Linux


14-1079008929
SPeller
2004-03-11 15:42
2004.04.04
Наглеют, сволочи.....