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

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

Код возврата. [D6, Win95/98, WinME, Win2k]


zavdim ©   (2002-08-15 07:34:00) 

При завршении проги нужно дать код выхда - либо 0 либо 1.
В Си - знаю, а здесь как?


zavdim   (2002-08-16 07:19:00) [1]

Нет, мне Halt не нужен - я по человечески выйти хочу.
пробую ExitCode.


Opuhshii   (2002-08-15 10:03:00) [2]

2Fiend © (15.08.02 09:51)
вот у тебя произошло какое-то событие по которому можно считать что ExitCode должен быть 1, но потом произошло какое-либо другое событие после которого ExitCode должен быть 2,.. то как ты реализуешь сие с помощью Halt? никто не сказал что после первого события выполнение должно быть прекращено?,..
Halt initiates abnormal termination of a program...


Leran2002   (2002-08-15 10:01:00) [3]


> Fiend © (15.08.02 09:51)

Старый добрый метод, еще со времен Pascal...


Fiend   (2002-08-15 09:51:00) [4]

Делайте Halt и не морочьте себе голову.

Я его использую, всё ок


Внук   (2002-08-15 09:35:00) [5]

>>Ученик © (15.08.02 09:32)
Ясно, может, они сами поняли, что погорячились :))
Действительно, удобный способ, зачем еще что-то придумывать...


Ученик   (2002-08-15 09:32:00) [6]

>Внук © (15.08.02 09:28)
В описание ExitCode помощи Delphi 6 такого текста нет


Внук   (2002-08-15 09:28:00) [7]

Трудно однозначно cказать :) Написано же "Use a finalization section instead"
Здесь, на сайте, обсуждалась эта проблема недавно достаточно подробно, сошлись вроде на старом добром PostQuitMessage :)


Ученик   (2002-08-15 09:21:00) [8]

>Внук © (15.08.02 09:15)
А как надо ?


Внук   (2002-08-15 09:15:00) [9]

Если не учитывать
"ExitCode is provided for backwards compatibility only. Use a finalization section instead",
то полный порядок...


zavdim   (2002-08-15 09:13:00) [10]

Спасибо.


Ученик   (2002-08-15 08:39:00) [11]

ExitCode := ...


Leran2002   (2002-08-15 07:43:00) [12]

Можно так:
procedure Halt [ ( Exitcode: Integer) ];
Хотя может не очень красиво...


Наверх

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