Discussion :

[Draner]

Bonjour tout le monde,
J'aurais besoin d'une information.
Je cherche depuis un moment a tester si un fichier .ini existe dans le même répertoire que mon exécutable. Mais voila je ne sait plus comment faire a part faire un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
if(FileExists([Dans le répertoire de l'exécutable])
{
    Edit9->Caption = "Effacement du fichier";
}

Il me semble que l'on puisse mettre C:\\repertoire\\fichier.ini mais voila mon exécutable est pas forcément dans C: donc cette methode ne peux pas s'appliqué.

Auriez-vous par hasard une solution ?
Cordialement.

[Gilles Louïse]

Vous déclarez un AnsiString nommé FicIni que vous renseignez au moment de la construction de la l'application comme suit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

FicIni=ChangeFileExt(Application->ExeName,".INI");

Dans ces conditions, FicIni contient de nom du fichier avec son chemin en entier, vous n'avec plus qu'à faire le test où bon vous semble.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
if(FileExists(FicIni))
   {
   //ce qui se passe si le fichier .ini existe
   }

À bientôt
Gilles

[scoubi32006]

essaye d'adapter le code qui suit il marche pour un fichier *.txt

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
AnsiString Filepath;
AnsiString Filename = "Test.txt";
TStringList *Fichier = new TStringList;
//---
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
Filepath = ExtractFilePath(Application->ExeName);
}
//---
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 
AnsiString N = Filepath + Filename;
if(FileExists(N))
    {
    Fichier->LoadFromFile(N);
    }
....

bon travail.

[Draner]

Ce que je cherche c'est la racine...
La ou se trouve l'exécutable!
De cette façon je n'ai plus besoin de connaitre le lien.

[winow]

Bonjour

Tu peut avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ExtractFilePath(Application->ExeName)

ou quelque chose comme cela

A++

[Draner]

On peut vraiment utiliser cette méthode ?
Je continue a me documenté la dessus, on ne sait jamais si un jour je trouve la solution...

[Gilles Louïse]

On peut vraiment utiliser cette méthode ?
Je continue a me documenté la dessus, on ne sait jamais si un jour je trouve la solution...

Avez-vous essayé ma solution ? Elle fonctionne, je me demande bien ce que vous voulez de plus. Vous obtenez le chemin et le nom du fichier dans une variable, cette variable étant globale faisant partie de la classe principale, elle est toujours disponible, vous pouvez donc la donner à FileExists quand vous voulez, ça résout complètement la question.

À bientôt
Gilles

[Draner]

Effectivement vue comme cela!
Il faut que je test cela...
Je vous dirais ce qu'il en est alors

[Draner]

Bonsoir.
Désolé, tout d'abord, pour le double post mais quelques lignes plus loins...
J'ai tester le code de Gilles Louïse mais il m'est arrivé un phénomène étrange!

Mon fichier se nome préférences.ini et il est bien au niveau de l'executable cependant, le chemin qu'il m'indique est correcte mais pas le nom de fichier... et c'est la que ça se corse!
Si je tape le code ainsi:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
//Récupère la racine et le fichier.ini
AnsiString FichierIni;
 
FichierIni = ChangeFileExt(Application->ExeName, "preferences.ini");
 
//Test si un fchier ini existe
if(FileExists(FichierIni))
{
           Edit1->Text = "Présent";
}
else
{
           Edit1->Text = "Non présent!";
}

on a toujours "Non présent!".
Alors je me suis dit regardons de plus près le chemin pour voir si je n'avais pas fais d'erreur de codage...
j'ai donc modifier ainsi pour les tests:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
//Récupère la racine et le fichier.ini
AnsiString FichierIni;
 
FichierIni = ChangeFileExt(Application->ExeName, "preferences.ini");
 
Edit1->Text = FichierIni;

et la je me retrouve avec: "D:\Prog perso\TestIni1\Project1preferences.ini"
Mais "Project1preferences.ini" n'est pas mon fichier ini donc je ne peux pas le tester! Oops
Je suis sur que la solution n'est pas loin mais la j'avoue que je suis un peu noob pour trouver ce qui cloche...
Auriez-vous, par hasard un correctif qui permettrait de retrouvé le fichier?
Merci beaucoup, encore, pour les indications.
Cordialement.

[winow]

Bonsoir

Essaye ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
//Récupère la racine et le fichier.ini
AnsiString FichierIni;
 
FichierIni = ChangeFileExt(Application->ExeName, "\\preferences.ini");
 
//Test si un fchier ini existe
if(FileExists(FichierIni))
{
           Edit1->Text = "Présent";
}
else
{
           Edit1->Text = "Non présent!";
}

A++

[henderson]

Salut !

Et pourquoi passer par ChangeFileExt ???
L'extraction du path de l'exécutable est bien réalisée avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
AnsiString Filepath =  ExtractFilePath(Application->ExeName);

Notons que ExtractFilePath ne supprime pas le dernier anti slash...
Donc comme ici on manipule des AnsiString, on peut faire assez court :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
AnsiString Filename = Filepath + "Blabla.ini";
if( FileExists( Filename ) )
    {
    //...
    }

A plus !

[Draner]

En fait ça ne serais qu'une question de mise en forme...
Une concaténation éroné et qui me provoquerais un résultat inattendu

Petite question annexe: Quel différence y a t il entre ChangeFileExt() et ExtractFilePath() ?

Cordialement.

Edité car celà fonctionne.J'ai donc suivie ce que vous m'avez expliqué j'ai arrangé le code comme suit:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
//Récupère la racine et le fichier.ini
AnsiString FichierIni, NomFichierIni;
 
NomFichierIni = "preferences.ini";
FichierIni = ExtractFilePath(Application->ExeName) + NomFichierIni;
 
//Test si un fchier ini existe
if(FileExists(FichierIni))
{
        Edit1->Text = "Présent";
}
else
{
        Edit1->Text = "Non présent!";
}

Ceci me dis bien si le fichier existant ou pas. En plus cette méthode à l'avantage d'être directif (Il ne regarde que le fichier qu'on lui impose). Pratique en cas de panne pour renommer préférences.ini en preferences_old.ini, c'est exactement ce que je cherchais!
Merci encore une fois pour vos précisions
Cordialement.

[Gilles Louïse]

Et pourquoi passer par ChangeFileExt ???

Tout simplement parce que le nom du fichier ini est en principe le même que le nom de l'application, ainsi qu'il est souvent d'usage, il en résulte qu'il suffit de reprendre le path et le nom de l'application avec .ini en extension, d'où ce que je proposais. On obtient alors une variable complète correspondant au nom du fichier ini.

Si toutefois effectivement vous souhaitez avoir un fichier ini dont le nom ne soit pas spécifiquement celui de l'application, vous pouvez oeuvrer autrement.

Moi, j'utilise cette méthode depuis toujours et elle marche.

À bientôt
Gilles

[Gilles Louïse]

Bonsoir.
Désolé, tout d'abord, pour le double post mais quelques lignes plus loins...
J'ai tester le code de Gilles Louïse mais il m'est arrivé un phénomène étrange!

Mon fichier se nome préférences.ini et il est bien au niveau de l'executable

Vous n'avez pas suivi exactement ma syntaxe, donc ça ne marche pas. Il s'agit à partir du nom de l'application avec le chemin d'en déduire le nom du fichier ini selon l'exacte syntaxe que j'ai donnée, c'est tout.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

FicIni=ChangeFileExt(Application->ExeName,".INI");

Cette instruction vous donne dans FicIni le path et le nom du fichier ini en prenant pour hypothèse, ainsi qu'il est souvent d'usage, que le nom du fichier ini soit le même que le nom de l'application. Pour vous en convaicre, faites du pas à pas et consultez cette variable juste après qu'elle a été renseignée, vous constaterez qu'elle contient path+nom de l'application+extension ini, ainsi le test avec FileExists sera tout à fait opérationnel.

J'ai toujours procédé ainsi dans toutes mes applications depuis les origines jusqu'à nos jours.

À bientôt
Gilles