Текущий архив: 2002.06.27;
Скачать: CL | DM;
Вниз
Как создать иконки на форме и при необходимости их перемещать?? Как на рабочем столе в Windows! Найти похожие ветки
← →
Aristotel © (2002-02-15 20:51) [0]Как создать иконки на форме и при необходимости их перемещать?? Как на рабочем столе в Windows!
← →
wicked © (2002-02-16 21:12) [1]посмотри на компоненту TListView... может, подойдёт....
← →
Aristotel © (2002-02-17 08:50) [2]Нет 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; КАК СДЕЛАТЬ ИКОНКИ ПРОЗРАЧНЫМИ ?????????????????
Страницы: 1 вся ветка
Текущий архив: 2002.06.27;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.014 c
