Discussion :

[hijodelanoche]

voilà, j'ai une boite de dialogue qui me permet de choisir plusieurs fichiers.
jusque là, vous me direz, j'ai pas inventé la poudre ^_^

ce que je voudrais, c'est récuperer pour chaque fichier selectionné :
son lecteur, le chemin, le nom et l extension, afin de lancer un programme externe avec ces parametres

j ai essayer les fonction extrac... , mais ça passe pas du tout, il en veut pas .. :/

je pensais, vu que pour chaque fichier, vu que je dois faire un traitement, mettre ces infos dans une listbox ....
mais une fois toutes les infos dans ma listbox, je n'arrive pas a récuper les lignes .. j'ai un message d incompatibilité entre un string et un tstring ...


donc si vous saviez comment récuper chaque ligne d une listebox et la transformer en string, je pense que ça résolverais mon souci ^_^


merki ^_^

[korntex5]

Pour ce que tu veux faire si tu veux juste un par un les ligne de ta listbox c facile

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
for i:=0 to listbox.count-1 do
begin
  tempstr:=listbox.items[i];
  ......
  //ton traitement
  ......
end;

Sinon si tu veux mettre toute la liste dans une seule varaible string

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
  tempstr:=stringreplace(listbox.Text,#13#10,',',[rfReplaceAll]);

[hijodelanoche]

merki ^_^
c'est si simple que je me demande pourquoi je l'ai pas trouvé ^_^

[hijodelanoche]

voilà, j'ai un autre souci :
je montre mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
for i:=0 to listbox1.count-1 do
  begin
  tempstr:=listbox1.items[i];
  lecteur := ExtractFileDrive(tempstr);
  path:= ExtractFilePath(tempstr);
  fichier := ExtractFileName(tempstr);
  ShellExecute(1,'Open',pchar('fonction'),
    pchar('"'+fichier+'" "'+path+'" '+lecteur), pchar('c:\windows'),1);
  end;
end

;

donc pour chaque ligne, il me lance le programme fonction ( qui est un batch dos). seul souci :
je voudrais qu'il ne passe a la ligne d'apres que quand il a finit avec la premiere ligne, parce que là si je lui met plusieurs ligne bah il les fait toutes en meme temps, et je vous dit pas le processeur comment il morfle !!

si vous pouvez me sauver ^_^

merki ^_^

[Qwazerty]

Par contre j'ai une question, pourquoi utiliser un batch exterieur, n'est il pas possible de faire par le code les actions à realiser sur les fichiers ? Je pose cette question par ce que parfois je suis tenté de passer par des fichiers batch et puis finalement je trouve toujours mon bonheure avec delphi , donc c'est pour savoir s'il y a un interet à passer par des fichiers batch.
++

[Pedro]

voilà, j'ai une boite de dialogue qui me permet de choisir plusieurs fichiers.

Avec une TOpenDialog? Si oui, tu as beaucoup plus facile pour "extraire" les fichiers multiples sélectionnés: utilise Files[] et FilesCount

[hijodelanoche]

merci a vous, j'ai réussi ^_^