ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / как имитировать нажатие мышью кнопки Close окна
10 сообщений из 10, страница 1 из 1
как имитировать нажатие мышью кнопки Close окна
    #32742991
CTAC-KO
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
CTAC-KO
Участник
...
Рейтинг: 0 / 0
18.10.2004, 16:21
| Ответить | Цитировать | Написать  
как имитировать нажатие мышью кнопки Close окна
    #32742999
-Ноль-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-Ноль-
Гость
А что,
Код: plaintext
thisform.release()
не подходит ?
...
Рейтинг: 0 / 0
18.10.2004, 16:25
| Ответить | Цитировать | Написать  
как имитировать нажатие мышью кнопки Close окна
    #32743003
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
leaf
Участник
вы про форму или главое окно или ещё про что-то
...
Рейтинг: 0 / 0
18.10.2004, 16:26
| Ответить | Цитировать | Написать  
как имитировать нажатие мышью кнопки Close окна
    #32743016
CTAC-KO
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
CTAC-KO
Участник
я про форму

а thisform.release не совсем подходит
...
Рейтинг: 0 / 0
18.10.2004, 16:29
| Ответить | Цитировать | Написать  
как имитировать нажатие мышью кнопки Close окна
    #32743053
CTAC-KO
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
CTAC-KO
Участник
вернее сказать thisform.release подходит

но все же интересно по вопросу узнать...
...
Рейтинг: 0 / 0
18.10.2004, 16:43
| Ответить | Цитировать | Написать  
как имитировать нажатие мышью кнопки Close окна
    #32743066
po2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
po2
Гость
См. синтаксис команды MOUSE... , останется лишь определить нужные координаты. Это несложно, используя SysMetric() и ObjToClient().
...
Рейтинг: 0 / 0
18.10.2004, 16:46
| Ответить | Цитировать | Написать  
как имитировать нажатие мышью кнопки Close окна
    #32743073
*Ноль*
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
*Ноль*
Гость
ну а если так:
допустим, есть форма с именем frm_my.
Создаем ее:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Local oFrm 
oFrm  = .null.
DO FORM frm_my NAME oFrm Noshow
if vartype(oFrm)!='O' or Isnull(oFrm)
* Объект не создан, можно поймать TRY
  Return .f.
endif
oFrm.Show( 1 )
if vartype(oFrm)!='O' or Isnull(oFrm) 
&& Вот тут ты попадешь  если ты закрыл по Close  или release
  Return .f.
endif
чтобы отсечь release, в кнопочке "Выход", или что там у тебя нужно делать
Hide() и ставить признак того что делать, ну допустим либо в глобальную переменную либо в твое свойство формы.

Допустим код клика по кнопке "Выход"

Код: plaintext
1.
2.
3.
with thisform
.ok =.F.
.Hide()
endwith
Тогда при скрытии формы с экрана объект форма еще существует.
И им можно "поиграть", пока сам явно не выдашь ему
RELEASE oFrm
Не объектом у тебя в таком случае будет форма только в том случае еcли ты ее закрыд по Close.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
if vartype(oFrm)!='O' or Isnull(oFrm) 
&& Вот тут ты попадешь  если ты закрыл по Close  , release  у тебя нет
  Return .f.
endif

if !oFrm.ok
Release oFrm
endif
...
Рейтинг: 0 / 0
18.10.2004, 16:48
| Ответить | Цитировать | Написать  
как имитировать нажатие мышью кнопки Close окна
    #32743808
CTAC-KO
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
CTAC-KO
Участник
а че ваще?
кнопка эта, кловзь, как объект не существует?
я думал что можно метод применить, типа

thisform.CloseButton.Click

вот только как же кловзь батон называецца в форме, вот в чем вопрос.

А по координатам это шибко неудобно.
...
Рейтинг: 0 / 0
19.10.2004, 10:16
| Ответить | Цитировать | Написать  
как имитировать нажатие мышью кнопки Close окна
    #32743837
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
CTAC-KOа че ваще?
кнопка эта, кловзь, как объект не существует?
Нет. Не существует. Нет смысла.

Если тебя не устравивает стандартный ThisForm.Release(), то создавай свой собвстенный метод и вызывай его.

Для сведения: Перехват нажатия этой кнопки можно осуществить в событии QueryUnload(). Однако явный вызов метода ThisForm.Release() игнорирует событие QueryUnload().
...
Рейтинг: 0 / 0
19.10.2004, 10:28
| Ответить | Цитировать | Написать  
как имитировать нажатие мышью кнопки Close окна
    #32744381
мимо проходил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
мимо проходил
Участник
Keyb "{alt-f4}" - для главной формы фокса или Top-Level формы
Keyb "{ctrl-f4}" - для прочих форм
...
Рейтинг: 0 / 0
19.10.2004, 13:26
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / как имитировать нажатие мышью кнопки Close окна
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]