Оберон-клуб «ВЄДАsoft»
https://zx.oberon.org/forum/

Что добавить в код консольной программы, чтобы окно CMD не закрывалось после запуска?
https://zx.oberon.org/forum/viewtopic.php?f=116&t=477		 Страница 1 из 1
Автор:  Pimbom [ 01 дек 2019, 00:16 ]
Заголовок сообщения:  Что добавить в код консольной программы, чтобы окно CMD не закрывалось после запуска?
Как правильно модифицировать этот код, чтобы можно было щелчками мыши запустить скомпилированное exe и окно программы чтобы после этого сразу не закрылось?

Код: "OBERON"
Expand Code | Выделить всё
  1. MODULE d1;
  2. IMPORT Out;
  3. BEGIN
  4.  Out.String("Привет, мир!");
  5.  Out.Ln
  6. END d1.
Автор:  Zorko [ 01 дек 2019, 01:25 ]
Заголовок сообщения:  Re: Что добавить в код консольной программы, чтобы окно CMD не закрывалось после запуска?
Классически для этого применяется чтение символа из потока ввода. Можно попробовать так:

Код: "OBERON"
Expand Code | Выделить всё
  1. MODULE d1;
  2. IMPORT In, Out;
  3. VAR ch: CHAR; (* SHORTCHAR? Зависит от выбранного диалекта *)
  4. BEGIN
  5.  Out.String("Привет, мир!");
  6.  Out.Ln;
  7.  In.Open; In.Char(ch)
  8. END d1.

Код не проверял, даже не уверен в нужности In.Open

Можно ещё IMPORT Platform и потом Platform.System("pause")
Страница 1 из 1 Часовой пояс: UTC + 2 часа
Powered by phpBB® Forum Software © phpBB Group
https://www.phpbb.com/