Manipulacao de TXt
Eu to precisando de ajuda com manipulaçao de arquivo txt, eu to com o seguinte problema eu criei uma rotina e adicionei os dados no meu txt (Usando record) para cadastro de usuarios, so q nao sei como faço pra criar uma rotina q verifica se o usuario tem permissao de admin pra poder adicionar usuario e depois q verificar q tem adicionar no arquivo os dados do novo usuario , caso contrario avisar q o usuario nao tem permissao
Kenshinhimura
Curtidas 0
Respostas
Aroldo Zanela
01/07/2005
Colega,
Coloque um fragmento do código para que possamos avaliar melhor. Normalmente utilizamos ´Shadow login´ por meio de uma tabela no próprio banco de dados, mas é preciso avaliar seu código para entender exatamente o seu problema.
Coloque um fragmento do código para que possamos avaliar melhor. Normalmente utilizamos ´Shadow login´ por meio de uma tabela no próprio banco de dados, mas é preciso avaliar seu código para entender exatamente o seu problema.
GOSTEI 0
Kenshinhimura
01/07/2005
Eis aki a declaraçao dos dados a serem salvos no arquivo txt
type
User = record
Usuario: String[50];
Senha: String[10];
homedirectory: string[50];
fullname : string[50];
Flag: char; //Marca se o usuario é administrador
status: char;//MARCA SE ESTA OU NÃO DELETADO
online:char; //MARCA SE O USUARIO ESTA CONECTADO
end;
Var
Dado: User;
ArquivoSenha: file of User;
type
User = record
Usuario: String[50];
Senha: String[10];
homedirectory: string[50];
fullname : string[50];
Flag: char; //Marca se o usuario é administrador
status: char;//MARCA SE ESTA OU NÃO DELETADO
online:char; //MARCA SE O USUARIO ESTA CONECTADO
end;
Var
Dado: User;
ArquivoSenha: file of User;
GOSTEI 0
Leolopes79
01/07/2005
Já que é assim, por que não usar o objeto TINIFile? Acho que seria muito menos complicado.
GOSTEI 0
Leolopes79
01/07/2005
Ah! Esqueci... você pode usar um desses componentes de criptografia e armazenar os dados no INI de maneira segura.
GOSTEI 0
Adriano Santos
01/07/2005
Cara, pra ter uma idéia de como usar INI, segue uma receita de bolo pra você.
Declare a unit IniFiles no uses do form.
Criei duas procedures pra você ver como funciona, uma le o INI e outra grava.
procedure Leitura;
var
INI : TIniFiles;
Usuario: String;
Senha: String;
HomeDirectory: String;
begin
Ini := TIniFile.Create(´C:\MeuProjeto´);
Usuario:= Ini.ReadString(´CONFIGURACAO´,´USUARIO´,Usuario);
Senha:= Ini.ReadString(´CONFIGURACAO´,´SENHA´,Senha);
Usuario:= Ini.ReadString(´CONFIGURACAO´,´HOMEDIRECTORY´,HomeDirectory);
ShowMessage(´Usuário:´ + Usuario + #13 + ´Senha:´ + Senha + 13 + ´HomeDirectory:´ + HomeDirectory);
Ini.Free;
end;
procedure Gravacao;
var
INI : TIniFiles;
Usuario: String;
Senha: String;
HomeDirectory: String;
begin
Ini := TIniFile.Create(´C:\MeuProjeto´);
Usuario := ´Adriano´;
Senha:= ´000000´;
HomeDirectory:= ´C:\Windows\´;
Ini.WriteString(´CONFIGURACAO´,´USUARIO´,Usuario);
Ini.ReadString(´CONFIGURACAO´,´SENHA´,Senha);
Ini.ReadString(´CONFIGURACAO´,´HOMEDIRECTORY´,HomeDirectory);
Ini.Free;
end;
Ai você pode usar algum esquema de criptografia para não deixar a senha tão fácil de descobrir.
Declare a unit IniFiles no uses do form.
Criei duas procedures pra você ver como funciona, uma le o INI e outra grava.
procedure Leitura;
var
INI : TIniFiles;
Usuario: String;
Senha: String;
HomeDirectory: String;
begin
Ini := TIniFile.Create(´C:\MeuProjeto´);
Usuario:= Ini.ReadString(´CONFIGURACAO´,´USUARIO´,Usuario);
Senha:= Ini.ReadString(´CONFIGURACAO´,´SENHA´,Senha);
Usuario:= Ini.ReadString(´CONFIGURACAO´,´HOMEDIRECTORY´,HomeDirectory);
ShowMessage(´Usuário:´ + Usuario + #13 + ´Senha:´ + Senha + 13 + ´HomeDirectory:´ + HomeDirectory);
Ini.Free;
end;
procedure Gravacao;
var
INI : TIniFiles;
Usuario: String;
Senha: String;
HomeDirectory: String;
begin
Ini := TIniFile.Create(´C:\MeuProjeto´);
Usuario := ´Adriano´;
Senha:= ´000000´;
HomeDirectory:= ´C:\Windows\´;
Ini.WriteString(´CONFIGURACAO´,´USUARIO´,Usuario);
Ini.ReadString(´CONFIGURACAO´,´SENHA´,Senha);
Ini.ReadString(´CONFIGURACAO´,´HOMEDIRECTORY´,HomeDirectory);
Ini.Free;
end;
Ai você pode usar algum esquema de criptografia para não deixar a senha tão fácil de descobrir.
GOSTEI 0
Kenshinhimura
01/07/2005
Ah! Esqueci... você pode usar um desses componentes de criptografia e armazenar os dados no INI de maneira segura.
----
vc mencionou q tem componente pra criptogravar mais esqueceu de me passar o nome do componente(a aba tb ajuda). e por favor como nao manjo muito de programaçao ainda se puderem me adicionar no msn eu agradeço o pouco q sei eu compartilho com quem precisa , mais sempre to precisando de ajuda
----
vc mencionou q tem componente pra criptogravar mais esqueceu de me passar o nome do componente(a aba tb ajuda). e por favor como nao manjo muito de programaçao ainda se puderem me adicionar no msn eu agradeço o pouco q sei eu compartilho com quem precisa , mais sempre to precisando de ajuda
GOSTEI 0