/topic/767486&pg=1&hl=my_quit

AmilmanБлин появилась проблема когда я задал в Config.fpw команды SCREEN=OFF и RESOURCE = OFF программа перестала закрыться в процессах ( Что тогда нужно сделать?

чем тебе окошко фокса помешало?

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

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

Amilmanпрошелмимоты еще сист.меню отключи - бедешь потом кричать,
что у тебя из контролов ввода ничего не копируется
=_=
Мне надо чтоб вылазила только моя форма мне не нужны два окна одно из которых пустое (
Как осуществить закрытие программы в процессе с командой SCREEN=OFF

пустое окно пользователям не мешает,
это некий стандартный интрафейс
+ содержит много важностей и вкусностей.

Вам необходимо добавить в меню пунктик для вызова Вашей формочки и все,
и Ваша формочка будет внутри появляться (ин скрин),
с приложением можно будет удобно работать - к примеру свернуть махом все окошки и т.д.

а ваащета там и картиночку можно красивую вставить и т.д.

окей,

вот эта команда:

когда должна выполниться?

+ я дал ссылку на пример

там кажется есть вызов формочки со всеми прибамбахами

чем не устраивает интерфейс со стандартным скрином,
в котором появляется Ваша формочка,
+ Вы имеете далее возможность в нем-же смотреть отчеты и т.д. ?

ау

жду ответа
для того, чтобы понять,
как будешь делать:
- как ты хочешь
- как надо

ок.

на самом деле в скрине можно и контролы поместить и
форму без заголовка и бордера -
так поступают при создании приложений на фоксе для терминалов.

в Вашем случае
1. в конфиге _screen=off
2. в методе дестрой формы написать clear events
3. та строка с шутдауном не нужна сто лет, а вместо нее написать
закрытие всего и quit

+ вопрос:

Вы проф.разработчик?
и хотите наделать кучу вот таких армиков (должники, шутники, ....)
и они будут набором у пользователей?

Amilmanпрошелмимо,

Нет я по большей части дизайнер, но мне надо собрать 2 программы (Должники,Тел книга,).
Я правдо не интересовался зачем пользователю это нужно...

а не проще их в одном скрине и собрать?

сделать меню с вызовом Должники, тел.книга....
какие-то офигительные справочники со средствами поиска и т.д.

+ раскрасить скрин, раз Вы есть дизайнер.

и будет красивый интерфейс в которм из одного места можно позвать кучу формочек.

прошелмимов Вашем случае
1. в конфиге _screen=off
2. в методе дестрой формы написать clear events
3. та строка с шутдауном не нужна сто лет, а вместо нее написать
закрытие всего и quit

Amilmanпроходящий.пропущено...
Вы мое сообщение читали?

Читал.
Вот и говорю надо понят как это сделать )))
1 и 2 пункт выполнил 3 я не знаю команду 4 сделал.

ок

результат?

Dima TAmilmanИ всё больше я не чего не прописывал.
Я же написал выше
Dima TНе обращал никогда внимания, но похоже оно всегда "моргает" при выходе при screen=off
Значит никак ты от этого не избавишься.
Разве что окно фокса свернуть попробовать, добавь в начало


дурашко, не путай человека, котор дизайнер и тупо, как мартышка копирует все подряд.

Amilman Вот код 1 PRG:

DO form "Form\addition_of_debtors"
ON SHUTDOWN DO "PRG\my_quit"
READ EVENTS
quit

Вот 2:

Public oTmrExit
oTmrExit = createobject("tmrExit")
if vartype(oTmrExit)<>"O"
return .f.
endif
oTmrExit.interval = 10
Return .t.


define class tmrExit as timer

interval = 0
nMode = 0

procedure timer
this.interval = 0
LOCAL lnFormCount, lnNum, loForm
lnFormCount = _screen.formcount
for lnNum=lnFormCount to 1 step -1
try
loForm = _screen.forms(lnNum)
catch
loForm = .f.
endtry
if vartype(loForm)="O"
loForm.visible = .f.
loForm.release()
endif
endfor

close data
clear events
clear dlls
on shutdown
quit
EndDefine

У формы в Destroy прописан CLEAR EVENTS

И всё больше я не чего не прописывал.

я по-человечьи просил убрать строку

ON SHUTDOWN DO "PRG\my_quit"

весь код, который в май кваит Вам сто лет не нужен
и вся эта процедура не нужна.
(кстате в ней Вы видите пляски со скрином - это и приводит к мерцанию оного)


вывод:
заставь ... богу молиться ...

не мучьте лису и себя.

пожалуйста.

терзаюсь проблемой как купить пяток банок лососевой икры
и не попасть в просак