DFT에 이미지를 삽입

  • Thread starter Thread starter Papao
  • Start date Start date

Papao

Guest
모든 것
dft 환경에서 삽입 할 수 있다면, 폴더의 모든 이미지가 자동으로?
감사합니다.
 
이 작업을 자동으로 수행하면 작은 프로그램을 작성해야합니다.
 
나는 조금 vb를 필요로 ...
dft에 삽입되는 이미지 파일은 동일한 파일 이름 ( 연장 없이)로 불리는 폴더 안에 포함됩니다.

나를 도울 수 있습니까?
 
그와 같은 뭔가 ( 입증 된 코드)
Code:
hardedgeframework.application으로 dim objapp = 아무것도
hardedgedraft.draftdocument로 디엠 objdft = 아무것도
dim objsheet as solidedgedraft.sheet = 아무것도

objapp = marshal.getactiveobject("solidedge.application")
objdft = objapp.activedocument
objsheet = objdft.activesheet의 경우

dim objimages as solidedgedraft.images2d = objsheet.images2d
hardedgedraft.image2d = objimages.addimage (false, "nomeimmagine")로 디엠 objimage

objimage.setorigin(x, y) 'x ed y sono le 좌표 dove deve essere posizionata l'immagine
objimage.height = h 'h è l'altezza dell'immagine
objimage.width = w 'w è la larghezza dell'immagine
 
Last edited:
코드는 모든 변수 문에 구문 오류를 반환합니다;
나는 그들이 책장에 대한 참조를 놓았지만, 또한 그들을 활성화, 나는 그것을 해결하지 않았다.
어쩌면 나는 올바른 것을 발견하지 않았다?
 
vb6 다운로드
당신이 쓴 코드를 넣어 경우 ... 답변을 쉽게 찾을 수 있습니다 ... .
 
적어도 10 년 동안 vb6를 사용하지 않았고 이미 '

당신은 확실히 참조를 추가해야합니다, 문에서 값의 할당을 제거하지만 별도의 행에서, 값을 할당하려면 아마 추가해야합니다 "설정" 앞의 지시.

Visual Studio 커뮤니티 또는 Visual Studio 코드를 다운로드할 수 있습니다.
Code:
hardedgeframework.application으로 dim objapp
hardedgedraft.draftdocument로 디엠 objdft
dim objsheet로 solidedgedraft.sheet

objapp = getactiveobject("solidedge.application")를 설정합니다.
objdft = objapp.activedocument 설정
objsheet = objdft.activesheet를 설정

dim objimages 고형 초안.images2d
hardedgedraft.image2d로 dim objimage

objsheet.images2d를 설정
objimage = objimages.addimage (false, "nomeimmagine")를 설정합니다.

전화번호 setorigin(x, y) 'x ed y sono le 좌표 dove deve essere posizionata l'immagine
설정 objimage. 높이 = h 'h è l'altezza dell'immagine
설정 objimage. 너비 = w è la larghezza dell'immagine
 
@be_on_edge에 대하여 if의 sdk의 가이드에 대한 연결 덕분에, 그러나 가이드에서 두 값 "폭" & "높이"는 "속성"이며 "더블"는 "데이터 유형"입니다.

"image2d"를 참조하는 객체에 대해 이야기 할 때?
 
@be_on_edge에 대하여if의 sdk의 가이드에 대한 연결 덕분에, 그러나 가이드에서 두 값 "폭" & "높이"는 "속성"이며 "더블"는 "데이터 유형"입니다.

"image2d"를 참조하는 객체에 대해 이야기 할 때?
죄송합니다. 몇 미터의 이미지를 나타내는 이중 유형 속성입니다. 100mm의 넓은 이미지를 원한다면 사용해야합니다.
Code:
설정 objimage. 폭 = 0.1
 
괜찮아, 나는 이해,하지만 당신은 "설정" 지시어와 값을 할당해야 이상한 것 같다 ... 단지 내가 더 이상 vb6을 사용하지 않는 한 세기에 ... 나는 내 기억을 새로워 갈 것이다.... 그것은 여름에 아프지 않습니다. ·
 
괜찮아, 나는 이해,하지만 당신은 "설정" 지시어와 값을 할당해야 이상한 것 같다 ... 단지 내가 더 이상 vb6을 사용하지 않는 한 세기에 ... 나는 내 기억을 새로워 갈 것이다.... 그것은 여름에 아프지 않습니다. ·
아마도 필요하지 않은, vb6는 다른 사람에서 세트를 사용 한 일부 경우에 구문으로 이상한 하이브리드였다, 나는 왜 motivo를 기억하지 않습니다
 
아마도 필요하지 않은, vb6는 다른 사람에서 세트를 사용 한 일부 경우에 구문으로 이상한 하이브리드였다, 나는 왜 motivo를 기억하지 않습니다
네, 참으로, 나는 호기심이다. ·

나는 그가 쓴 코드를보고 궁금했다 이름 * 그가 다른 "things"에 대해 쓴 것을 이해하기 위해 ...하지만 광산은 단지 호기심입니다 :)

어쩌면 나는 너무 많은 시간을 썼다 ... 누가 뜨겁나요?
 
나는 당신을 실망시키는 미안 해요, 하지만 난 아직 vb6에 아무것도 작성하지 않았다, 프랜시스가 제안하는 것을 시도를 제외하고: 불행히도 나는 하루에 몇 분을 열 수 있으며 항상. .

나는 vb6를 물었다. 그는 단지 내가 조금 알고 있기 때문에, 나는 francesco가 원래 게시 된 코드를 이해할 수 없었다.

그러나 코드를 테스트, 다음 줄이 잘못되고 라이브러리 나는 그것을 활성화 한 생각
Code:
objapp = getactiveobject("solidedge.application")를 설정합니다.
 
이름 * 너는 나를 실망시키지 않았다. 걱정하지 마세요.

내가 묻는 것은 당신이 쓴 코드의 단지 줄이며 그 오류를주고, 나는 쓴 코드를 읽고 생각 (하나 라인 또는 그 많은) 오류가 있는지 이해하는 것보다 더 즉각적인입니다.

어쨌든, 이것은 당신이 쓴 코드입니다 @be_on_edge에 대하여 "revisited" 및 테스트.
Code:
콜린스 vba
하위 createimage2d()
오류 goto createtoolpalette_error
hardedgeframework.application으로 dim oapp
집합 oapp = getobject (, "solidedge.application")

oapp.screenupdating = 거짓

hardedgeframeworksupport.image2d로 dim oimage

oimage = oapp.activedocument.activesheet.images2d.addimage(false, "percorso Completeo dell'immagine")를 설정합니다.

oimage.setorigin 0.1, 0.1을

oapp.screenupdating = 사실

설정 oimage = 아무것도
설정 oapp = 아무것도

오류 goto 0
출구 sub

createtoolpalette_error:

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

끝 이하
이것은 vbs에 같은 코드입니다
Code:
dim 앱 : set app = getobject(, "solidedge.application")

app.screenupdating = 거짓

디엠 이미지 : 설정 이미지 = app.activedocument.activesheet.images2d.addimage(false, "percorso Completeo del file")
'콜 image.setorigin(0.1, 0.1)
oppure의
이미지.setorigin 0.1, 0.1

app.screenupdating = 사실
이 같은 코드 perl
Perl:
# activex 인터페이스
win32를 사용하십시오:: ole;
win32를 사용하십시오::variant;
# use 기존 인스턴스 if solidedge is already running
eval {$solidedge = win32 ::ole->getactiveobject ('solidedge.application')};
$@이면 "solidedge not installed" 다이;
정의된 $solidedge
$solidedge = win32 ::ole->new('solidedge.application')
또는 다이 "누구를 시작 할 수 없습니다";
이름 *

$doc = $solidedge->activedocument();
$img = $doc->activesheet->images2d->addimage(false, "percorso Completeo del file");
$img-setorigin (0.1, 0.1);
이 같은 코드 python
Python:
win32com.client, 시간, win32con 가져 오기

앱 = win32com.client.dispatch("solidedge.application")

앱이 없다면:
img = app.activedocument.activesheet.images2d.addimages(false, "percorso Completeo del file") 의 경우
img.setorigin(0.1, 0.1)
다른 것:
print("여기! 고체 비 trovato!"
·
 
나는 당신을 실망시키는 미안 해요, 하지만 난 아직 vb6에 아무것도 작성하지 않았다, 프랜시스가 제안하는 것을 시도를 제외하고: 불행히도 나는 하루에 몇 분을 열 수 있으며 항상. .

나는 vb6를 물었다. 그는 단지 내가 조금 알고 있기 때문에, 나는 francesco가 원래 게시 된 코드를 이해할 수 없었다.

그러나 코드를 테스트, 다음 줄이 잘못되고 라이브러리 나는 그것을 활성화 한 생각
Code:
objapp = getactiveobject("solidedge.application")를 설정합니다.
올바른 코드는:
Code:
objapp = getobject (, "solidedge.application")를 설정합니다.
 
감사합니다, 항상 매우 친절 ... 너무 많은 난 말을하지

그러나 나는 vba의 코드가 다음 오류를 반환하기 때문에 잘못 생각 :Cattura.JPG이 코드 라인은 경로에 입력하고 내부에는 하나 이상의 jpg 유형 파일을 포함합니다
Code:
set oimage = oapp.activedocument.activesheet.images2d.addimage(false, "c:\users\paolo\desktop\solid edge\parte1")
 
감사합니다, 항상 매우 친절 ... 너무 많은 난 말을하지

그러나 나는 vba의 코드가 다음 오류를 반환하기 때문에 잘못 생각 :View attachment 71893이 코드 라인은 경로에 입력하고 내부에는 하나 이상의 jpg 유형 파일을 포함합니다
Code:
set oimage = oapp.activedocument.activesheet.images2d.addimage(false, "c:\users\paolo\desktop\solid edge\parte1")
당신은 추가 할 파일 이름을 넣지 않았다; 당신은 폴더에 포함 된 각 이미지에 대한 addimage 방법을 사용해야합니다. 이것처럼:

(게시된 부호, 이미지는 측에 의하여 삽입된 측 각 100개 mm)
Code:
strfiles = dir("c:\users\paolo\desktop\solid edge\parte1")

x = 0.12의

strfiles <> "
oimage = oapp.activedocument.activesheet.images2d.addimages(false, strfiles)를 설정한다.
이름 * setorigin의 x, 0.1
x = x + 0.1을
strfiles = 디
주 메뉴
 

Forum statistics

Threads
58,191
Messages
495,938
Members
103,104
Latest member
FabioFrontini

Members online

No members online now.

Back
Top