Insérer des images sur DFT

[dsw]

(code non testé, images insérées côte à côte tous les 100 mm)

strfiles = dir("c:\users\paolo\desktop\solid edge\parte1\")

x = 0,1

pendant que strfiles <> ""
set oimage = oapp.activedocument.activesheet.images2d.addimage(faux, strfiles)
oimage.setorigin x, 0,1
x = x + 0,1
strfiles = dir
ouvrés

I à la variable "x" Je submergerais la valeur de la largeur ou de la hauteur de l'image (oimage.widht ou oimage.hauteur), selon qu'elle soit collée horizontalement ou verticalement.@be_on_edge Une bonne idée ?

Merci les gars, très gentil comme toujours... trop rougeâtre je dirais non

J'avais 5 minutes et je ne savais pas quoi faire.

.... J'ai pensé ajouter quelques exemples (comme l'exemple classique "hello world!") dans d'autres langages de programmation (type php, luart, powershell, c#, javascript, go, ruby) mais j'ai dit... mais ce soir, je ne dors pas ? :manquement

 

[Papao]

I à la variable "x" Je submergerais la valeur de la largeur ou de la hauteur de l'image (oimage.widht ou oimage.hauteur), selon qu'elle soit collée horizontalement ou verticalement.

@be_on_edge Qu'en pensez-vous, une bonne idée ?

Je vais sûrement avoir besoin d'écheller l'image, pour l'adapter à l'espace libre que j'ai disponible dans la feuille; puis je pensais les colorer à côté de deux à deux (en partant du bas au haut).


Mais, les gars, pourquoi je continue à avoir l'erreur sur cette ligne ? (la variable strfiles reçoit correctement le nom du fichier. . )

set oimage = oapp.activedocument.activesheet.images2d.addimage(faux, strfiles)

placer le code complet:

sous createimage2d()
sur erreur goto createtoolpalette_error
dim oapp comme cadre solide. application
set oapp = getobject(, "solidedge.application")

oapp.screenupdating = faux

dim oimage en tant que support d'un cadre de travail solide.image2d

strfiles = dir("c:\users\paolo\desktop\solid edge\parte1\")

x = 0,1

pendant que strfiles <> ""
set oimage = oapp.activedocument.activesheet.images2d.addimage(faux, strfiles)
o image. stérorigine x, 0,1
x = x + 0,1
strfiles = dir
ouvrés


oapp.screenupdating = true

set oimage = rien
set oapp = rien

en cas d'erreur aller à 0
sortie sous

createtoolpalette_error & #160;:

msgbox "error " & err.number & " (" & err.description & ") nella procedura createimage2d, linea " & erl & ".

fin sous

 

[Be_on_edge]

car strfiles est le seul nom de fichier en vigueur ; vous devez également ajouter le chemin

set oimage = oapp.activedocument.activesheet.images2d.addimage(false, "c:\users\paolo\desktop\solid edge\parte1\" & strfiles)

 

[Papao]

Écoute, mais pourquoi ne trouve-t-on pas des explications sur la fonction "stérorigine x, 0,1" sur le net?:

Si vous augmentez la valeur après x, je déplace l'insertion de l'image horizontalement, mais si vous voulez déplacer le point d'insertion aussi de l'axe y comment dois-je faire?

Bref, après avoir entré la deuxième image (affianco de la première), je voudrais mettre la troisième au-dessus de la première image et ainsi de suite en formant deux colonnes... .

Comment je peux faire ça ?

 

[dsw]

post #10 de cette discussion, @be_on_edge partage le lien vers la méthode à laquelle vous faites référence.

 

[Papao]

J'ai lu combien de courrier @be_on_edge mais le guide me semble très synthétisé et dépourvu d'exemples, comme je peux le faire. . . .

 

[Papao]

Wow. .
Je m'impunis à penser que la variable x était liée à la position horizontale (x au point)
Au lieu de cela, ce n'est qu'un point dans l'espace : il suffit d'ajouter une deuxième variable "y" à la position verticale et de la gérer dans le cycle.
Je suis stupéfait.

 

[dsw]

Je suis stupéfait.

Soudain... Je me sens moins seulement. ....

 

[Papao]

Alors je vais,
J'ai réussi à ajouter les opérations suivantes :
échelle l'image

oimage.largeur = 0,1

disposer les images sur deux colonnes: J'ai utilisé la méthode mod connectée à un "si" pour vérifier si j'ajoute la même image/disept (sol-sol mais méthode de travail) '

si n mod 2 = 0 alors 'pari
y = y + 0,1
x = x - 0,1
Autre dispari
x = x + 0,1
fin si

puis faites écho au chemin et au nom du fichier: ceci parce que les images que je veux insérer, sont contenues dans un dossier qui est appelé avec le même nom du fichier: J'ai utilisé cette fonction

définir objdft = objapp.activedocument

 

[Papao]

Maintenant, les gars, j'ai besoin d'une dernière aide...

Je voudrais que le point d'insertion de la première image se produise avec un clic de souris dans la zone dft.
ou à une certaine distance d'un bloc au-dessus du cartilage de dessin.

Y a-t-il une bonne âme qui veut m'aider ? C'est vrai.

 

[Papao]

c'est la liste finale

sous importa_qrc()
sur erreur goto createtoolpalette_error
dim oapp comme cadre solide. application
set oapp = getobject(, "solidedge.application")

oapp.screenupdating = faux

dim oimage en tant que support d'un cadre de travail solide.image2d


nomefile curpathe, nomadeft
pathqrc = "c:\users\paolo\desktop\solid edge\" & nomedft & "\"
strfiles = dir(pathqrc)

x = 0,1
y = 0,1
n = 1
pendant que strfiles <> ""
set oimage = oapp.activedocument.activesheet.images2d.addimage(false, pathqrc & strfiles)

oimage.width = 0,1 'scala la dimensione dell'immagine
o image. stérogine x, y 'positiona l'immagine nel punto specificato

si n mod 2 = 0 alors 'pari
y = y + 0,1
x = x - 0,1
Autre dispari
x = x + 0,1
fin si

n = n + 1

strfiles = dir
ouvrés

oapp.screenupdating = true

set oimage = rien
set oapp = rien

en cas d'erreur aller à 0
sortie sous

createtoolpalette_error & #160;:

msgbox "error " & err.number & " (" & err.description & ") nella procedura createimage2d, linea " & erl & ".

fin sous

 

[dsw]

Avez-vous testé le code que vous avez écrit ?

 

[Papao]

Oui, sauf les erreurs de copie/collage...
où tu dis que ça ne va pas... Peut-être que tu veux dire ici ?

nomefile curpathe, nomadeft

 

[Papao]

Redhead, j'ai testé le code que j'ai posté ci-dessus, c'est le résultat:
toutes mes belles images empilées au-dessus du cartiglio en couple deux à deux: dmontrer!!! Une... grâce à vous un

 

[dsw]

Oui, sauf les erreurs de copie/collage...
où tu dis que ça ne va pas... Peut-être que tu veux dire ici ?

nomefile curpathe, nomadeft

Oui... même cette partie du code

Avez-vous trouvé l'information pour insérer les images dans un endroit sélectionné avec la souris?

 

[Papao]

Tu peux m'aider ?

 

[dsw]

Oui, l'information pour gérer les événements de souris se trouve dans ce guide (à mon avis écrit clairement) lien pendant que pour les recenseurs "filtres" (sélocatefilterconstants) vous les trouvez pourl'exemple a été écrit dans vb.net mais à partir du code vous devriez cmq comprendre comment gérer tout à partir du code, bien sûr si @be_on_edge a une façon plus simple d'aller, bien venez.

essayer d'écrire le code indépendamment, si vous avez des doutes.... aussi demander

 

[Papao]

Merci de votre disponibilité infinie et de votre patience, je dis vraiment!

J'ai vu les liens que vous avez postés et je pense qu'ils sont vraiment intéressants, mais malheureusement je ne suis pas simple pour moi; je ne suis même pas sûr de partir...

ci-dessous placer la partie initiale du code avec les déclarations de variables mais pour le reste...
jouer la première carte wild maintenant : aidez-nous !

sous clickpoint()
dim sepp comme cadre solide. application
dim secommand comme solidedgeframework.command
dim semoule comme solidedgeframework.mouse

 

[dsw]

prier Il semble plus qu'un "dubbio". ...
essayez de poster le projet complet ou le texte complet du code que vous avez écrit,

En tout cas, je pense que vous devriez sérieusement considérer la suggestion de @be_on_edge (dans mérito a vscode & vs édition communautaire) .... vous aurez plus d'informations et des exemples de code sur le sujet.

 

[Papao]

mais plus que beaucoup de doutes J'ai une certitude : je ne connais pas les constantes et les variables du bord solide et je ne sais pas comment guider le sdk !
Sans doute trop d'arguments pour comprendre tous ensemble, mais cette limite que je connais déjà.
Cependant Je ne prétendais pas avoir essayé d'en apprendre davantage.

J'attache le code complet et de travail, qui m'a donné satisfaction de l'avoir atteint, merci.