Через

← →
der © (2003-09-03 10:36) [0]

В т.ч. главная форма. Хотя если щелкнуть правой кнопкой в Панели задач и сделать "Закрыть", она закрывается. В чем дело не пойму.

← →
Skier © (2003-09-03 11:13) [1]

>Через [x] некоторые формы не закрываются...
А есть ли у этих форм обработчики событий OnCloseQuery или OnClose ?
Если есть, то хорошо бы показать код.

← →
GreatMaster (2003-09-03 11:24) [2]

А то что она закрывается через панель задач - дык не помню как 9х, но 2к/ХР в некоторых случаях снимает по тихому зачу даже если та кочевряжится.

← →
der © (2003-09-03 12:08) [3]

Обработчики событий есть. В разных формах выполняются разные действия. Где-то инфа скидывается в ИНИ-файл, где из EditBox"ов в таблицу. Одинакового кода нет нигде.
Фишка-то в том, что на других компах с вин"98 эта прога работает.
> но 2к/ХР в некоторых случаях снимает по тихому зачу

в 98-ых это не так.

← →
der © (2003-09-03 15:22) [4]

переустановил Windows.
Не помогает.
Другие схожие по задачам проекты, написанные в той же инсталляции Дельфи работают нормально.
Просто ничего не понимаю!

← →
Skier © (2003-09-03 15:25) [5]

> переустановил Windows.

Мало. Надо ещё переформатировать винчестер. ;)

← →
clickmaker © (2003-09-03 15:29) [6]

Также еще неплохо было бы прошить новый BIOS ;)

← →
Skier © (2003-09-03 15:31) [7]

И сменить "маму"

← →
der © (2003-09-03 15:42) [8]

все издеваетесь, да?...
:-)

← →
panov © (2003-09-03 15:45) [9]

Тебе же ответитли, что по-разному в вразных версиях работает. Смотри в обработчиках OnColse и OnCloseQuery.
(Еще бы код желательно привести, так как здесь нет телепатов)

← →
Skier © (2003-09-03 15:47) [10]

Дык...Конкретного разговора не получится в виду наличия отсутствия кода.
Поэтому и флудим.
А переставлять систему из-за того что программа не работает - это перл.

← →
der © (2003-09-03 15:48) [11]

в одной из форм код очень прост:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin close end;

← →
der © (2003-09-03 15:49) [12]

> А переставлять систему из-за того что программа не работает
> - это перл.

Ну, мало-ли Windows как-то не так обрабатывает сообщения от приложений.

← →
Skier © (2003-09-03 15:50) [13]

Ой ! Что это ?!

← →
der © (2003-09-03 15:51) [14]

приведенный код - для примера. Там на самом деле на формочке есть кнопка, в OnClick у которой написано: close;

← →
Skier © (2003-09-03 15:52) [15]

Поменьше бы таких "для примера" !

Ну и какой правильный пример, помоему нужны не просто телепаты, а сильные телепаты.

...типа как там - Ксаверий и эта как ее... непомню....

>der © (03.09.03 15:49)

> Ну, мало-ли Windows как-то не так обрабатывает сообщения
> от приложений.

И ты хочешь подстроить Windows под своё приложение, а не наоборот ?

Всем большое спасибо!
:-(

> procedure TForm1.FormClose(Sender: TObject; var Action:
> TCloseAction);
> begin
> close
> end;

5 баллов!

Ошибся. Не то скопировал. ПРОСТИТЕ ПОЖАЛУЙСТА

[11] - в орешник...

Через Найти похожие ветки