у меня есть картинка на форме. по нажатию на форму она отображается на определенном месте, мне нужно, чтобы по нажатию на другое место она появлялась второй раз на других координатах. как это сделать?
Примечание:
вот процедура на отображение картинки procedure TfrmOsnovna.DrawDver;
begin
Canvas.MoveTo(FBeginPoint.X,FBeginPoint.Y);
Canvas.LineTo(FEndPoint.X,FEndPoint.Y);
Canvas.Circle(Round((FEndPoint.X-FBeginPoint.X)/2),Round((FEndPoint.Y-FBeginPoint.Y)/2),20);
end;
вот ее вызов
if Cvet then
begin
DrawCvet;
end
что тут поправлять?
Примечание:
это у меня на MouseMove. там просто таких процедур, как Cvet несколько и в зависимости от нажатой кнопки определяется, что строить. но другие процедуры строявтся при помощи стандартных RectAngle, LineTo и т.д., а тут картинка. она появляется на координатах FBeginPoint.X и FBeginPoint.Y
я выше неправильную процедуру поставил, на эту картинку вот эта
procedure TfrmOsnovna.DrawCvet;
begin
imgCvetForm.Left:=FBeginPoint.X;
imgCvetForm.Top:=FBeginPoint.Y;
imgCvetForm.Visible:=True;
end;
что тут поменять то?
RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.
Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.
Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.