Deaktivieren von Styles ist relativ einfach. Jedoch muss man das pro Control tun:
SetWindowTheme(Button1.Handle, '', '');
SetWindowTheme ist deklariert in der
Unit UxTheme (zumindest in D2005); also das in die Uses rein.
Natürlich kann man sich eine Schleife für alle Controls der Formulars schreiben in der Art:
Delphi-Quellcode:
for i := 0 to ControlCount-1 do begin
if Controls[i] is TWinControl then begin
SetWindowTheme((Controls[i] as TWinControl).Handle, '', '');
end;
end;
Gruß
Lemmy