Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

DoubleClick в OpenDialog


Efir ©   (2007-12-28 23:49:00) 

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


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


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

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


{RASkov}   (2007-12-29 02:27:00) [2]

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

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


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


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

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


{RASkov}   (2007-12-29 02:19:00) [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:09:00) [5]


> {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 01:49:00) [6]

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

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


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


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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо