Aqruivos INI, como manipular?

Question

:shock: Blz pessoal?estou com um problema, quando declaro o uma variavel do tipo TIniFile o programa me retorna um erro :[color=red:7b4d5691bd][Error] uTeste.pas(28): Undeclared identifier: �TIniFile�...

Massuda · Answer

Faltou por IniFiles no uses da unit....

Douglasf · Answer

Valew pela dica mas continua dando erro:

Mas agora � outro: aparece o seguinte

Access violation at address 00506a98 in module �TESTE.EXE�.
isso acontece quando o Connection.Hostname vai receber o valor do arquivo.
olhe o codigo:

procedure TForm1.FormCreate(Sender: TObject);
var
IniFile : TIniFile;

begin
IniFile := TIniFile(ChangeFileExt(Application.ExeName,�.ini�));
ZConnection1.HostName:=IniFile.ReadString(�confi�,�computador�,��);
ZConnection1.User:=IniFile.ReadString(�confi�,�usuario�, ��);
ZConnection1.Protocol:=IniFile.ReadString(�confi�,�protocolo�, ��);
ZConnection1.Database:=IniFile.ReadString(�confi�,�banco�, ��);

end;

R�mulo Barros · Answer

Coloco seu c�digo no evento [b:ec322dae46]OnShow [/b:ec322dae46]do Formul�rio....

Massuda · Answer

Faltou criar o objeto TIniFile:[code:1:6261bbe6a2]var  IniFile: TIniFile;begin  IniFile := TIniFile.Create(ChangeFileExt(Application.ExeName,�.ini�)); [/code:1:6261bbe6a2]Para sua infelicidade, seu c�digo original compila sem erros, mas est� completamente errado; isto:[code:1:6261bbe6a2]var  IniFile: TIniFile;begin  IniFile := TIniFile(ChangeFileExt(Application.ExeName,�.ini�)); [/code:1:6261bbe6a2]na verdade converte uma string (resultado de ChangeFileExt) em um objeto TIniFile e por isso d� o AV.Para evitar isso no futuro, evite constru��es do tipo[code:1:6261bbe6a2]Vari�vel := Tipo(OutraVari�vel)[/code:1:6261bbe6a2]e d� prefer�ncia pela constru��o[code:1:6261bbe6a2]Vari�vel := OutraVari�vel as Tipo;[/code:1:6261bbe6a2]quando Tipo for uma classe....

Douglasf · Answer

Deu tudo certo aqui...Muito obrigado....

F�rum Aqruivos INI, como manipular? #259943