Показать сообщение отдельно
  #2  
Старый 05.01.2013, 12:02
Аватар для RusMaXXX
RusMaXXX RusMaXXX вне форума
Начинающий
 
Регистрация: 01.10.2008
Сообщения: 138
Версия Delphi: 7
Репутация: 21
Лампочка

попробуй так:

Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.BorderStyle := bsNone;       // без заголовка окна
  Form1.WindowState := wsMaximized;  // окно во весь экран
  Form1.Position := poScreenCenter;  // центровка формы
end;
__________________
уволен в запас!!!
Ответить с цитированием