Color-Problem

[S2B]

Hi,
ich möchte die Farbe meiner Formen auf einmal mit einem Befehl ändern können. Konkret heißt das:

Delphi-Quellcode:

 procedure ColorChange(var Color: TColor);
begin
  Form1.Color:=Color;
  Form5.Color:=Color;
  Form1.Panel1.Color:=Color;
  Form10.Shape1.Brush.Color:=Color;
end;

aber wenn ich dann eine Color so "eintrage"

 ColorChange($00984E00); dann kommt der Fehler

Code:

 Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen

Was mache ich falsch?

[MathiasSimmack]

Nimm das var aus dem Prozedurkopf raus:

Zitat von S2B:

 procedure ColorChange(var Color: TColor);

Lass es entweder ganz weg, oder mach ein const draus.

[S2B]

Danke für die schnelle Antwort! Es ging natürlich...