Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Форма на весь экран [D6, Win95/98]


Страницы:   1 2

MK ©   (2002-02-16 18:28:00) 

Приветствую! Подскажите, пожалуйста, как развернуть форму на весь экран (fullscreen) и чтобы она была поверх всех.


Набережных С.   (2002-02-16 22:39:00) [21]

SetWindowPos(Handle,HWND_TOPMOST,0,0,Screen.Width,Screen.Height,0);


BorderStyle:=bsNone.


MK   (2002-02-16 22:29:00) [22]

Этот "как вариант" как раз развернет форму на весь экран, но не накроет панель задач (это и требуется).


panov (M)   (2002-02-16 22:16:00) [23]

Как вариант:
MainForm.Width := Screen.Width;
MainForm.Height := Screen.Height;

по таймеру выполнять:
SetWindowPos
SetActiveWindow
Application.Restore


MK   (2002-02-16 21:49:00) [24]

К сожалению не работает ни то не другое. Нужно, чтобы форма была поверх панели задач Windows, поверх ВСЕХ окон всех приложений. Что-то слышал про SetWindowPos, но как и его ее использовать - не знаю.


Yr2   (2002-02-16 20:55:00) [25]

еще проще: установить свойство формы WindowState:=wsMaximized;
см. также свойство Position


LLL   (2002-02-16 19:52:00) [26]

FormStyle fsStayOnTop

procedure TForm1.FormCreate(Sender: TObject);
begin
Top:=0;
Left:=0;
Height:=Screen.Height;
Width:=Screen.Width;
end;


MK   (2002-02-16 18:54:00) [27]

Забыл уточнить... Форма должна "перекрыть" панель задач Windows и окна других прог, установленных поверх остальных.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо