Главная страница
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.022 c
2-1190465938
Виктор007
2007-09-22 16:58
2007.10.14
Помогите перевести из C в Delphi


6-1171264410
vasilii_terkin
2007-02-12 10:13
2007.10.14
Проблема с приложением клиент/сервер


15-1189955101
master_asasin
2007-09-16 19:05
2007.10.14
Подключение


15-1190041249
Cyrax
2007-09-17 19:00
2007.10.14
7-Zip: чем написан ?


15-1189659867
жук_
2007-09-13 09:04
2007.10.14
жук