![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TXPManifest [D7, XP]
Димон_ © (2008-06-25 08:43:00)Подскажите можно ли использовать компонент XPManifest для определенных форм проекта ? Если его кинуть на какую ни будь форму то перерисуются все формы проекта.
Viktorious (2008-06-25 13:18:00) [1]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;
Palladin (2008-06-25 08:47:00) [2]
> можно ли использовать компонент XPManifest для определенных
> форм проекта ?
нет