Текущий архив: 2007.10.14;
Скачать: CL | DM;

Вниз

Как обновить окно...   Найти похожие ветки 

← →
ANTPro ©   (2007-09-19 17:21) [0]

после смены стиля? К примеру WS_BORDER.

---

← →
Lacmus ©   (2007-09-19 17:37) [1]


 DrawMenuBar(Handle)


---

← →
ANTPro ©   (2007-09-19 17:59) [2]

::DrawMenuBar(pControl->Handle());
::SetWindowPos(pControl->Handle(),NULL,0,0,0,0,SWP_NOMOVE|SWP_NOOWNERZORDER|SWP_NOSIZE|SWP_NOZORDER);
::InvalidateRect(pControl->Handle(),&Rc,TRUE);
Не помогает :(

---

← →
Lacmus ©   (2007-09-19 18:07) [3]


procedure TForm65.Button3Click(Sender: TObject);
begin
 BorderStyle := bsNone;
 IncludeWindowStyle(Handle, WS_BORDER);
 ShowMessage("Stop");
 DrawMenuBar(Handle)
end;


Помогает

---

← →
ANTPro ©   (2007-09-19 18:52) [4]

> [3] Lacmus ©   (19.09.07 18:07)

Угу жаль, что в VS2005 на TWL не скомпилять :)

PS: В KOL всего-то надо

Button.Style := Button.Style or WS_BORDER;

Т.е.

::SetWindowPos(pControl->Handle(), NULL, 0, 0, 0, 0,SWP_NOACTIVATE|SWP_NOMOVE|SWP_NOSIZE|SWP_NOZORDER|SWP_FRAMECHANGED);
::InvalidateRect(pControl->Handle(),NULL,TRUE);

У меня не работает :(

---

← →
ANTPro ©   (2007-09-19 21:12) [5]

Надо было заменить pControl->Handle() на Control()->Handle() и всего-то :)

---

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

Текущий архив: 2007.10.14;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.092 c