Plugin FileToClipboard

[JacquesCHENU]

ou en pièce jointe à un mail
donc ton mail ?

[JacquesCHENU]

en .rar

[JacquesCHENU]

reçu en .rar

[Feitan]

Hello, j'ai bien reçu et téléchargé le fichier. Je regarde ça quand j'ai le temps (pas avant dimanche/lundi à priori) et te retiens au courant.

Bon week-end.

[JacquesCHENU]

Salut Feitan
As-tu pu jeter un œil sur ce plugin.
Si aucune solution trouvée, je serai dans la panade car FileToClipboard met permet de coller dans de multiples applications (CorelDraw...FileMaker Pro... et d'autres) des fichiers dont le chemin est calculé dans un grand nombre de Macros.
Je suis complètement bloqué et je n'ai rien trouvé sur le net qui fasse la même chose.
Et malheureusement Adam est "intouchable".
Si un utilisateur de SM avant une solution de remplacement.....
Bon WE et à te lire
Jacques CHENU

[Feitan]

Salut Jacques,

Désolé j'avais complètement oublié que je devais faire un test
Du coup j'ai essayé de le lancer :

Variable [CLIPBOARD];[CLIPBOARD];Alpha;
FileToClipboard C:\Users\Feitan\Pictures\Scream.jpg;
Message Message;[CLIPBOARD];


Malheureusement sans résultat aussi bien sous Windows 8.1 que Windows 7 et même Windows XP.
Je suis en 3.1.0.46, du coup je vais voir si je peux pas retrouver une ancienne version si le problème vient de là.
En tout cas désolé, j'essaye de trouver une solution alternative.
Ca ne serait pas possible de mettre dans une variable le chemin du fichier et dans l'autre le contenu du fichier (tu travaille avec des images je crois).

Ah tiens au fait, tu as testé avec différents types d'images ? (.png, .gif, .jpg et .bmp par exemple). Je ferais probablement le test ce soir mais dans le doute, et si tu peux sortir des résultats plus vite ça nous avancera peut être.

Tiens nous au courant du coup

[JacquesCHENU]

Merci de te remettre sur cette "vacherie"

Quelque soit l'extension du fichier, jpg-bmp-cdr (CorelDRAW), rien ne fonctionne.

-1- Mettre le contenu du fichier dans une Variable et non son chemin, pas possible actuellement.

-2- Faire un Execute du chemin du fichier stocké dans une variable, sans souci, mais le but est de coller
l'image dans la fenêtre d'une application.

-3- Chez moi le plugin fonctionnait sous XP, VISTA, Windows 7, et Windows 8 il y a 1 mois, et un jour
plus rien.

-4- La commande Outils divers / Fichier / Copier, ne convient pas non plus

-5- A moins de faire une extension de cette commande en gardant le Paramètre 1 dans lequel
on pourrait indiquer soit le chemin du fichier, soit la Variable reprenant le chemin du fichier,
avec stockage DU fichier dans [CLIPBOARD].

Sur ce, bon courage et bon WE.

[JacquesCHENU]

une idée, bof
As-tu des connaissances de Macro, telle que celle-là

Sub Macro1()
' Recorded 09/05/2015
Dim impopt As StructImportOptions
Set impopt = CreateStructImportOptions
With impopt
.MaintainLayers = True
With .ColorConversionOptions
.SourceColorProfileList = "sRGB IEC61966-2.1,ISO Coated v2 (ECI),Dot Gain 15%"
.TargetColorProfileList = "sRGB IEC61966-2.1,ISO Coated v2 (ECI),Dot Gain 15%"
End With
End With
Dim impflt As ImportFilter
Set impflt = ActiveLayer.ImportEx("D:\ZZ Sauve JOUR\Coreljc\Dr Case\06x21-01.cdr", cdrCDR, impopt)
impflt.Finish
Dim s1 As Shape
Set s1 = ActiveShape
End Sub


Celle-çi IMPORTE un fichier CorelDraw, mais je n'arrive pas à la modifier pour récupérer le chemin du fichier
qui serait stocké dans un fichier "txt" (avec la commande Ecrire de SM)

Tout simple

[Feitan]

C'est du VBA le langage du dernier truc que tu as fait?

Pour le 2ème point. Je pensais à garder le chemin du fichier (avec SM) et ouvrir le fichier avec Paint par exemple pour le copier dans CorelDraw

[JacquesCHENU]

Oui macro CorelDraw en VBA
des essais faits ce jour

-1- Import dans CorelDraw à partir du chemin via STR1 et CLIPBOARD

Variable [CLIPBOARD];;Alpha;
Variable STR1;D:\ZZ Sauve JOUR\Coreljc\Dr Case\06x21-01.cdr;Alpha;
Calcul évolué [CLIPBOARD]=STR1
Commentaire Clic sur fenêtre de travail CorelDraw
Inclusion D:\ZZ Sauve JOUR\Document\SuperMacro\Commandes Inclusions\Inclusions\0001 CorelDraw Clic sur Fenêtre.txt
Timer 400;
Commentaire ouverture fenêtre Import
Type Special CTRL;I;
Timer 400;
Commentaire Coller le chemin du fichier à importer
Type Special CTRL;V;
Timer 600;
Commentaire Enter 1 fois = validation import
Commentaire Enter 2 fois pour valider des options CorelDraw
Type Special ENTREE;
Type Special ENTREE;
Type Special ENTREE;
Timer 200;
Commentaire Centage de l'image sur la page
Type Special P;

-2- Avec Ouverture du fichier CorelDraw à partir du chemin via STR1

Variable STR1;D:\ZZ Sauve JOUR\Coreljc\Dr Case\06x21-01.cdr;Alpha;
Commentaire Ouvertutre du fichier
Execute STR1
Timer 400;
Commentaire Clic sur fenêtre de travail CorelDraw
Inclusion D:\ZZ Sauve JOUR\Document\SuperMacro\Commandes Inclusions\Inclusions\0077 CorelDraw Clic sur Fenêtre milieu page pour déplacement image .txt
Commentaire Tout sélectionner ... Copier ... Femeture de la fenêtre
Type Special CTRL;A;
Type Special CTRL;C;
Type Special CTRL;W;
Commentaire Clic sur fenêtre de travail CorelDraw
Inclusion D:\ZZ Sauve JOUR\Document\SuperMacro\Commandes Inclusions\Inclusions\0001 CorelDraw Clic sur Fenêtre.txt
Commentaire Coller l'image
Type Special CTRL;V;
Type Special ENTREE;
Commentaire Centage de l'image sur la page
Type Special P;


2 Solutions possible, mais quelle lourdeur par rapport à FileToClipboard, surtout que pour certains traitements, la répétition est de l'ordre d'une centaine de fois et jusqu'à plusieurs milliers

C'est pour la gestion de collections de timbres, exemple pour la Pologne environ 5000 fois

Bonne réflexion et bon dimanche