Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Завести процедуру даблклик [D7, XP]

b86 © (2010-10-14 14:27:00)
Здравствуйте. У меня картинка перемещается по форме драг-дропом, мне надо на эту картинку повесить даблклик, так что бы она работала? клик правой кнопкой занят. нужен именно даблклик

sniknik (2010-10-15 11:46:00) [1]
> а вот рядом обработчик OnDblClick не заметило...
может и заметило, но оно тоже не работает при "стандартном способе". просто сказать об этом не удосужилось.

Плохиш (2010-10-15 11:00:00) [2]

> решается чтением хелпа по "стандартному способу".

Хелпу вообще для ботаников написали, крютые пацанчики им не пользуются.

PS. Мне вот интересно, значит обработчик OnClick это блондинко умудрилось как-то создать, а вот рядом обработчик OnDblClick не заметило...

sniknik (2010-10-15 09:26:00) [3]
// "Привет" мне и не пишет
убери "автоподьем" "драга" у компонента и стартуй его тут "вручную" после "привета" вместо комментария...

нафига сложные схемы придумывать когда "проблема" пара пустяков, решается чтением хелпа по "стандартному способу".

b86 (2010-10-15 09:19:00) [4]
procedure TForm4.Image0DragDrop(Sender, Source: TObject; X, Y: Integer);
begin
with Source as TImage do
begin
Left:=X;
Top:=Y;
end;
end;

procedure TForm4.Image0DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
accept:=Source is Timage;
end;

procedure TForm4.Image1ContextPopup(Sender: TObject; MousePos: TPoint;
var Handled: Boolean);
begin
label3.Caption:='Клик правой работает'
end;

procedure TForm4.Image1Click(Sender: TObject);
begin
label3.Caption:='Привет'
// "Привет" мне и не пишет
end;

brother (2010-10-15 06:11:00) [5]
> воспользовался стандартным способом. он не работает,

покажи код... и что именно не работает?

b86 (2010-10-14 14:36:00) [6]
воспользовался стандартным способом. он не работает, по этому спрашиваю.

Anatoly Podgoretsky (2010-10-14 14:29:00) [7]
> b86 (14.10.2010 14:27:00) [0]

А что ты для этого сделал?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »