Forum: Netzwerke
Delphi
by rubooo,
8. Jun 2005
ja danke :wall: ! SW_hide hab ich mittlerweile auch rausgefunden ! :P
aber zu meinem eigentlichen problem ... wie kann ich mir anzeigenlassen was auf dem remotet pc passiert ?!
also wenn ich z.b. mit dem befehl ein (unsichtbare :oops: ) shell ausführe:
ShellExecute(Application.Handle, 'open', PChar(SysUtils.GetEnvironmentVariable('COMSPEC')),
PChar('/C dir'), nil, SW_HIDE);
...
Forum: Netzwerke
Delphi
by rubooo,
6. Jun 2005
ich will eine art telnet server coden ! daher soll die shell nicht sichtbar sein ! :cyclops:
un zwar soll er im meinem kleinen heimnetzwerk installiert werden :-D !
Forum: Netzwerke
Delphi
by rubooo,
6. Jun 2005
procedure TForm1.FormCreate(Sender: TObject);
begin
IdTCPServer1.Active := True;
Application.ShowMainForm := false;
end;
procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread);
var user,passwort:String;
begin
user:= athread.connection.readln;