Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.036 c
15-1190042730
Nikfel
2007-09-17 19:25
2007.10.14
Как пользоваться китайскими палочками.


15-1190081676
Slider007
2007-09-18 06:14
2007.10.14
С днем рождения ! 18 сентября 2007 вторник


2-1190362660
Анна
2007-09-21 12:17
2007.10.14
иконка в Tray


9-1161443298
Xdebugger
2006-10-21 19:08
2007.10.14
ODE


15-1190033368
x.pro
2007-09-17 16:49
2007.10.14
Какой сканер штрих-кодов (фирма, марка) купить?