Discussion :

[vitch8]

Bonjour,

j'ai actuellement un souci avec la commande shellexecute. J'arrive à imprimer des fichiers texte avec l'extension .txt mais pas avec les extensions .dat et .asc qui ont cette extension car ils sont utilisés pour d'autres modules (je ne peux donc pas changer leur extension).

J'arrive à tous les ouvrir mais pour l'impression cela ne fonctionne qu'avec les .txt.

Voici l'expression que je donne :
ShellExecute(Handle,'Print', 'R_Tronc.dat', nil, nil, SW_HIDE);

Dans ce cas, il ne fait rien, par contre si je mets 'open' à la place de 'print' tout fonctionne quelque soit l'extension.

Dans Windows, ces différents fichiers sont paramétrés pour être ouverts avec le bloc note.

Pourriez-vous m'apporter votre aide.

Merci d'avance

[ShaiLeTroll]

DAT comme extension, on ne peut pas prédire le contenu, cela peut être n'importe quoi, et souvent pas du Texte !

ASC, comme ASCII, ça oui !

Si tu regarde la définition des associations d'extensions, tu devrais voir la commande Print du TXT, tu l'as recopie pour le DAT et ASC

Tu peux aussi faire les appels DDE équivalent



Vilaine manip !
Tu Copie le fichier, en changeant l'extension, si possible, utilise GetTemporaryPath pour stocker le fichier temporaire, tu lances le ShellExecute, tu supprimes le fichier une fois l'impression terminé (tentes une suppression en boucle toutes les secondes, un fichier en cours d'utilisation refusera de se supprimer)

Autre solution, un ShellExecute directement sur NotePad\WordPad, et en paramètre tu lui passe le fichier, tu laisse ton utilisateur imprimé le fichier

Tu dois aussi pouvoir imprimer un TRichEdit avec Print, tu le remplis via Lines.LoadFromFile

[vitch8]

merci pour la réponse.

J'ai décidé de charger le contenu du fichier dans un composant TRichEdit et d'en imprimer le contenu ensuite.

Cela me donne le résultat souhaité.

Merci