Danke für die antwort. Es funktioniert jetzt wieder mit folgendem code:
Delphi-Quellcode:
var
CMPSGRAPH: TGauge;
procedure TForm1.FormCreate(Sender: TObject);
begin
//TGauge erstellen
CMPSGRAPH := TGauge.Create(self);
CMPSGRAPH.Parent := GroupBox7;
CMPSGRAPH.Top := 17;
CMPSGRAPH.Left := 3;
CMPSGRAPH.Height := 141;
CMPSGRAPH.Width := 147;
CMPSGRAPH.MinValue := 0;
CMPSGRAPH.MaxValue := 360;
CMPSGRAPH.ShowText := false;
CMPSGRAPH.SendToBack;
CMPSGRAPH.Kind := gkPie;
CMPSGRAPH.ForeColor := clNavy;
CMPSGRAPH.Visible := True;
CMPSGRAPH.Show();
end;
Jetzt hab ich aber um die Gauge noch einen schwarzen rand der vorher nicht da war. Ich finde auch keine Eigenschaft die das wech macht. Hab schon n paar sachen probiert finde aber nichts was daran schuld ist. Hat dazu vielleicht noch jemand ne idee ?