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

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

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