Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Copier un Fichier dans une string [ Archives / Fichier / Disque ] (lomig)

jeudi 11 avril 2002 à 12:14:18 | Copier un Fichier dans une string

lomig

Question a la con: comment fait-on pour copier un fichier (texte) dans une chaine (string)??

jeudi 11 avril 2002 à 12:46:38 | Re : Copier un Fichier dans une string

Gysmo

Dans une string je sais pas, mais dans une TStringList c'est facile :

procedure TForm1.Button1Click(Sender: TObject);
var StringList: TStringList; i: Integer;
begin
StringList:= TStringList.Create;
if OpenDialog1.Execute
then StringList.LoadFromFile(OpenDialog1.FileName);
for i:=0 to StringList.Count-1 do
Memo1.Lines.Add(StringList[i]);
StringList.Destroy;
end;

Un Button pour ouvrir la boite de dialogue OpenDilog, OpenDialog pour ouvrir le fichier texte,
et un Memo pour montrer le contenue de la StringList.

Il suffit apres de taper StringList[i] pour ressortir la ligne i.

J'espere ke je t un peu aider.

Bye.

-------------------------------
Réponse au message :
-------------------------------

Question a la con: comment fait-on pour copier un fichier (texte) dans une chaine (string)??


jeudi 11 avril 2002 à 15:47:19 | Re : Copier un Fichier dans une string

lomig

Ah mais c'est bien pratique c'est TStringList! Merci de m'avoir fait découvrir cet objet fort sympathique ma foi (si l'on peut dire qu'un objet puisse etre sympathique....m'enfin bon on peut bien dire ce qu'on veut, il y en a bien qui trouvent Le Pen sympathique!!!)

Lomig

------------------------------
Réponse au message :
------------------------------

Dans une string je sais pas, mais dans une TStringList c'est facile :

procedure TForm1.Button1Click(Sender: TObject);
var StringList: TStringList; i: Integer;
begin
StringList:= TStringList.Create;
if OpenDialog1.Execute
then StringList.LoadFromFile(OpenDialog1.FileName);
for i:=0 to StringList.Count-1 do
Memo1.Lines.Add(StringList[i]);
StringList.Destroy;
end;

Un Button pour ouvrir la boite de dialogue OpenDilog, OpenDialog pour ouvrir le fichier texte,
et un Memo pour montrer le contenue de la StringList.

Il suffit apres de taper StringList[i] pour ressortir la ligne i.

J'espere ke je t un peu aider.

Bye.

-------------------------------
Réponse au message :
-------------------------------

Question a la con: comment fait-on pour copier un fichier (texte) dans une chaine (string)??



jeudi 11 avril 2002 à 19:06:39 | Re : Copier un Fichier dans une string

Delphiprog

Administrateur CodeS-SourceS
Mieux encore !
Au lieu de :
for i:=0 to StringList.Count-1 do
Memo1.Lines.Add(StringList[i]);

mettre :
Memo1.Lines.AddStrings(Stringlist);

May Delphi be with you.


-------------------------------
Réponse au message :
-------------------------------

Dans une string je sais pas, mais dans une TStringList c'est facile :

procedure TForm1.Button1Click(Sender: TObject);
var StringList: TStringList; i: Integer;
begin
StringList:= TStringList.Create;
if OpenDialog1.Execute
then StringList.LoadFromFile(OpenDialog1.FileName);
for i:=0 to StringList.Count-1 do
Memo1.Lines.Add(StringList[i]);
StringList.Destroy;
end;

Un Button pour ouvrir la boite de dialogue OpenDilog, OpenDialog pour ouvrir le fichier texte,
et un Memo pour montrer le contenue de la StringList.

Il suffit apres de taper StringList[i] pour ressortir la ligne i.

J'espere ke je t un peu aider.

Bye.

-------------------------------
Réponse au message :
-------------------------------

Question a la con: comment fait-on pour copier un fichier (texte) dans une chaine (string)??



jeudi 11 avril 2002 à 19:08:55 | Re : Copier un Fichier dans une string

Gysmo

C'est avec grand plaisir.
Tu pourra en apprendre d'avantage dans l'aide tu sais a propos des TSringList.

C vrai on peu dire ce kon veux, mais du moment de ne pas dire n'importe quoi...

Bye.


-------------------------------
Réponse au message :
-------------------------------

Ah mais c'est bien pratique c'est TStringList! Merci de m'avoir fait découvrir cet objet fort sympathique ma foi (si l'on peut dire qu'un objet puisse etre sympathique....m'enfin bon on peut bien dire ce qu'on veut, il y en a bien qui trouvent Le Pen sympathique!!!)

Lomig

------------------------------
Réponse au message :
------------------------------

Dans une string je sais pas, mais dans une TStringList c'est facile :

procedure TForm1.Button1Click(Sender: TObject);
var StringList: TStringList; i: Integer;
begin
StringList:= TStringList.Create;
if OpenDialog1.Execute
then StringList.LoadFromFile(OpenDialog1.FileName);
for i:=0 to StringList.Count-1 do
Memo1.Lines.Add(StringList[i]);
StringList.Destroy;
end;

Un Button pour ouvrir la boite de dialogue OpenDilog, OpenDialog pour ouvrir le fichier texte,
et un Memo pour montrer le contenue de la StringList.

Il suffit apres de taper StringList[i] pour ressortir la ligne i.

J'espere ke je t un peu aider.

Bye.

-------------------------------
Réponse au message :
-------------------------------

Question a la con: comment fait-on pour copier un fichier (texte) dans une chaine (string)??




jeudi 11 avril 2002 à 19:11:18 | Re : Copier un Fichier dans une string

Gysmo

Ah oui c'est vrai je l'avais oublier celui-ci!
Bien vu!

Delphi for ever.

-------------------------------
Réponse au message :
-------------------------------

Mieux encore !
Au lieu de :
for i:=0 to StringList.Count-1 do
Memo1.Lines.Add(StringList[i]);

mettre :
Memo1.Lines.AddStrings(Stringlist);

May Delphi be with you.


-------------------------------
Réponse au message :
-------------------------------

Dans une string je sais pas, mais dans une TStringList c'est facile :

procedure TForm1.Button1Click(Sender: TObject);
var StringList: TStringList; i: Integer;
begin
StringList:= TStringList.Create;
if OpenDialog1.Execute
then StringList.LoadFromFile(OpenDialog1.FileName);
for i:=0 to StringList.Count-1 do
Memo1.Lines.Add(StringList[i]);
StringList.Destroy;
end;

Un Button pour ouvrir la boite de dialogue OpenDilog, OpenDialog pour ouvrir le fichier texte,
et un Memo pour montrer le contenue de la StringList.

Il suffit apres de taper StringList[i] pour ressortir la ligne i.

J'espere ke je t un peu aider.

Bye.

-------------------------------
Réponse au message :
-------------------------------

Question a la con: comment fait-on pour copier un fichier (texte) dans une chaine (string)??




vendredi 12 avril 2002 à 10:03:00 | Re : Copier un Fichier dans une string

lomig

Et avec une DialogBox comment on fait pour permettre à l'utilisateur de selectionner un répertoire et pas un fichier?
Ca m'enerve j'arrive pas a trouver les infos que je veux avec l'aide de delphi5... Dites, c'est moi qui déconne ou elle est vraiment mal faite cette aide??



-------------------------------
Réponse au message :
-------------------------------

Dans une string je sais pas, mais dans une TStringList c'est facile :

procedure TForm1.Button1Click(Sender: TObject);
var StringList: TStringList; i: Integer;
begin
StringList:= TStringList.Create;
if OpenDialog1.Execute
then StringList.LoadFromFile(OpenDialog1.FileName);
for i:=0 to StringList.Count-1 do
Memo1.Lines.Add(StringList[i]);
StringList.Destroy;
end;

Un Button pour ouvrir la boite de dialogue OpenDilog, OpenDialog pour ouvrir le fichier texte,
et un Memo pour montrer le contenue de la StringList.

Il suffit apres de taper StringList[i] pour ressortir la ligne i.

J'espere ke je t un peu aider.

Bye.

-------------------------------
Réponse au message :
-------------------------------

Question a la con: comment fait-on pour copier un fichier (texte) dans une chaine (string)??



vendredi 12 avril 2002 à 13:58:54 | Re : Copier un Fichier dans une string

Gysmo

Pour le dialogbox je sais pas.
Pour l'aide c vrai pas facile, moi c la meme avec D6. Fo faire avec.


Bye.

-------------------------------
Réponse au message :
-------------------------------

Et avec une DialogBox comment on fait pour permettre à l'utilisateur de selectionner un répertoire et pas un fichier?
Ca m'enerve j'arrive pas a trouver les infos que je veux avec l'aide de delphi5... Dites, c'est moi qui déconne ou elle est vraiment mal faite cette aide??



-------------------------------
Réponse au message :
-------------------------------

Dans une string je sais pas, mais dans une TStringList c'est facile :

procedure TForm1.Button1Click(Sender: TObject);
var StringList: TStringList; i: Integer;
begin
StringList:= TStringList.Create;
if OpenDialog1.Execute
then StringList.LoadFromFile(OpenDialog1.FileName);
for i:=0 to StringList.Count-1 do
Memo1.Lines.Add(StringList[i]);
StringList.Destroy;
end;

Un Button pour ouvrir la boite de dialogue OpenDilog, OpenDialog pour ouvrir le fichier texte,
et un Memo pour montrer le contenue de la StringList.

Il suffit apres de taper StringList[i] pour ressortir la ligne i.

J'espere ke je t un peu aider.

Bye.

-------------------------------
Réponse au message :
-------------------------------

Question a la con: comment fait-on pour copier un fichier (texte) dans une chaine (string)??






Cette discussion est classé dans : fichier, string, copier


Répondre à ce message

Sujets en rapport avec ce message

lancement d'un fichier au démarrage de l'application [ par Pierre ] Comment est-il possible, en Delphi, de lancer un fichier (.txt par exemple comme je l'indique ci-après) au démarrage sans que la TForm apparaisse ? Av Fichier typé (RECORD) [ par selma-elec ] UN fichier à été créer sur disque avec borland pascal 7.0 avec des enregistrement de ce type :Type Tata = Record Chemin : integer copier fichier sans ecraser [ par Joleroy ] salut a tous.encore un message d' aide de ma part.je voudrais savoir cimment copier un fichier sans ecraser le fichier existant mais en en créant un a copie de fichiers [ par FeuilleMorte ] J'utilise une fonction qui est sencée copier tous les fichiers d'un répertoire (une quarantaine voir plus dans certains cas)dans un autre quand j'uti obtenir un type a partir d'un string [ par kalagool ] Bonjour à toutes et à tous, Je dois faire un module d'importation de fichier ASCII ( ou csv). Je dois verifier chacun de mes champs importé. Pour cel Comment faire un fichier avec plusieurs types ? [ par mkolivier ] Bonjour,Je souhaiterai faire un fichier avec plusieurs types. Par exemple :type TEnteteFichier = record Version: integer; ExtensionFichier: string[10] ENREGISTRER TList DANS UN FICHIER [ par elguevel ] Voila j'ai crée une Tlist associé a un Record pour une gestion de contact :           Voilà un exemple (bidon) :/**** Copier un fichier à la fin d'un exe [ par Bombela ] Je fais un petit prog qui archive en compressant.Je voudrais que pendant que le prog marche, on puisse rajouter un fichier (je travaille avec TfileStr copier un fichier dans "démarrage" [ par Playmo ] salutje travaille en ce moment sur mon premier programme en Delphi et j'ai deux problèmes :- Comment fait on pour copier l'exécutable dans le dossier Copier fichier dans un mail !!! [ par jmp77 ] Salut,Voila j'ai une application qui me permet de rechercher des documents et elle affiche les résultats dans un TListView. Je voudrais pouvoir séléct


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Comparez les prix Nouvelle version


LG KP501

Entre 9€ et 159€


Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,281 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.