Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Для новичков > Как сделать окно после события !


Автор: mjpg 25.6.2007, 15:16
Помогите!
Вот например нажал кнопку и произошли изменения в реестре ( это я знаю как сделать ),
а как сделать так чтобы после нажатия  выдовалось окно, что изменения произошли ( ну естественно после того как они действительно произойдут )?

Автор: pseud 25.6.2007, 15:20
Код

  MessageBox(Self.Handle, PChar('текст сообщения'), PChar('заголовок сообщения'), MB_ICONINFORMATION);

Автор: Akella 25.6.2007, 15:29
так лучше
Код

procedure TfmLogon.bOkClick(Sender: TObject);
begin
  try
    что-то делаешь
    что-то делаешь
    что-то делаешь
    что-то делаешь

    MessageBox(application.ActiveFormHandle, PAnsiChar('Изменения прошли успешно'), PAnsiChar('Внимание'), MB_ICONINFORMATION+MB_OK);
  except
     //в случае исключительной ситуации
     on e: exception do begin
        MessageBox(application.ActiveFormHandle, PAnsiChar('Изменения не прошли. Оригинальный текст ошибки: '+#13+e.message), PAnsiChar('Внимание'), MB_ICONINFORMATION+MB_OK); 
     end;
  end;//try-except
end;//procedure

Автор: gambit 25.6.2007, 21:15
Простое информационное окно можно вывести
Код

...
showmessage('Привет');

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)