Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.07.27;
Скачать: CL | DM;

Вниз

TXPManifest   Найти похожие ветки 

 
Димон_   (2008-06-25 08:43) [0]

Подскажите можно ли использовать компонент XPManifest для определенных форм проекта ? Если его кинуть на какую ни будь форму то перерисуются все формы проекта.


 
Palladin ©   (2008-06-25 08:47) [1]


> можно ли использовать компонент XPManifest для определенных
> форм проекта ?

нет


 
Viktorious ©   (2008-06-25 13:18) [2]

XPManifest задает режим отображения форм для всего приложения.

Чтобы отключить для какого-то компонента XP-style прорисовку, надо вызвать

SetWindowTheme(CompHandle,"","");//CompHandle - хэндл компонента, например Edit1.Handle,...


Учтите, что для каждого компонента надо вызывать эту функцию отдельно.

Таким образом, чтобы отключить визуальные стили для конкретной формы, надо при создании формы (FormCreate) вызвать такой код:

procedure TForm9.FormCreate(Sender: TObject);
var
  i: Integer;
begin
 for i := 0 to ComponentCount - 1 do
  if Components[i] is TWinControl then
   SetWindowTheme(TWinControl(Components[i]).Handle,"","");

end;



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

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

Наверх




Память: 0.47 MB
Время: 0.023 c
2-1214313276
implementation
2008-06-24 17:14
2008.07.27
Двойной клик по фиксированной ячейке в TStringGrid.


15-1213086652
Alexander
2008-06-10 12:30
2008.07.27
DBGrid с поддержкой Unicode


2-1214563180
cvg
2008-06-27 14:39
2008.07.27
Почему при сравнении элементов массива компилятор выдает ошибку?


3-1202821453
lead-in
2008-02-12 16:04
2008.07.27
минимальная БД


9-1171983109
Kav
2007-02-20 17:51
2008.07.27
smd2v12-src большая модель приводит к Out of memory