[Mp3]

хочу создать треугольник на форме и чтобы он крутился благодаря скрол бару....пока создал ток треугольник и то он не работает...

form1.Canvas.MoveTo(50,0);
form1.Canvas.LineTo(0,50);
form1.Canvas.LineTo(100,50);
form1.Canvas.LineTo(50,0);

но почему то треугольник не чертиться =(
подскажите в чем ошибка
я записываю код в Form1....

[Bargest]

Попробуй записать по событию onPaint.

[Mp3]

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

(50,0)

чтобы программа считывала высоту и ширину формы а потом рисовала...я могу ошибаться %)

[Bargest]

Удивился. Только что проверил.

Код:

procedure TForm4.FormPaint(Sender:TObject);
begin  
  Canvas.MoveTo(50,0);
  Canvas.LineTo(0,50);
  Canvas.LineTo(100,50);
  Canvas.LineTo(50,0);
end;

Ну и разумеется это привязано к событию onPaint. Работает.

чтобы программа считывала высоту и ширину формы а потом рисовала

Эти параметры в пикселях. (50,0) это 50 пикселей по X и 0 по Y относительно левого верхнего угла формы.

[Mp3]

а как его привязать к ScrollBar' у чтобы когда поварачиваю в разные стороны треугольник крутился

[Bargest]

У TScrollBar'а есть свойство Position. Можно поставить Min в 0, Max в 360 и считывать Position, считая его углом, после чего пересчитывать координаты вершин в зависимости от этого угла.

[angvelem]

Глянь этот топик.