Discussion :

[winow]

Bonjour
Je charge un ComboBox d'une liste de noms mais ces noms garde l'extension .exe et je ne veut pas du .exe, j'ai alors essayer de l'enlever avec -ExtractFileExt a ExtractFileName mais ca marche pas ((Erreur))

Il y a il un moyen d'avoir ce nom sans sont extension
Voici nom code

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 case 1:
 if(ComboBox1->Items->Strings[1] <= 0)//1
   {
   OpenDialog2->Execute();
   logregcapt->WriteString("CapturicoItems1", OpenDialog2->FileName);
   logregcapt->WriteString("NameItems1", ExtractFileName(OpenDialog2->FileName));
   ComboBox1->Items->Strings[1] = logregcapt->ReadString("NameItems1");
   }
 else if(ComboBox1->Items->Strings[1] >= 0)
   {
   Label1->Caption = "blabla";
   }
 break;

Merci et ++A

[comtention]

oupss désoler j'ai cru que tu voulais sa en basic, j'ai pris les derniers messages sans verifier le forum désolé.

[Sunchaser]

Bonsoir,
Regardes du côté du SubString(...)


//edit:
Le ReadString(...) vient d'un TRegistry ?...
De toute façon, cela doit renvoyer dans tout les cas un AnsiString ou un String, ce qui te permet d'essayer qqchose comme :

Code :

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

1
2
3
 
String S = logregcapt->ReadString("NameItems1").SubString(0, logregcapt->ReadString("NameItems1").Lenght() );
ComboBox1->Items->Strings[1] = S;

[doudoustephane]

tu dois passer par une varaible string je pense...

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
 
case 1:
 if(ComboBox1->Items->Strings[1] <= 0)//1
   {
   string temp;
   OpenDialog2->Execute();
   temp = ExtractFileName(OpenDialog2->FileName);
   temp = temp.substr(0, temp.Lenght - 4);
   logregcapt->WriteString("CapturicoItems1", OpenDialog2->FileName);
   logregcapt->WriteString("NameItems1", temp));
   ComboBox1->Items->Strings[1] = logregcapt->ReadString("NameItems1");
   }
 else if(ComboBox1->Items->Strings[1] >= 0)
   {
   Label1->Caption = "blabla";
   }
 break;

sachant que dans "temp.Lenght - 4", le 4 coorespond a ".exe" et que si l'extension change, ce n'est plus bon...
sinon, avec une recherche dans la chaine d'un ".", tu supprime tout ce qui suit le point mais pour ca, tu ne doit pas avoir de point dans le nom...

[DjmSoftware]

bomjour ,
la fonction ExtractFilePath ne produit pas d'erreur mais elle retourne l'extension du fichier ce que tu ne désire pas dans ton application

une possibilité d'utilisation est la suivante

Code :

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

1
2
3
 
AnsiString Tmp=ExtractFileName(dlgOpen1->FileName);// on extrait que le nom du fichier
Tmp=Tmp.SubString(1,Tmp.Pos(".")-1); // extraction de l'extension

cordialement

[winow]

Bonjour et MERCI a vous Tous pour vos reponses,
J'imprime vos reponses et je me met au travail.

Impecable, voici le code rectifier avec votres aide:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 case 1:
 if(ComboBox1->Items->Strings[1] <= 0)//1
   {
   OpenDialog2->Execute();
   logregcapt->WriteString("CapturicoItems1", OpenDialog2->FileName);
   AnsiString Atempic1 = ExtractFileName(OpenDialog2->FileName);
   logregcapt->WriteString("NameItems1", Atempic1.SubString(0, Atempic1.Pos(".")-1));
   ComboBox1->Items->Strings[1] = logregcapt->ReadString("NameItems1");
   }
 else if(ComboBox1->Items->Strings[1] >= 0)
   {
   Label1->Caption = "1";
   }
 break;

TRES GRAND MERCI et ++A

[doudoustephane]

bomjour ,
la fonction ExtractFilePath ne produit pas d'erreur mais elle retourne l'extension du fichier ce que tu ne désire pas dans ton application

une possibilité d'utilisation est la suivante

Code :

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

1
2
3
 
AnsiString Tmp=ExtractFileName(dlgOpen1->FileName);// on extrait que le nom du fichier
Tmp=Tmp.SubString(1,Tmp.Pos(".")-1); // extraction de l'extension

cordialement

bonjour. a mon gout, cette methode est a doubvle tranchant car, si un "." est present dans le nom du fichier, on perd tout ce quit suit...
mieux vaut dans ce cas faire je pense :

Code :

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

1
2
3
 
AnsiString Tmp=ExtractFileName(dlgOpen1->FileName);// on extrait que le nom du fichier
Tmp=Tmp.SubString(1,Tmp.Pos(".exe")-1); // extraction de l'extension

[winow]

OK et MERCI Doudouallemand je rectifi tout de suite (.exe) a la place de (*.*)

Encore un grand MERCI et ++A

[Mattetfamilly]

Et:

Code :

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

1
2
3
 
for(i=0;i<ComboBox1->Items->Count;i++)
ComboBox1->Items->Strings[i]=ComboBox1->Items->Strings[i].SetLength(ComboBox1->Items->Strings[i].Length()-ExtractFileExt(ComboBox1->Items->Strings[i]).Length());

cela devrait aller non?
cela dit il faut peut être un "+1" dans le SetLength pour le '.' je ne sais plus...

[echap2000]

encore mieux :



AnsiString Tmp=ExtractFileName(dlgOpen1->FileName.SubString(0,dlgOpen1->FileName.AnsiPos(ExtractFileExt(dlgOpen1->FileName))-1) );