Delphi ShowMessage: отображение сообщений в Delphi
ShowMessage - это процедура в Delphi, которая отображает сообщение в виде модального диалогового окна. Она является встроенной визуальной компонентой, которая может использоваться для вывода информации, предупреждений и сообщений об ошибке пользователям.
Пример использования ShowMessage:
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('Привет, мир!');
end;
В данном примере при нажатии на кнопку "Button1" будет отображено модальное диалоговое окно с сообщением "Привет, мир!".
Помимо обычных текстовых сообщений, ShowMessage также может отображать значения переменных. Например:
procedure TForm1.Button2Click(Sender: TObject);
var
name: string;
begin
name := 'John';
ShowMessage('Привет, ' + name + '!');
end;
В этом случае при нажатии на кнопку "Button2" будет отображено модальное диалоговое окно с сообщением "Привет, John!".
ShowMessage также возвращает результат типа Integer. Например, если пользователь нажимает кнопку "Ok", возвращается значение mrOK (1), а если пользователь нажимает кнопку "Cancel", возвращается значение mrCancel (2) и так далее. Можно использовать этот результат для принятия решений в коде программы. Например:
var
result: Integer;
begin
result := ShowMessage('Вы уверены, что хотите удалить этот файл?', mtConfirmation, mbYesNo);
if result = mrYes then
begin
// Код для удаления файла
end
else
begin
// Код для отмены удаления файла
end;
end;
В этом примере будет отображено модальное диалоговое окно с вопросом "Вы уверены, что хотите удалить этот файл?", а затем будет выполнен соответствующий код в зависимости от выбранной пользователем опции "Да" или "Нет".