Einzelnen Beitrag anzeigen

mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.851 Beiträge
 
Delphi 11 Alexandria
 
#22

Re: problem mit else nach end

  Alt 20. Feb 2008, 21:38
Die scheinen aber nicht zu passen:

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
1 begin 2 ends
Markus Kinzler
  Mit Zitat antworten Zitat