Forum: Object-Pascal / Delphi-Language
by jaenicke,
12. Mai 2010
Steht doch in dem Link aufgrunddessen ich den Versuch der Delphiübersetzung gepostet hatte:SetSystemVisualStyle('C:\Windows\resources\Themes\Aero\aero.msstyles', 'NormalColor', 'NormalSize', 0);Nur funktioniert es wie gesagt leider nicht.
Forum: Object-Pascal / Delphi-Language
by jaenicke,
11. Mai 2010
Mit der hatte ich als ich die Frage gelesen hatte schon kurz experimentiert, aber da ich XP nur noch virtuell und auf dem Laptop nutze hatte ich da nicht viel versucht. Diese Übersetzung scheint nicht korrekt zu sein:function SetSystemVisualStyle(pszFilename, pszColor, pszSize: PChar;
dwReserved: Integer): Integer; stdcall; external 'uxtheme.dll';
Forum: Object-Pascal / Delphi-Language
by jaenicke,
9. Mai 2010
Und woher weißt du denn, dass der Benutzer das will? Was passiert, wenn das Programm abstürzt, wer stellt dann das Design wieder her?
Wenn der Benutzer das will, dann kann er das auch selbst einstellen. Warum muss das Programm das machen?
Wie wäre es denn mit Skins? Also z.B. XStyleForm.