Fórum Criptografia de TStringList ??? Como fazer? #319475
19/04/2006
0
Tenho uma aplicaçao e gostaria de saber como criptografar pra trabalhar com Tstringlist?
var
Linhas:TStringList;
a : String;
.
.
.
Linhas:=TStringList.Create;
Linhas.Add(´-------------- [Dados Clientes] --------------------------´);
Linhas.Add(´!´+´[Nome].....: ´ +Edtnome.Text +´´);
Linhas.Add(´!´+´[Idade]......: ´ +EdtIdade.Text +´´);
Linhas.Add(´!´+´[End].....: ´ +EdtEnd.Text +´´);
Linhas.Add(´!´+´[Bairro].....: ´ +Edtbairro.Text +´´);
Linhas.Add(´!´+´[CEP]...: ´ +edtcep.Text +´´);
Linhas.Add(´!´+´-------------------------------------------´);
except end;
a:=funcaoCriptoqualquer(Linhas); /// como eu faço isto
var
Linhas:TStringList;
a : String;
.
.
.
Linhas:=TStringList.Create;
Linhas.Add(´-------------- [Dados Clientes] --------------------------´);
Linhas.Add(´!´+´[Nome].....: ´ +Edtnome.Text +´´);
Linhas.Add(´!´+´[Idade]......: ´ +EdtIdade.Text +´´);
Linhas.Add(´!´+´[End].....: ´ +EdtEnd.Text +´´);
Linhas.Add(´!´+´[Bairro].....: ´ +Edtbairro.Text +´´);
Linhas.Add(´!´+´[CEP]...: ´ +edtcep.Text +´´);
Linhas.Add(´!´+´-------------------------------------------´);
except end;
a:=funcaoCriptoqualquer(Linhas); /// como eu faço isto
O4pr3ndiz
Curtir tópico
+ 0
Responder
Posts
19/04/2006
Paulocesar1301
Coloque [b:ee9e82e14d].Text[/b:ee9e82e14d] após a váriável TStrings
e o caminho inverso para descriptografar:
Abraços e Bons Códigos :wink:
a:=funcaoCriptoqualquer(Linhas.Text);
e o caminho inverso para descriptografar:
Linhas.Text :=funcaoDesCriptoqualquer(a);
Abraços e Bons Códigos :wink:
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)