Форум: "Основная";
Текущий архив: 2004.03.28;
Скачать: [xml.tar.bz2];
ВнизРисование Найти похожие ветки
← →
1Raily (2004-03-11 19:56) [0]Как сделать прогу, где 6надо нижимать мушкой в двух местах и между ними будет рисоваться прямая? Это наверно не сложно, просто я только начинаю изучать Delphi
← →
Petr V. Abramov © (2004-03-11 20:08) [1]> где 6надо нижимать мушкой
Мушку надо спилить :) А почитать про OnMouseDown, OnMouseUp и про TCanvas.
← →
ssk (2004-03-11 20:23) [2]мда... по-русски бы научиться сначала писать, а потом уж по-программерски :-)
← →
тихий вовочка © (2004-03-11 22:18) [3]Заводишь переменную TPoint, в событии OnMouseUp проверяешь какой по счету клик: если первый - то заполняешь ее координатами X и Y, переданными в процедуру системой. Если второй - то делаешь
Image.Canvas.MoveTo(переменная1.x, переменная1.y);
Image.Canvas.LineTo(X,Y), где X и Y координаты нового клика.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.03.28;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.033 c