TPNGBitBtn und XPStyle

[Die Muhkuh]

Hi,

ich hab hier ein komisches Phänomen. Ich hab mir von www.thany.org die PNG-Komponenten runtergeladen. Da ich ja TD benutze, muss ich mein Zeugs dynamisch erzeugen, soweit kein Problem.

Auch PNG lassen sich darauf anzeigen etc. pp. Das Problem ist jetzt nur folgendes:

Trotz einbinden des XPMan, hat der Button kein XP-Style. Was allerdings noch komischer ist: Wenn Detlef (DeddyH) einen Button dynamisch mit Delphi7 erzeugt, hat der XPStyle. Bei mir (TurboDelphi) nicht.

Er compiliert zwar unter XP und ich unter Vista, aber wenn ich meine Exe auf einem XP-PC ausführe, hat der Button kein XPStyle.

Jetzt stellt sich mir die Frage, wie ich den Button in XPStyle hinbekomme. Hat jemand eine Idee?

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, pngbitbtn, xpman, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    PNG: TPNGBitBtn;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  PNG := TPNGBitBtn.Create(Self);
  PNG.Parent := Self;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  PNG.Free;
end;

end.

[Die Muhkuh]

Jetzt wird's immer besser. Detlef hat mir seine Exe geschickt, in welcher der PNGBitBtn im XP-Style drin ist.

Liegt es nun an meiner TurboDelphi-Version oder das ich unter Vista kompiliere, dass bei mir der PNGBitBtn nicht im XP-Style ist?

[Die Muhkuh]

Nochmal ich...

Hab das Problem gefunden.

Es gibt eine Inklude-Datei, in der die Switches für die Delphi-Versionen drinne stehen und eben auch, ob es Theme-Support gibt. Da die switches aber schlecht sind bzw. zu alt, wird TurboDelphi nicht erkannt und demnach wird kein Theme-Support eingeschaltet.

Hab nun den Switch direkt in die PNG-Button reinkopiert und schwupps, da haben wir den XP-Style...

[DeddyH]

Schwere Geburt :zwinker:

[Die Muhkuh]

Zitat:

Zitat von DeddyH

Schwere Geburt :zwinker:

Komm erstmal auf so ne doofe Inklude-Datei. :mrgreen:

Aber Du hast auch ganz schön gerätselt ;-)