Function MessageDlg

uses Unit Dialogs

A função MessageDlg exibe uma caixa de diálogo no centro da tela e permite saber em qual botão o usário clicou.

O valor retornado será o botão que o usuário clicou. Entre os valores possíveis estão : mrNone, mrAbort, mrYes, mrNo, mrRetry, mrOk, mrCancel, mrIgnore, mrAll.

Tipo de Caixa de diálogo : mtWarning, mtError, mtInformation, mtConfirmation, mtCustom.

Sintaxe da sua utilização:

MessageDlg('Mensagem',Tipo_da_caixa_de_dialogo,botões,HelpCtx);

Ex:

procedure TForm1.BitBt2Click(Sender: TObject);
begin
       MessageDlg('Erro na operação', mtError, [mbOk], 0);
end;