DFT에 이미지를 삽입

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

x = 0.12의

strfiles <> "
oimage = oapp.activedocument.activesheet.images2d.addimages(false, strfiles)를 설정한다.
oimage.setorigin x의 0.1
x = x + 0.1을
strfiles = 디
주 메뉴
I to the variable "x" I will submerge the width or height of the image (oimage.widht 또는 oimage.height), 가로 또는 수직으로 가리키는지 여부에 따라.@be_on_edge에 대하여 어떤 생각, 좋은 아이디어?
감사합니다, 항상 매우 친절 ... 너무 많은 난 말을하지
....night 나는 5 분이었고 나는 무엇을 할지 모른다.

..... 나는 다른 프로그래밍 언어 (PHP, luart, Powershell, c#, javascript, go, ruby)에서 일부 예제 (예 : "hello world!"와 같은)를 추가 할 것이라고 생각하지만 난 말했다. ...하지만 밤 수면은하지? :주의:
 
I to the variable "x" I will submerge the width or height of the image (oimage.widht 또는 oimage.height), 가로 또는 수직으로 가리키는지 여부에 따라.
@be_on_edge 당신이 생각하는 것, 좋은 생각?
분명히 나는 이미지를 스케일 할 필요가있다, 나는 시트에서 사용할 수있는 무료 공간에 적응하기 위해; 그런 다음 나는 2 ~ 2 (아래에서 상단으로 시작)와 함께 색상을 생각했다.


그러나, 녀석, 왜 나는이 선에 실수를 계속합니까? ( strfiles 변수는 제대로 파일 이름을 할당합니다. ·
Code:
oimage = oapp.activedocument.activesheet.images2d.addimages(false, strfiles)를 설정한다.
전체 코드를 배치:
Code:
하위 createimage2d()
오류 goto createtoolpalette_error
hardedgeframework.application으로 dim oapp
집합 oapp = getobject (, "solidedge.application")

oapp.screenupdating = 거짓

hardedgeframeworksupport.image2d로 dim oimage

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 = 디
주 메뉴


oapp.screenupdating = 사실

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

오류 goto 0
출구 sub

createtoolpalette_error:

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

끝 이하
 
strfiles는 효과에 있는 유일한 파일 이름이기 때문에; 당신은 또한 경로를 추가해야 합니다
Code:
set oimage = oapp.activedocument.activesheet.images2d.addimage(false, "c:\users\paolo\desktop\solid edge\parte1" 및 strfile)
 
듣기,하지만 왜 그물에 "setorigin x, 0.1"기능의 설명을 찾을 수 없습니다?:

x 후에 값을 증가하면 이미지의 삽입을 가로적으로 이동하지만, 축 y의 인서트 포인트를 이동하려면 어떻게해야합니까?

짧은, 두 번째 이미지 입력 후 (첫 번째의 koianco), 나는 첫 번째 이미지보다 세 번째를 넣어하고 그래서 두 개의 열을 형성 ... .

어떻게 할 수 있습니까?
 
와우. .
x 변수가 수평 위치로 묶어 있다고 생각하기 위해 나 자신에게 부패했다 (점에 x)
대신 그것은 단지 공간의 포인트: 단순히 수직 위치에 두 번째 변수 "y"를 추가하고 주기 동안 그것을 관리.
나는 옳다
 
그때 나는,
다음 작업을 추가하는 관리 :
이미지 축소
Code:
oimage.width = 0.1을
두 개의 열에 이미지를 분배 : 나는 같은 / 단 이미지 (지상하지만 작업 방법)을 추가하는 경우 "if"에 연결된 모드 방법을 사용합니다. 이름 *
Code:
n mod 2 = 0 다음 'pari
y = y + 0.1
x = x - 1개
다른 'dispari
x = x + 0.1을
끝 면
그런 다음 파일의 경로와 이름을 echo : 내가 삽입하고 싶은 이미지 때문에, 파일의 동일한 이름으로 호출되는 폴더에 포함 : 나는 이 기능을 사용했습니다
Code:
objdft = objapp.activedocument 설정
 
이제 남자는 마지막 아이를 필요로 ......(오른쪽으로)

나는 dft 지역에 마우스 클릭으로 발생하는 첫 번째 이미지의 삽입 지점을 좋아합니다.
또는 그림 연골의 위 구획에서 특정 거리.

나에게 도움이되는 좋은 영혼이 있습니까? 뚱 베어
 
이것은 최종 목록입니다.
Code:
하위 importa_qrc()
오류 goto createtoolpalette_error
hardedgeframework.application으로 dim oapp
집합 oapp = getobject (, "solidedge.application")

oapp.screenupdating = 거짓

hardedgeframeworksupport.image2d로 dim oimage


nomefile 커미션, nomedft
pathqrc = "c:\users\paolo\desktop\solid edge" & nomedft & ""
strfiles = 디르 (pathqrc)

x = 0.12의
y = 0.12
₢ 킹
strfiles <> "
설정 oimage = oapp.activedocument.activesheet.images2d.addimage(false, pathqrc & strfiles)

oimage.width = 0.1 'scala la 치수 dell'immagine
이름 * setorigin x, y 'posiziona l'immagine 채널 punto specificato

n mod 2 = 0 다음 'pari
y = y + 0.1
x = x - 1개
다른 'dispari
x = x + 0.1을
끝 면

₢ 킹

strfiles = 디
주 메뉴

oapp.screenupdating = 사실

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

오류 goto 0
출구 sub

createtoolpalette_error:

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

끝 이하
 
예, 복사 / 붙여넣기 오류를 제외하고 ... .
어디 갈거야.... 어쩌면 당신은 여기에 의미?
Code:
nomefile 커미션, nomedft
 
Redhead, 나는 위에 게시 된 코드를 테스트, 이것은 결과입니다 :
내 아름다운 이미지는 두 두 두 두 두에서 두에 있는 cartiglio의 위 겹쳐 쌓였습니다: ₢ 킹cattura2.JPG쇼!!! 아... 감사합니다.
 
예, 복사 / 붙여넣기 오류를 제외하고 ... .
어디 갈거야.... 어쩌면 당신은 여기에 의미?
Code:
nomefile 커미션, nomedft
예... 심지어이 부분의 코드

마우스로 선택한 장소에 사진을 삽입 할 수있는 정보를 찾았습니까?
 
예, 마우스 이벤트를 관리하는 정보는이 가이드에서 찾을 수 있습니다 (내 의견은 명확하게 작성) 이 이름 * "filters" enumerators (selocatefilterconstants)에 대한 동안 당신은 그들을 발견 이름 *예를 들어 vb.net에서 작성되었지만 코드에서 cmq가 코드에서 모든 것을 처리하는 방법을 이해해야 합니다. 물론 @be_on_edge에 대하여 가고 싶은 간단한 방법이 있습니다.

자주적으로 코드를 작성하려고, 의심스러운 경우.... 또한 요청 :)
 
당신의 무한한 가용성과 인내에 감사, 나는 정말 말한다!

나는 당신이 게시 한 링크를 보았고 나는 그들이 정말로 흥미롭고 생각하지만 불행히도 나는 나를 위해 똑똑똑하지 않습니다. 나는 떠나는 것을 확실하지 않습니다. ...

아래는 변수의 선언을 가진 코드의 초기 부분을 배치하지만 나머지는 ...
지금 첫 야생 카드를 재생: 도움!
Code:
하위 clickpoint()
hardedgeframework.application로 dim seapp
dim secommand로 solidedgeframework.command
hardedgeframework.mouse로 dim semouse
 
그러나 많은 의심 나는 확실하다 : 나는 단단한 가장자리의 일정과 변수를 알지 못하고 나는 sdk를 안내하는 방법을 모른다!
물론 너무 많은 인수는 모두 함께 이해하지만,이 제한은 이미 알고.
한국어 나는 시도하고 더 많은 것을 배우려고 주장하지 않았다.

나는 그것을 달성 한 저에게 만족을 준 전체 및 작업 코드를 첨부, 감사합니다.
 

Attachments

Forum statistics

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

Members online

No members online now.

Back
Top