2 Schritte sind notwendig, um dies zu erreichen:
(1) Bei jeder Komponente, die über diese Einstellung verfügt, muss "FlatStyle" auf "System" gestellt werden. Rahmen in dem jeweiligen Design erhält man, wenn den BorderStyle (wenn vorhanden) auf fixed3D einstellt.
(2) Dann muss folgender Code in der Projektdatei verwenden werden:
Delphi-Quelltext
1: 2: 3: 4: 5:
| begin Application.EnableVisualStyles; Application.DoEvents; Application.Run(TMainForm.Create); end. |
Der zweite Befehl behebt einen Bug, der dazu führt, dass in der Winforms-Toolbar die Icons nicht angezeigt werden, wenn die VisualStyles aktiviert werden.
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".