Senha por SOCKETS!

Delphi

18/07/2003

Preciso o seguinte:

Tenho um EDIT no form CLIENTE, e outro edit no form SERVIDOR. O servidor digita em seu respectivo EDIT uma senha, o caso ´123´. Aí preciso que quando o cliente for se conectar no servidor, o servidor exija do cliente a senha que foi digitada em no edit do servidor, ai se o cliente digitou ´123´ no edit do cliente aí sim o cliente se conecta ao servidor. ISTO TUDO É VIA SOCKET´s.

COMO FAZER ISSO ?

Rodrigo!


Ropesca

Ropesca

Curtidas 0

Respostas

R3yz0r

R3yz0r

18/07/2003

æ infelizmente tbm não sei como fazer isso, mas estou procurando na web material sobre conexões e talz....e seu encontrar eu posto aki.
E se tu encontrar poste aki tbm para eu saber como ki se faz hehehe

Falow e boas compilações!! :)


GOSTEI 0
Robotizar

Robotizar

18/07/2003

olha eu aqui te respondendo de novo
espero q esteja respondendo certo
faz o seguinte
no evento on connect do cliente ponha tipo assim
cliente.socket.sendtext(editSenha.text);

crie uma variavel global pra naum ficar repetindo isso toda hora depois de logado e pra naum dar erro
logado: boolean

e no evento on cliente read do server coloque
var
confere: integer;
begin
if logado = false then
begin
confere:= strToInt(socket.reciveText);
if confere <> editSenhaCerta.text then
server.close
else
logado = true;

pronto acho q é isso
olha naum to com o delphi aberto então algum comando deve estar errado mais da para entender


GOSTEI 0
POSTAR