Fehler... aber warum...

[Knotti2005]

Was ist hieran falsch?

Delphi-Quellcode:

procedure TForm1.SpeichernClick(Sender: TObject);
begin
  if edtRemoteHost.Text:='' or edtremoteport.Text:='' or edtnickname.Text:='' or edtlocalport.Text:= ''
  then
    showmessage('Achtung mind. 1 Eingabe fehlt...')
  else
  begin
  TcpServer1.LocalPort := edtLocalPort.Text;
  TcpServer1.Active := True;
  bitbtn1.Caption:= 'Senden';
  bitbtn1.Enabled:= true;
end;
end;

Fehler...

Zitat:

[Fehler] Unit1.pas(107): Inkompatible Typen: 'String' und 'procedure, untyped pointer or untyped parameter'
[Fataler Fehler] Project1.dpr(6): Verwendete Unit 'Unit1.pas' kann nicht compiliert werden