Application.MessageBox в Delphi XE2

[DmitryVisuals]

Доброго времени суток, программисты! Вопрос у меня в следующем: не работает Application.MessageBox в среде Delphi XE2, в файле проекта пишу:

program Project1;

uses
  FMX.Forms,
  Unit1 in 'Unit1.pas' {Authorization},
  Unit2 in 'Unit2.pas' {Form2},
  FMX.Dialogs;

{$R *.res}

begin
 if Tform2.Execute then
  begin

  Application.Initialize;
  Application.CreateForm(TAuthorization, Authorization);
  Application.CreateForm(TAuthorization, Authorization);
  Application.CreateForm(TForm2, Form2);
  Application.Run;

  end
 else
 begin

  application.messagebox(' ');

 end;
end.

компилятор в ответ: [DCC Error] Project1.dpr(25): E2003 Undeclared identifier: 'messagebox'
Заранее благодарен за помощь

[FaTaL]

Кончено. MessageBox это виндовое окно. Добавь в uses модуль Windows и всё будет хорошо.

[DmitryVisuals]

Добавил, но снова не вышло: 'TApplication' does not contain a member named 'messagebox'.

[FaTaL]

Стоп. У Вас случайно не FireMonkey проект? Если да, то извиняйте. Никогда на этой платформе не писал.

[Stilet]

ShowMessage() взамен виндовой messagebox не подходит?

[DmitryVisuals]

Да, проект FireMonkey.

Большое спасибо, ShowMessage() работает)

[XerSon]

MessageDlg('Бла бла бла',TMsgDlgType.mtInformation,[TMsgDlgBtn.mbOK],0)

[Utkin]

Да, проект FireMonkey.

У него своя классификация юнитов. Попробуйте также вместо Windows в uses забахать FMT.Windows или какая там приставка (посмотрите в своем uses, счас дельфи не под рукой). Если не проканает - не судьба и только ShowMessage(). Файермонки постепенно отклоняется от имен VCL и Эмбекадеро всем своим видом показывает, что намерена отказаться от VCL в будущем в пользу FM.