Jean44
Messages postés26Date d'inscriptionmardi 25 février 2003StatutMembreDernière intervention27 juin 2003
-
10 juin 2003 à 17:27
lguez
Messages postés33Date d'inscriptionjeudi 31 janvier 2002StatutMembreDernière intervention26 juillet 2003
-
12 juin 2003 à 10:59
Bonjour,
Il semble qu'avec Delphi 7, le TIniFile pose des problèmes.
Si je fais un S := IniFile.ReadString('Groupe', 'Clef', 'ValeurParDefaut') c'est toujours 'ValeurParDefaut' qui est retourné dans S. Alors que :
1- Le fichier Ini est correctement ouvert
2- Le 'Groupe' existe bien
3- La 'Clef' existe et est égale à une valeur bien définie.
Ce code tournait parfaitement sous Delphi 6, 5, 4.
(Je m'en sert pour gérer les messages de l'interface en fonction de la langue de l'utilisateur.)
Est-ce que quelqu'un a déjà eu ce genre de soucis ?
ou encore mieux... trouvé la parade ?
lguez
Messages postés33Date d'inscriptionjeudi 31 janvier 2002StatutMembreDernière intervention26 juillet 2003 12 juin 2003 à 10:10
J'utilise D7 et n'ai pas eu de problème avec TIniFile tu peux regarder le source (Carnet d'adresses sous Access déposé le 09/06/03 ) dans la rubrique base de données, le module à regarder est : UnitConf.pas).
une des proc est par example:
function TFrmConf.lit_psswd(nom:string): string;
var
AppIni: TIniFile;
begin
AppIni := TIniFile.Create(ExtractFilePath(Application.ExeName)+'Setup.ini');
result := AppIni.ReadString('Login', nom,'');
AppIni.Free;
end;
au début j'avais mis à la place de '' (3eme parametre 'C:\' et il n'y avais pas de pb.
Vérifie bien ton fichier ini (acces, rubrique et cle.)
Jean44
Messages postés26Date d'inscriptionmardi 25 février 2003StatutMembreDernière intervention27 juin 2003 12 juin 2003 à 10:48
Merci lguez,
ça marche nickel maintenant. En fait, j'avais oublié de fournir le Path de mon fichier Ini à la fonction Create. Curieux comme comportement car D7 ne renvoie aucune erreur.