Reconhecer comandos???
16/04/2003
0
Olá,
Como posso fazer para q eu envie um comando para o meu programa e ele execute este comando.
A idéia e a seguinte,
Tem um programinha de chat dentro da pasta do delphi com os componentes INDY, esse programinha é cliente/servidor nele tem uma opções q qando vc digita ´/help ou /qualquer coisa´ ele mostra na tela umas mensagens já pre-definidas, a minha pergunta e a seguinte no componente Indy TCP/IP server exite um comando q faz ele ficar conectado/ativo, mas isso em desenvolvimento, como faço para dar este comando com o programa ja compilado tipo console.
pois mesmo ele tendo um cliente, queria diposnibilar ele por telnet , e quando eu der o comando quit ele feche a conexão isso quando o estiver conectado por um cliente de telnet qualquer.
Ex:´ /conect IPdamaquina´
Como posso fazer para q eu envie um comando para o meu programa e ele execute este comando.
A idéia e a seguinte,
Tem um programinha de chat dentro da pasta do delphi com os componentes INDY, esse programinha é cliente/servidor nele tem uma opções q qando vc digita ´/help ou /qualquer coisa´ ele mostra na tela umas mensagens já pre-definidas, a minha pergunta e a seguinte no componente Indy TCP/IP server exite um comando q faz ele ficar conectado/ativo, mas isso em desenvolvimento, como faço para dar este comando com o programa ja compilado tipo console.
pois mesmo ele tendo um cliente, queria diposnibilar ele por telnet , e quando eu der o comando quit ele feche a conexão isso quando o estiver conectado por um cliente de telnet qualquer.
Ex:´ /conect IPdamaquina´
Rood_luiz
Curtir tópico
+ 0
Responder
Posts
16/04/2003
Adilsond
procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
for i := 1 to ParamCount do
begin
if LowerCase(ParamStr(i)) = ´beep´ then
Beep
elseif LowerCase(ParamStr(i)) = ´exit´ then
Application.Terminate;
end;
end;
var
i: Integer;
for i := 1 to ParamCount do
begin
if LowerCase(ParamStr(i)) = ´beep´ then
Beep
elseif LowerCase(ParamStr(i)) = ´exit´ then
Application.Terminate;
end;
end;
Responder
16/04/2003
Rood_luiz
Colega,
Sera q poderia explicar melhor o seu código?
Desde ja agradeço
Rodolfo.
Sera q poderia explicar melhor o seu código?
Desde ja agradeço
Rodolfo.
Responder
Clique aqui para fazer login e interagir na Comunidade :)
