Pb avec SaveDialog

Salutation, dans un projet, j'utilise un TSaveDialog avec un filtre:

Code:

---

SaveDialog1->Filter = "Fichiers texte (*.txt)|Fichiers htm (*.htm)|Fichiers html(*.html)";

---

Mon 1er pb: le dialogue n'affiche que le 1er et dernier filtre!!!!
Ensuite, quand je recupere le nom de fichier séléctionné, j'obtient que le nom, pas l'extention....

Code:

---

1 2 3

if(SaveDialog1->Execute()==false) return; else FileName = SaveDialog1->FileName; Memo1->Lines->SaveToFile(FileName);

---

J'obtient pas exemple Nom_de_fichier, au lieu de Nom_de_fichier.txt !!!
Mes options choisies sont HideReadOnly, Extentiondifferent, PathMustExist, EnableSizing.
Merci de votre aide
Cordialement
walm

salut

est ce que tu as essayé de mettre de | au lieu d'un seul ?

Citation:

---

Envoyé par Aide Borland Builder

OpenDialog1->Filter = "Fichiers texte (*.txt)";
Plusieurs filtres doivent être séparés par plusieurs barres verticales. Par exemple,

Code:

---

OpenDialog1->Filter = "Fichiers texte (*.txt)|Fichiers Pascal (*.pas)";

---

Pour inclure plusieurs masques dans un seul filtre, séparez les masques par des points-virgules. Cela fonctionne à la fois dans l'inspecteur d'objets et dans un code programme. Par exemple,

Code:

---

OpenDialog1->Filter = "Fichiers Pascal (*.pas;*.dpk;*.dpr)";

---

---

donc

Code:

---

SaveDialog1->Filter = "Fichiers texte (*.txt)|Fichiers htm (*.htm)|Fichiers html(*.html)";

---

est plus que coherant !!!

Bonjour,

si on regarde seulement une citation de l'aide (le reste étant mal foutu voire peu clair)

Citation:

---

Envoyé par L'aide

Pour créer des masques de fichiers dans un code programme, affectez à la propriété Filter une valeur composée d'une description et d'un masque, séparés par un caractère barre verticale. La barre verticale ne doit pas être encadrée d'espaces.

---

Donc, pour le premier problème :

Code:

---

SaveDialog1->Filter = "Fichiers texte|*.txt|Fichiers htm|*.htm|Fichiers html|*.html";

---

Et du coup je n'ai pas rencontré le second problème.

Cordialement

Eric