Problem mit if then Anweisung

[mytar]

oder so:

Delphi-Quellcode:

if not clientsocket1.Active then 
 begin
  showmessage(' Es ist noch keine Verbindung aufgebaut');// wenn die verbindung inaktiv ist möchte ich die nächste Abfrage nicht starten
 end
else
 begin
 if edit2.Text = 'Nickname'  then showmessage('Bitte deinen Nickname eingeben!') 
   else memo1.lines.add(edit2.text + ': ' + edit1.text); 
 if edit1.Text = 'Nachricht' then Showmessage('Bitte deine Nachricht eingeben!')
   else memo1.lines.add(edit2.text + ': ' + edit1.text);
 Clientsocket1.Socket.sendtext(edit2.text + ': ' + edit1.Text  );
 end;