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