Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.05.03;
Скачать: [xml.tar.bz2];

Вниз

Full Screen Mode   Найти похожие ветки 

 
Orion ©   (2009-03-23 15:32) [0]

Добрый день, господа профессионалы.

Подскажите пожалуйста решение вот такой вот проблемы.
Нужно с некоторой начальной формы выполнить создание другой и развернуть ее на весь экран, так сказать в "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 ни по какому-либо другому событию развернуть ее не удается. Выскакивает ошибка доступа к памяти с каким-то там адресом.

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


 
clickmaker ©   (2009-03-23 15:38) [1]

> Form2

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


 
Сергей М. ©   (2009-03-23 15:43) [2]

Казалось бы, причем тут Full Screen Mode ?

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

ShowMessage(Form2.Name);


> Orion


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


 
tesseract ©   (2009-03-23 16:09) [3]


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

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


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


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


Можно.


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


Создана.


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


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

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


 
Anatoly Podgoretsky ©   (2009-03-23 16:58) [6]

> Orion  (23.03.2009 15:32:00)  [0]

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


 
alexander-rsh ©   (2009-03-24 13:28) [7]

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

{писать в OnCreate}


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


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

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


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


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

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



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2009.05.03;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.006 c
2-1237379034
madmech
2009-03-18 15:23
2009.05.03
Хинты в DBGrid


15-1235329550
Б
2009-02-22 22:05
2009.05.03
Где можно скачать справку по DirectDraw?


15-1236029401
Юрий
2009-03-03 00:30
2009.05.03
С днем рождения ! 3 марта 2009 вторник


2-1238013715
mreg
2009-03-25 23:41
2009.05.03
Не удается вывести изображение на форму Без VCL!


15-1235925203
kami
2009-03-01 19:33
2009.05.03
Потери скорости при соединении через несколько модемов





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский