Fórum Gravando uma string em uma variável #195054

14/11/2003

0

Como faço para armazenar uma string em uma váriavel x, de modo que se o seu valor for alterado em tempo de execução, esse novo valor fique
gravado no lugar do antigo, mesmo depois que o progama é encerrado, para que essa string poder ser usada como password?


Coelhopirado

Coelhopirado

Responder

Posts

14/11/2003

Pedro Dias

Eu fiz algo parecido, guardo as informações personalizada por usuário.

Ou vc trabalha com arquivo texto
ou com uma tabela de banco de dados.

Dentro do executável nunca vi falar..


Responder

Gostei + 0

20/11/2003

Ricardo.vano

Crie uma tabela com dois campos: nome e senha.

Depois faça a busca do nome e senha que a pessoa digitar na tabela criada da seguinte forma:

procedure TFormLogin.ButtonOKClick(Sender: TObject);
var
Nome, Senha: string;
begin
EditNome.SetFocus;
Nome := EditNome.text;
Senha:= EditSenha.Text;
DataModule.TabelaDeSenhas.Open;
if DataModule.TabelaDeSenhas.Locate(´User_Name;Senha´,
VarArrayOf([Nome,Senha]),[]) then
begin
Application.CreateForm(TFormPrincipal, FormPrincipal);
FormLogin.Visible:= False;
end
else
Showmessage(´Nome ou senha incorreta!´);

este código deve ser inserido no botão OK do formulário em que o usuário deverá digitar a senha. O método Locate busca o nome digitado dentro da TabelaDeSenhas. Se encontrar cria o formulário principal do programa. Se não encontrar, emite um aviso informando não ter encontrado.

Espero ter ajudado... :D


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar