wm-help.net -> Электронная библиотека -> Delphi -> Вопросы и Ответы по Delphi -> Вопрос и Ответ 25 -> Версия для печати

Вопрос и Ответ 25

Вопрос и Ответ 25

Вопросы и Ответы

      25. Несколько удобных функций для ввода и вывода строки.

      Часто в программе требуется вывести сообщение или ввести строку символов, для этого в Delphi предусмотрено несколько удобных функций. Вот некоторые из них:

      procedure ShowMessage(const Msg: string);

      процедура выводит сообщение Msg в окно, расположенное в центре экрана;

      procedure ShowMessagePos(const Msg: string; X, Y: Integer);

      процедура выводит сообщение Msg в окно, верхний левый угол которого расположен в точке с координатами X и Y;

      function InputBox(const ACaption, APrompt, ADefault: string): string;

      функция возвращает введенную строку символов (окно появляется в центре экрана).
      Передаваемые параметры:

      • ACaption - заголовок окна;
      • APrompt - пояснение к вводимой строке;
      • ADefault - строка возвращаемая по умолчанию.

      Пример:

      ............

      ShowMessage('Пример простого сообщения.'+#10+ 'Данное сообщение выводится всегда в центре экрана.');

      ............

      ShowMessagePos('Пример сообщения с указанием его положения на экране.', Form1.Left+Button2.Left, Form1.Top+Button2.Top);

      ............

      Button1.Caption := InputBox('Delphi для всех', 'Введите строку:', Button1.Caption);

      ............

...предыдущая страница следующая...
оглавление

Rambler's Top100