| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Рисую на рабочем столе [D7]

Karlsun4ik ©   (2006-02-10 11:57:00) 

Скажите пожалуйста, а можна рисовать на канве рабочего стола графики и если можна подскажите как. желательно ыв исходняках

---

Steep   (2006-02-12 11:04:00) [1]

Например линия на экране

procedure TForm1.Button1Click(Sender: TObject);
var
dc : hdc;
begin
dc := GetDc(0);
MoveToEx(Dc, 0, 0, nil);
LineTo(Dc, 300, 300);
ReleaseDc(0, Dc);
end;

Я правда еще сам в графике плохо разбираюсь (да и в Delphi :-))

---

Наверх