| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как создать иконки на форме и при необходимости их перемещать?? Как на рабочем столе в Windows! [D5, D6, Win95/98]
Aristotel © (2002-02-15 20:51:00)Как создать иконки на форме и при необходимости их перемещать?? Как на рабочем столе в Windows!
Aristotel (2002-02-17 08:50:00) [1]Нет ListView меня не устраивает! Я научился выводить иконки с помощью DrawIconEx пример :
Var bit2:TBitmap;
Ic1 :TIcon;
begin
Ic1 :=TIcon.Create;
Ic1.LoadFromFile("e:\ic2.ico");
bit2:=Tbitmap.Create;
try
bit2.LoadFromFile("e:\fon.bmp"); // Загружаю картинку для // красоты!
Form1.Canvas.StretchDraw(rect(0,0,form1.Width,form1.Height),bit1);
DrawIconEx(Form1.Canvas.Handle,250,50,ic1.Handle,364,364,0,Form1.Canvas.Brush.Handle,DI_NORMAL);
finally
end;
end; КАК СДЕЛАТЬ ИКОНКИ ПРОЗРАЧНЫМИ ?????????????????
wicked (2002-02-16 21:12:00) [2]посмотри на компоненту TListView... может, подойдёт....
| |
