Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.01.27;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.007 c
11-1182849398
robt
2007-06-26 13:16
2008.01.27
колесо и TrackBar


9-1165928759
Creative
2006-12-12 16:05
2008.01.27
Как рисовать 3D и 2D объекты в одной сцене?


2-1198485445
ksmakov
2007-12-24 11:37
2008.01.27
Как вытащить номер строки в таблице dbf


3-1190025403
makaronX
2007-09-17 14:36
2008.01.27
координаты ячейки в DBGrid с учетом прокрутки


15-1198163457
oldman
2007-12-20 18:10
2008.01.27
Разве так нельзя создавать образ диска?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский