
14.06.2011, 21:11
|
 |
Профессионал
|
|
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
|
|
1)
Код:
Form1.Canvas.MoveTo(10,10);
Form1.Canvas.LineTo(100,100);
2)
Код:
//Image1.Transparent = true;
Image1.brush.color:=clWhite;
Image1.FillRect(rect(0,0,Image1.width-1,image1.height-1));
Image1.Canvas.MoveTo(10,10);
Image1.Canvas.LineTo(100,100);
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
|