Delphi Вывод сообщений на Delphi

Тема в разделе "Delphi", создана пользователем WinHack, 8 ноя 2018.

  1. WinHack
    сейчас я расскажу как выводить сообщения в delphi.

    для вывода простово сообщения есть такой код:
    Код:
    ShowMessage('сообщение')
    а для вывода сообщения с картинкой, несколькоми кнопками(как в basic`е)

    такой код:
    Код:
    MessageDLG('Вывод сообщения',mtConfirmation,[mbYes,mbNo,mbCancel],0);
    в этом сообщение будет 3 кнопки

    теперь рассказываю подробно о этом:

    'Вывод сообщения' это текст

    mtconfirmation это тип сообщения

    [mbYes,mbNo,mbCancel] это кнопки

    а 0 это индекс помощи можно ставить просто 0

    теперь про кнопки
    1. mbYes - это да
    2. mbNo - нет
    3. mbOK - ОК
    4. mbCancel - канцел
    5. mbHelp - помощь
    6. mbAbort - прервавть
    7. mbRetry - повтор
    8. mbIgnore - пропустить
    9. mbAll - про эту кнопку незнаю
    а теперь про типы их 5
    1. mtWarning - предупреждение
    2. mtError - ошибка
    3. mtInformation - информация
    4. mtConfirmation - запрос
    5. mtCustom - тоже самое что и ShowMessage
    вот пример проги:

    объявим переменную r(помните где переменные обьявлять?)
    Код:
    Var R:Word;
    на форму кинем текстовое поле и кнопку, в ней пишем такой код:
    r:= MessageDLG('ghghh', mterror, [mbYes,mbNo,mbcancel], 0);
    
    if R = mrYes then;
       begin edit1.Text := 'Yes';
       end;
    if R=mrNo then
       begin edit1.Text := 'No';
       end;
    if r=mrcancel then
       begin edit1.Text := 'Cancel'
       end;