1

Помогите разобраться с проблемой в Delphi XE, возникшей с первой программой. Код:

program Helloworld;          //название программы
{$APPTYPE CONSOLE}           //директива компилятору о создании консольного приложения
begin
  writeln('Hello, world!');    //вывод сообщения Hello, world!
end.                         //конец программы

После компиляции окно с текстом появляется на мгновение и исчезает. В чем может быть проблема и как это исправить?

1
  • надо че-то типа readln; в конце программы
    – sudo97
    5 янв 2012 в 10:59

3 ответа 3

11

Достаточно просто написать ReadLn перед последним end - тогда программа будет ждать нажатия клавиши Enter.

7

Нет никакой проблемы. Программа запускается, выводит 'Hello, world!' и спокойно завершается, то есть делает именно то, что от нее и хотели.


Если хотите, чтобы программа перед закрытием повисела 3 секунды, например, исправьте на такой вариант:

program Helloworld; //название программы
{$APPTYPE CONSOLE} //директива компилятору о создании консольного приложения
uses sysutils;

begin 
  writeln('Hello, world!'); //вывод сообщения Hello, world!
  sleep(3000);
end. //конец программы
2

Попробуй в конце программы поставить Readkey;

1
  • 3
    Для работы функции ReadKey, нужен модуль Crt, его в Delphi нет, но можно его Интернете найти. Но мне попадался лишь такой Crt, в котором не работают функции ReadKey и KeyPressed.
    – DelphiM0ZG
    5 янв 2012 в 15:26

Ваш ответ

Нажимая на кнопку «Отправить ответ», вы соглашаетесь с нашими пользовательским соглашением, политикой конфиденциальности и политикой о куки

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.