Цитата:
|
Сообщение от Kaka
Не-а! Мне не по форме нужно, а по рабочему столу перемещать! Там приём с закраской не подойдёт!
|
Так в чем проблема?
Рисование на рабочем столе:
Код:
var
dtc: TCanvas;
begin
dtc:=TCanvas.Create;
dtc.Handle:=GetDC(Hwnd_Desktop);
dtc.Pen.Mode:=pmNot;
dtc.Pen.Width:=50;
dtc.Pen.Color:=clGreen;
dtc.LineTo(1000,1000);
ReleaseDC(dtc.Handle,Hwnd_Desktop);
dtc.Free;
end;
Дальше думаю сами разберетесь...