Скачать: CL | DM;

Проблема со сварачиванием окна над панелей зачач!   Найти похожие ветки 

← →
HolyMan ©   (2004-01-19 00:20) [0]

Првиет всем! я нашел пример реализации такой фичи на Си...вот так оно выглядит....

void __fastcall TForm1::CreateParams(TCreateParams &Params)
{
TForm::CreateParams(Params);
Params.ExStyle |= WS_EX_APPWINDOW;
Params.WndParent = GetDesktopWindow();
}

Теперь перегоняю это все в Делфи...

P.ExStyle := WS_EX_TOOLWINDOW;
p.WndParent := GetDesktopWindow();

Пишет "Параметр зада неверно"...в чем дело?
Спасибо за ответ.

---

← →
Piter ©   (2004-01-19 00:42) [1]

А я вот не телепат, к сожалению. И я не понял, что ты хочешь сделать.

И что такое p ?

---

← →
HolyMan ©   (2004-01-19 02:28) [2]

Я хотел бы сварачивать мое приложение не обычным способом а в место над пуском как MDI окна.
procedure TForm1.CreateParams(Params:CreateParams)
begin
Params.ExStyle := WS_EX_TOOLWINDOW; // тут ошибка
Params.WndParent := GetDesktopWindow();
end;
Ошибка: не правильно указан параметр
в чем может быть дело? Может кто то уже тако дела поделитесь опытом...
Спасибо.

---

← →
Warlock ©   (2004-01-19 11:49) [3]

Обрати внимание на Params.ExStyle |= WS_EX_APPWINDOW;

В Дельфи это
Params.ExStyle:= Params.ExStyle or WS_EX_APPWINDOW;

---

← →
HolyMan ©   (2004-01-19 23:05) [4]

Не работает...
если сделать так как скзали:
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
Params.WndParent := GetDesktopWindow();

то при запуске программы на панеле появляються два окна Projecr и Form1 и Form1 вообще не сварачиваеться...

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.018 c