Разворачивание окна при BorderStyle = bsNone

← →
ekto © (2008-05-07 13:04) [0]

Всем привет.
Если написать
WindowsState := wsMaximazed,
то окно разворачивается, закрывая собою панель зачач.

можно так:
BorderStyle := bsSingle;
WindowsState := wsMaximazed;
BorderStyle := bsNone; ,
но чет не нравится.
Можно ли как-нть сделать по-другому, если мона, то как и почему это происходит?

← →
DVM © (2008-05-07 13:08) [1]

это не окно закрывает это панель задач прячется под окно - стандартное поведение панели задач при старте полноэкранного приложения.

← →
ekto © (2008-05-07 13:12) [2]

сори, так:

> BorderStyle := bsSingle;
> WindowsState := wsMaximazed;
> BorderStyle := bsNone; ,

выдает ошибку.

Access violation at address 7777DDC1 in module "shdocvw.dll". Read of address 00000000.

> DVM © (07.05.08 13:08) [1]

что надо сделать?

← →
DVM © (2008-05-07 13:15) [3]

> что надо сделать?

А чего ты хочешь добиться?

← →
ekto © (2008-05-07 13:21) [4]

> DVM © (07.05.08 13:15) [3]

заголовок не нужен.

Чет, сразу не подумал CreateParams нужна.

Вопрос закрыт.

← →
Knight © (2008-05-07 13:32) [5]

Что хочешь через него выставить?

← →
ekto © (2008-05-07 13:38) [6]

> Knight © (07.05.08 13:32) [5]

да, действительно, чего?
написал так:

with Params do
Style := (Style or WS_POPUP) and (not WS_DLGFRAME);

тока этож все равно получается то же самое, что и bsNone.
Что надо написать? Или ваще не так это надо делать?

← →
Anatoly Podgoretsky © (2008-05-07 13:46) [7]

> ekto (07.05.2008 13:04:00) [0]

А оно так и задумано, а по твоей задаче не надо использовать wsMaximazed

← →
{RASkov} © (2008-05-07 13:46) [8]

> [6] ekto © (07.05.08 13:38)
> Или ваще не так это надо делать?

Ты б сначало сказал бы что хочешь сделать :)

> Anatoly Podgoretsky © (07.05.08 13:46) [7]

Как надо сделать? Запомнить положение и размер формы, растянуть на экран?

Запоминать ничего не надо, надо определить координаты рабочей области рабочего стола и сделать кординаты формы равными им.

> Knight © (07.05.08 13:59) [10]

канеш, а как еще?

> Anatoly Podgoretsky © (07.05.08 13:59) [11]

да, сделал:

if fMaximized then
begin
WindowState := wsMaximized;
Height := Screen.WorkAreaHeight;
end

спасибо за помощь

Разворачивание окна при BorderStyle = bsNone Найти похожие ветки