Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by SaFu,
18. Jan 2007
Achso Falls du es bemerkt hast musst du das auf jeder Form.Creat einfügen zur richtigen darstellung.
procedure TForm1.FormCreate(Sender: TObject);
var i: integer;
begin
for i:=0 to ComponentCount-1 do
if Components is TPanel then (Components as TPanel).ParentBackground:= False;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by SaFu,
17. Jan 2007
Uses ....XPMan;
type
TForm1 = class(TForm)
.
.
.
XPManifest1: TXPManifest;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by SaFu,
17. Jan 2007
Versuchsmal damit
procedure TForm1.FormCreate(Sender: TObject);
var i: integer;
begin
for i:=0 to ComponentCount-1 do
if Components is TPanel then (Components as TPanel).ParentBackground:= False;
end;