problem mit else nach end

[Deltachaos]

Zitat von Apollonius:

Du solltest dir angewöhnen, deinen Code zu formatieren. Dann würdest du nämlich sehen, das du ein end; zuviel hast.

Tausend Danck für die schnelle Antwort.
Ich Honk hatte die gantze zeit gedacht ich hatte ein end zu wenig

*Freu* *Freu*

*grübel* *sicherheitskopie anleg*

Delphi-Quellcode:

begin
  if
   checkBox3.Checked
  then
   If
    ( Trim(Edit2.Text) <> '' ) //Prüft ob edit2 leer ist
   Then
//Player on Server Banner
     //Wen nicht leer
    Writeln(F, '[center][url=http://www.gametracker.com/server/' + IP + ':' + port + '/player/' + clan_tag + '%20' + name + '/][img]http://cache.www.gametracker.com/player/'+ clan_Tag + '%20' + name + '/' + IP + ':' + port + '/b_560x95.png[/img][/url][/center]')
   else
    //wen leer
    Writeln(F, '[center][url=http://www.gametracker.com/server/' + IP + ':' + port + '/player/' + name + '/][img]http://cache.www.gametracker.com/player/' + name + '/' + IP + ':' + port + '/b_560x95.png[/img][/url][/center]')
   end;
  end;
else

 begin
  if
   form1.CheckBox1.Checked
  then
//Server Banner
     Writeln(F, '<p align="center">[url="http://www.gametracker.com/server_info/' + IP + ':' + port + '/"][img]http://cache.www.gametracker.com/server_info/' + IP + ':' + port + '/b_350x20_C692108-381007-FFFFFF-000000.png[/img][/url]</p>');
end;

[Fehler] Unit1.pas(169): Deklaration erwartet, aber 'ELSE' gefunden
kleine frage wie löse ich dieses problem?