Brauche hilfe bei tlntsend

[snow]

Hallo

ich hab vor einen Telenet-clienten zu bastelen (ich will kein weiteres Rad erfinden sondern brauch telnet um auf ein anderes Server-prog zuzugreifen.)

So ich hab schon Tlntsend, synautil und blcksock eingebaut.

Ich weis nur leider nicht wo ich eventuell noch etwas reinschreiben muss... Bei type oder irgendwo anders fehlt wohl noch eine verknüpfung.

Delphi-Quellcode:

uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Buttons,
  StdCtrls, tlntsend, Spin;   


......


procedure TForm1.Button1Click(Sender: TObject);
var
  FTargetHost: String;
  FTermType: String;
  FTargetPort: LongInt;
begin
FTargetHost:=Edit1.text;
FTargetPort :=SpinEdit1.Value;
FTermType := 'test';
FSock.Connect(FTargetHost, FTargetPort);

end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  FSock.CloseSocket;
end;

das ist alles was ich editiert hab.....


beim kompiliern kommt vogendes:

Zitat:

DDW.pas(44,1) Error: Identifier not found "FSock"
DDW.pas(44,14) Error: Illegal expression
DDW.pas(44,14) Fatal: Syntax error, ";" expected but "(" found

was muss ich tun?? damits läuft und hab ich voher irgendetwas falsch gemacht???

MfG snow

PS: ich hab lazarus und nutze synapse

[marabu]

Hallo,

die Fehlermeldung sagt es dir ganz deutlich: FSock ist keine Form-Variable und auch keine globale Variable und deshalb nicht erreichbar.

Wo hast du FSock denn deklariert?

Grüße vom marabu