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