Версия для печати темы

Автор: Tan 3.03.2007 15:55

Добрый день, у меня следующий вопрос: в моей программе при вызове процедуры ShowMessage название окна этой процедуры совпадает с названием проекта. Как можно не меняя названия проекта изменить название окна этой процедуры ???

Автор: volvo 3.03.2007 16:06

Никак... Пользуйся

  MessageBox(0, 'Сообщение', 'Заголовок', MB_OK);

Добавлено через 2 мин.
P.S. Вот такой способ может быть, но... Некрасиво как-то...

procedure TForm1.Button3Click(Sender: TObject);
var s: string;
begin
  s := Application.Title;
  Application.Title := 'new';
  ShowMessage('test');
  Application.Title := s;
end;

Автор: Tan 3.03.2007 16:10

спасибо !!! очень радует скорость ответов на вашем форуме.