salut,comment ouvrir un fichier *.txt (par exemple:etat.txt) par defaut sans determiner 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.
A+
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 procedure TForm1.Button1Click(Sender: TObject); begin Memo1.Lines.LoadFromFile('monFichier'); end;
si le fichier est dans le même répertoire que ton application :
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 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
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é.
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager