Как работать с десктопом?

[Fedorfx]

Всем привет.
Есть 2 формы. хочу нарисовать линию между ними.
Как это сделать.
И как потом убрать эту линию.

[GSerg]

Эээээ....

dim w as long, h as long, p as long, r as RECT

w=getdesktopwindow
h=getdc(w)
p=selectobject (h,createpen(ps_solid,1,vbblue))
movetoex h, 100,100, byval 0&
lineto h,100,500
deleteobject selectobject (h,p)
releasedc w,h

'убирает линию
'setrect r, 100,100,101,501
'invalidaterect w,r,1


Не проверял

[Fedorfx]

Может мне тебе ящик пива выслать, так сказать за оперативность.
На скоко понимаю у меня была позняя ночь а у тебя раннее утро?

[GSerg]

У меня было 11:58 утра, а всё что можно ты уже выслал