"MainUnit" verwenden

[iTzElKay]

Code:

unit SettingsFenster;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ExtCtrls;

type
  TSettingsForm = class(TForm)
    bckgrndPanel: TPanel;
    headingPanel: TPanel;
    farbeLabel: TLabel;
    farbeRBtn: TRadioButton;
    farbeRBtn2: TRadioButton;
    procedure farbeRBtn2Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  SettingsForm: TSettingsForm;

implementation

uses
  Projekt_Knuffel;

{$R *.dfm}

procedure TSettingsForm.farbeRBtn2Click(Sender: TObject);
begin
if farbeRBtn2.Checked then
begin
  [U]player1_1Panel.Color[/U] := $000000; // Das wird nicht erkannt
end;
end;