Hi,
ich probiere jetzt schon den ganzen Tag mit dem blöden Indy10 rum
und komme einfach nicht damit klar. Hat jemand ne Ahnung, warum der
folgende Code nicht funktioniert? (Delphi 2005)
Hat in der Art bei Indy9 immer funktioniert.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
ans : string;
begin
Client.IOHandler.WriteLn('cmd');
ans := Client.IOHandler.ReadLn;
Memo1.Lines.Add('Client: '+ans);
end;
procedure TForm1.ServerExecute(AContext: TIdContext);
var
cmd : string;
begin
cmd := AContext.Connection.IOHandler.ReadLn;
Memo1.Lines.Add('Server: '+cmd);
AContext.Connection.IOHandler.WriteLn('abcdefg');
end;