![]() |
|
|
#2
|
||||
|
||||
|
можно путем "отключения" тем для каждого контрола на форме.
Код:
uses UxTheme; procedure TForm1.FormCreate(Sender: TObject); begin InitThemeLibrary; SetWindowTheme(Button1.Handle, nil, ''); SetWindowTheme(Memo1.Handle, nil, ''); end; |