Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Full Screen Mode [D7, WinXP]

Orion © (2009-03-23 15:32:00)
Добрый день, господа профессионалы.

Подскажите пожалуйста решение вот такой вот проблемы.
Нужно с некоторой начальной формы выполнить создание другой и развернуть ее на весь экран, так сказать в "full screen". Выполнять это надо, скажем по нажатию кнопки:

procedure TForm1.Button1.Click
begin
Form2:=TForm2.Create(Application);
Form2.ShowModal; // Ну или просто Form2.Show
end;

После этого созданную форму нужно развернуть по принципу:

Form2.Height:=Screen.Height;
Form2.Width:=Screen.Width;
Form2.BorderStyle:=bsNone;
Form2.Left:=0;
Form2.Top:=0;

желательно по событию OnCreate.

НО. Дело в том что ни по OnCreate ни по какому-либо другому событию развернуть ее не удается. Выскакивает ошибка доступа к памяти с каким-то там адресом.

Подскажите, в чме дело. Заранее спасибо.

Плохиш (2009-03-24 13:56:00) [1]

> Плохиш © (24.03.09 13:49) [8]

+
Код не выполняет того, что некоторые от него хотят.

Плохиш (2009-03-24 13:49:00) [2]

> alexander-rsh © (24.03.09 13:28) [7]
>
> Form2.BorderStyle:=bsNone;

Access Violation в общем случае.

alexander-rsh (2009-03-24 13:28:00) [3]
Form2.BorderStyle:=bsNone;
Form2.Left:=0;
Form2.Top:=0;
Form2.Width:=Screen.Width;
Form2.Height:=Screen.Height;
Form2.FormStyle:=fsStayOnTop;

{писать в OnCreate}

Anatoly Podgoretsky (2009-03-23 16:58:00) [4]
> Orion (23.03.2009 15:32:00) [0]

Форма без границ + Maximaze

Плохиш (2009-03-23 16:23:00) [5]

> Туда нельзя засовывать операции с формой. Она же ещё не
> создана.

Врать не хорошо.

Сергей М. (2009-03-23 16:16:00) [6]

> Туда нельзя засовывать операции с формой

Можно.

> Она же ещё не создана

Создана.

tesseract (2009-03-23 16:09:00) [7]

> После этого созданную форму нужно развернуть по принципу:
>
>
> Form2.Height:=Screen.Height;
> Form2.Width:=Screen.Width;
> Form2.BorderStyle:=bsNone;
> Form2.Left:=0;
> Form2.Top:=0;
>
> желательно по событию OnCreate.

Туда нельзя засовывать операции с формой. Она же ещё не создана. Тут можно только всякие объекты создавать.

Сергей М. (2009-03-23 15:43:00) [8]
Казалось бы, причем тут Full Screen Mode ?

Те же самые грабли шлепнут по тому же самому лбу даже при попытке лицезреть совсем, казалось бы, безобидное свойство

ShowMessage(Form2.Name);

> Orion

Ты не находишь что так оно и есть ?)

clickmaker (2009-03-23 15:38:00) [9]
> Form2

это что за переменная? где объявлена?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »