ShowMessage

[DM_bite]

Каким образом, при выполнении каких-либо действии можно вывести какое-нибудь сообщение.Например,при контроле над исключительными ситуациями.Литература есть, но не нашел ничего.

[artemavd]

В процедуре кнопки напиши например так:

begin
   if Edit1.Text:='0' then
     ShowMessage('Поле пустое!')
   end;
end;
или так:
begin
 ShowMessage('Привет!');
end;

Вариантов много))
From Stilet: Код попрошу оформлять спецтегом (#)

[Mixasik]

Также можно использовать messageBox(), если нужны какие нибудь дополнительные кнопки, заголовок и т.д.

[Tayfun]

Это можно при ошибках...!
MessageDlg ('Ошибка!!!',mtError, [mbOk], 0);

[DM_bite]

Выдает ошибку, ругаеться что-то насчет "`" Объясните плиз...

[Tayfun]

if Edit1.Text:='0' then
ShowMessage('Поле пустое!')

Возможно правильней будет так

if Edit1.Text='0' then
ShowMessage('Поле пустое!')

[Mixasik]

Сообщение от DM_bite

Выдает ошибку, ругаеться что-то насчет "`" Объясните плиз...

Где именно выдается ошибка? Не помешал бы исходник процедуры. где ошибка выскакивает.

[DM_bite]

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(`bla-bla-bla`)
end;

[Tayfun]

Гы, кавычки попробуй английские поставить)))

[DM_bite]

Сообщение от Tayfun

Гы, кавычки попробуй английские поставить)))

хыхыхыхы точно