Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.01.27;
Скачать: CL | DM;

Вниз

DoubleClick в OpenDialog   Найти похожие ветки 

 
Efir   (2007-12-28 23:49) [0]

Есть форма. На ней открытый TOpenDialog. При выборе файла двойным кликом форма реагирует на MouseUp. Влияют ли свойста самого TOpenDialog на такое поведение?


 
Германн ©   (2007-12-29 00:47) [1]


> При выборе файла двойным кликом форма реагирует на MouseUp

Поясни что ты имеешь в виду.


 
{RASkov} ©   (2007-12-29 01:49) [2]

> [1] Германн ©   (29.12.07 00:47)
> Поясни что ты имеешь в виду.

Попробуй "пропиши" данный обработчик(OnMouseUp) форме, например так:
procedure TForm.FormOnMouseUp();
begin
 ShowMessage("Click");
end;
И затем выполни OpenDialog.Execute; диалог пусть будет над формой.... выбери в диалоге любой файл путем двойного клика на нем...
Диалог при этом закроется и следом отработает обработчик Форм.ОнМаусАп....
Я как-то тоже с этим сталкивался, но у меня это было не критично, и я вроде оставил все как есть :).....
Если конечно я правильно понял смысл сабжа...


 
Германн ©   (2007-12-29 02:09) [3]


> {RASkov} ©   (29.12.07 01:49) [2]
>
> > [1] Германн ©   (29.12.07 00:47)
> > Поясни что ты имеешь в виду.
>
> Попробуй "пропиши" данный обработчик(OnMouseUp) форме, например
> так:
> procedure TForm.FormOnMouseUp();
> begin
>  ShowMessage("Click");
> end;
> И затем выполни OpenDialog.Execute; диалог пусть будет над
> формой.... выбери в диалоге любой файл путем двойного клика
> на нем...
> Диалог при этом закроется и следом отработает обработчик
> Форм.ОнМаусАп....


Саш. Я это попробовал прежде чем постить свой ответ. (Не первый раз замужем, всё-таки). И даже обработчик OnMouseUp формы - один к одному к твоему! Не срабатывает он, зараза! Что я делаю не так?  
D6
Исходник готов выложить, если нужно.


 
{RASkov} ©   (2007-12-29 02:19) [4]

Хм... Странно....)

> Исходник готов выложить, если нужно.

Да что там исходник-то.... вот только что попробывал
procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
 ShowMessage("Click");
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 with TOpenDialog.Create(Self) do try
  Execute;
 finally
  Free;
 end;
end;

Обязательное условие: Диалог находится(т.е. мышь) при закрытии над формой, и закрытие диалога происходит двойным кликом по любому файлу в, собственно, диалоге...
Вылазит, зараза, сообщение :( D7....
:) Вот такие пироги....


 
Германн ©   (2007-12-29 02:23) [5]


> {RASkov} ©   (29.12.07 01:49) [2]

Понял. Точка ДаблКлика в диалоге должна находится в "пределах" формы.


 
{RASkov} ©   (2007-12-29 02:27) [6]

> [5] Германн ©   (29.12.07 02:23)
> Точка ДаблКлика в диалоге должна находится в "пределах" формы

Во-во)
Ну так как там в D6 дела с этим? Подозреваю, что так же как и в D7...


 
Германн ©   (2007-12-29 02:31) [7]


> Ну так как там в D6 дела с этим? Подозреваю, что так же
> как и в D7...
>

А иначе как бы я "понял"?
:)
P.S. [4] я прочитал после опубликования [5].



Страницы: 1 вся ветка

Текущий архив: 2008.01.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.012 c
15-1198232337
destructor
2007-12-21 13:18
2008.01.27
У Google под колпаком?


4-1182835811
cosinus
2007-06-26 09:30
2008.01.27
Потомок TCheckBox и BM_SETCHECK


15-1198322066
homm
2007-12-22 14:14
2008.01.27
У меня счас крыша поедет


2-1199219528
DmT
2008-01-01 23:32
2008.01.27
Копирайт


2-1198561832
mikola
2007-12-25 08:50
2008.01.27
использую indy