Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Полноэкранный режим

Автор: pomogite 7.1.2010, 23:22

Код


SendMessage (Handle, WM_SYSCOMMAND, SC_ZOOM, 0);

Не помогает =(

Код


Left:= 0;
Top:= 0;
Height:= Screen.Height;
 Width:= Screen.Width;

это тоже =( Форма висит в левом верхнем углу и все =(
кто подскажет как маштабировать форму на весь экран? неважно с окном трея или нет

Автор: Данкинг 7.1.2010, 23:34

Код


BorderStyle:=bsNone;
WindowState:=wsMaximized;

Автор: pomogite 7.1.2010, 23:42

Данкинг, Спасибо smile

Теперь как в ней "обоину" растянуть? =) И элементы расположенные на ней?

Автор: Данкинг 8.1.2010, 00:03

Цитата(pomogite @ 7.1.2010, 23:42

)

Теперь как в ней "обоину" растянуть? =)

Привязывать к размерам формы, а как ещё. smile

Вот у меня нечто такое было:

Код


procedure TForm2.FormCreate(Sender: TObject);
begin
image1.Width:=screen.Width;
image1.height:=screen.height;
form2.Cursor:=crNone;
end;

Автор: Keeper89 8.1.2010, 03:22

Данкинг, можно извратиться и в 1 строчку кода:

Код


image1.Align := alClient;

А по поводу элементов (на выбор):