Bonsoir,
J'ai une petite application en Delphi qui utilisait un fichier texte sur lequel je venais récupérer toute les lignes pour les stocker ds un tableau. Pour inclure ce fichier dans mon *.exe, j'ai voulu en faire un fichier ressource. Jusque là j'y suis arrivé. Mais c'est pour récupérer les lignes du fichier que j'ai des problemes. Apparemment on récupere un "stream". Y a t il un moyen simple pour lire de maniere sequentielle le stream comme je le faisais avec la commande readln?
J'essaie plusieurs trucs depuis une heure mais j'y arrive pas. J'arrive a sortir les données dans un composant Tmemo (j'ai vu ça dans une faq), mais c'est un peu bete de creer un Tmemo dans mon cas vu que j'en ai pas besoin. Il doit y avoir un truc tout simple? J'ai aussi essayé ça :
mais t reste desesperemment vide (et puis est ce pratique pr récupérer mes lignes?)
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 var res:Tresourcestream; t:Tstringlist; stream:tstream; Ts:Tstringstream; x:Tstrings; {$R *.DFM} {$R Res.res} procedure TForm1.Button1Click(Sender: TObject); begin Res := TResourceStream.Create(0,'test','TEXT'); t:=tstringlist.create(); t.LoadFromStream(res); end;
Merci,
thierry
Partager