Comment ouvrir un fichier *.txt par defaut sans spécifie le chemin sous delphi?

salut,comment ouvrir un fichier *.txt (par exemple:etat.txt) par defaut sans determiner le chemin sous delphi?

Salut,

Ton fichier texte en question se trouve t-il dans le même répertoire que l'application ?
Le crées tu avec ton application ?

oui dans le mème repertoire de m'application

Ce fichier doit être affiché dans un composant (TMemo, TRichEdit) ?
Si oui, tu peux utiliser la méthode LoadFromFile.

Code:

---

1 2 3 4

procedure TForm1.Button1Click(Sender: TObject); begin Memo1.Lines.LoadFromFile('monFichier'); end;

---

A+

si le fichier est dans le même répertoire que ton application :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

type TForm1 = class(TForm) Memo1 : TMemo procedure Form1Create(Sender: TObject); private fPath : string; public end;   var Form1 : TForm1;   implementation   procedure TForm1.Form1Create(Sender: TObject); begin fPath := ExtractFilePath(ParamStr(0)); Memo1.LoadFromFile(fPath+'etat.txt'); end;

---

Il faut préciser que ParamStr(0) est la meme chose que Application.ExeName, peut etre un peu plus compréhensible ;)

Citation:

---

Envoyé par ero-sennin

Ce fichier doit être affiché dans un composant (TMemo, TRichEdit) ?
Si oui, tu peux utiliser la méthode LoadFromFile.

Code:

---

1 2 3 4

procedure TForm1.Button1Click(Sender: TObject); begin Memo1.Lines.LoadFromFile('monFichier'); end;

---

A+

---

attention par défaut l'appli va faire référence a la dernière ouverture de opendialog

:salut:

Si ce thread est considéré comme résolu, merci de cliquer sur le bouton situé tout au bas, affecté à cet effet.

Les développeurs qui prennent gentiment de temps de répondre, le méritent bien non ?

Mais tu as peut-être oublié de lire les règles de ce club, alors tu es pardonné.

;)