Hänge bei units und umsetzung fest

[stahli]

wenn Du den Abschnitt nur behandeln willst wenn Limit gewählt ist:

Delphi-Quellcode:

procedure Tfenster_frm.limit_radiobtnClick(Sender: TObject); 
var 
   limit : integer; 
begin 
  IF limit_radiobtn.Checked THEN 
  begin
    limit := StrToInt(limit_edt.Text);
    IF limit = punkte_2 THEN    
      ShowMessage('Winner ist (game2_edt.Text)') 
    ELSE 
    begin // hier muss kein begin+end, ist aber übersichtlicher nach dem else
      IF limit = punkte_1  THEN 
        ShowMessage('Winner ist (game1_edt.Text)');
    end;
  END; 
  limit := 0; 
end;

Wenn der Abschnitt immer durchlaufen werden soll:

Delphi-Quellcode:

procedure Tfenster_frm.limit_radiobtnClick(Sender: TObject); 
var 
   limit : integer; 
begin 
  IF limit_radiobtn.Checked THEN 
    limit := StrToInt(limit_edt.Text);
  else
    limit := 12345; // sonst inst unklar, welcher Wert in Limit steht!
   IF limit = punkte_2  THEN    
...

stahli