Verzweigung

[CR3ATiV3]

Hallo ich weiß leider nicht mehr weiter! Ich bin so schlecht in Quelltext erstellen, weil ich nicht weiß was ich da immer einsetzen soll ...
Ich habe ja da schon etwas versucht, aber mein Lazarus zeigt mir Fehler an! ...

Was will ich eigentlich machen, fragt ihr euch bestimmt?! ..
Ich möchte eine Verweigung einsetzen, wenn ich auf einen RadioButton klicke, dass dann im EditFeld richtig bzw. Falsch angezeigt wird!

Ja aber bei der Umsetzung harperts leider
ich hoffe ihr könnt mir helfen?

Code:

unit Unit3; 

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
  Buttons;

type

  { TForm3 }

  TForm3 = class(TForm)
    BitBtn1: TBitBtn;
    BitBtn2: TBitBtn;
    BitBtn3: TBitBtn;
    LoesungEdit1: TEdit;
    GroupBox1: TGroupBox;
    Label1: TLabel;
    Antwort1RadioButton1: TRadioButton;
    Antwort2RadioButton2: TRadioButton;
    Antwort3RadioButton3: TRadioButton;
    Antwort4RadioButton4: TRadioButton;
    procedure Antwort1RadioButton1Change(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end; 

var
  Form3: TForm3;

implementation

{$R *.lfm}

{ TForm3 }

procedure TForm3.Antwort1RadioButton1Change(Sender: TObject);
var Eingabe : String;
begin
  if Frage = Antowrt1
  begin
  then Ausgabe.LoesungEdit1:= 'Richtig!'
end;

end.