сделать программу на весь экран

[Killbrum]

Всем доброго времени суток! Как можна программно зделать программу на весь экран? Тоисть чтоб небыло видно панельки пуск. Как в играх Большое спасибо!

[Ozerich]

form1.width:=screen.width;
form1.height:=Screen.Height

[Crivel]

В событии создания формы напишите:

Form1.BorderStyle := bsNone;
Form1.WindowState := wsMaximized;

[Killbrum]

о! Большое вам спасибо! Очень быстро помогли!

[Killbrum]

А как программно адаптировать Размеры формы под разрешение екрана?

[Killbrum]

Вот и пожалуйста покажите где я тут ошибся?

Form3.WindowState:=wsMaximized;
Quit.Left:=Form3.Width-Quit.Width;
About.Left:=Form3.Width-About.Width;
Options.Left:=Form3.Width-Options.Width;
Start.Left:=Form3.Width-Start.Width;
Quit.Top:=Form3.Height-Quit.Height;
About.Top:=Quit.Height-Quit.Height;
Options.Top:=About.Height-Options.Height;
Start.Top:=Options.Height-Start.Height;

Суть проста. Разместить в правом нижним углу кнопки. Одна выше другой. Выходит так что... появляется 1 кнопка Старт в верху

[eoln]

About.Top:=Quit.Height-Quit.Height;

это ноль!

Quit.Top:=Form3.Height-Quit.Height;
About.Top:=Quit.Top-About.Height;
Options.Top:=About.Top-Options.Height;
Start.Top:=Options.Top-Start.Height;

[Killbrum]

Да да так и есть... извините просто я потом исправил. Сьоравно не работает... Вот полный код создания формы:

Screen.Cursors[1] := LoadCursor(hInstance, 'cursor_1');
  Screen.Cursor := 1;
  Form3.BorderStyle:=bsNone;
  form3.width:=screen.width;
form3.height:=Screen.Height;
Form3.WindowState:=wsMaximized;
Quit.Left:=Form3.Width-Quit.Width;
About.Left:=Form3.Width-About.Width;
Options.Left:=Form3.Width-Options.Width;
Start.Left:=Form3.Width-Start.Width;
Quit.Top:=Form3.Height-Quit.Height;
About.Top:=Quit.Top-About.Height;
Options.Top:=About.Top-Options.Height;
Start.Top:=Options.Top-Start.Height;

[eoln]

Что именно не работает? Какая ошибка или окно не так отображается? Проверил без первых двух строк - всё нормально

[Killbrum]

В том то и дело что все норм! Только позиции кнопок.....кхе-кхе их нету ))))) дело в том что когда я беру без максимизации окна + размера окна = разрешению екрана то у меня все супер. Кнопки там где мне надо. Но когда я вписываю

Form3.BorderStyle:=bsNone;
  form3.width:=screen.width;
form3.height:=Screen.Height;
Form3.WindowState:=wsMaximized;

То кнопок попросту нету.
Если я пишу

Start.Left:=Form3.Width-Start.Width-10;
Start.Top:=Options.Top-Start.Height-10;

то Старт выглядывает откудато снизу..... именно выглядывает. Появляется верхний край. Я не понимаю что тут не так вроде алгоритм правельный. Вроде все должно быть хорошо... но не тут то было