• このフォーラムは、www.cad3d.it/forum1 - イタリアのデザインコミュニティの機械翻訳です。いくつかの用語は正しく翻訳されていません。

ipropertiesからテキスト部分を抽出する

  • Thread starter Thread starter MARCOC
  • Start date Start date
se spieghi più chiaramente il problema e descrivi la soluzione adottata per le parti.
 
ok ci provo con degli esempi
creo dei file *.ipt e li salvo con nome es. 4676-03 fondello ( codice + descrizione) e per fare la codifica uso una questa regola:

{ 'copia parte number
iproperties.value("custom", "num parte intero")=iproperties.value("project", "part number")
' trasforma part number in testo
iproperties.value("custom", "num in txt")=cstr(iproperties.value("custom", "num parte intero"))
' copia le 4 cifre del part number
iproperties.value("custom", "num padre")= left (iproperties.value("custom", "num in txt"),4)
' trasforma in testo le 4 cifre copiate
iproperties.value("custom", "num padre txt") = cstr(iproperties.value("custom", "num padre"))
' taglia il part number dove c'è - a dx
strsplit=split(iproperties.value("custom", "num in txt"),"-")
iproperties.value("custom", "num parte+descr")= strsplit (1)
' trasforma in testo il taglio a dx
iproperties.value("custom", "num parte+descr txt")= cstr (iproperties.value("custom", "num parte+descr"))
' taglia il part number dove c'è spazioe a dx
strsplit=split (iproperties.value("custom", "num parte+descr txt")," ")
iproperties.value("custom", "descr txt")= strsplit (1)
' taglia il part number dove c'è spazioe a sx
strsplit=split (iproperties.value("custom", "num parte+descr txt")," ")
iproperties.value("custom", "num parte txt")= strsplit (0)
' compila
iproperties.value("project", "description")=iproperties.value("custom", "descr txt")
' elemento separatore
iproperties.value("custom", "separatore")= "/"
' compila
iproperties.value("project", "part number")= iproperties.value("custom", "num padre txt")+iproperties.value("custom", "separatore")+iproperties.value("custom", "num parte txt") }

ho cercato di descrivere passo per passo quello che fa.

ma negli assiemi non funziona sai esiste un modo per farla a fare a tutte le parti di un assieme ?
allego esempi
DISTINTA STRUTTURATA.JPGNOMI FILE.JPG
 
"ma negli assiemi non funziona" significa che non genera il codice desiderato per l'assieme o che vuoi che si passi tutti gli elementi dell'assieme facendo quello che deve fare? tipo il codice che ho proposto due o tre post fa in questa discussione?

nel secondo caso non saprei, ilogic non lo conosco bene, penso sia possibile perchè se si può fare in vba da quello che so si può fare anche in ilogic ma servono alcune conversioni che non mi sono chiare e non ho tempo per esperimenti, sorry...
 
ciao
scusate il ritardo nel rispondere, ma è stata una settimana molto impegnativa, quello che vorrei fare tornado alla richiesta " negli assiemi non lo fà" , i miei colleghi sono un pò allergici ad ilogic e quindi quando mi trovo a dove maneggiare parti o assiemi creati da altri, devo rinominare e o spostare la descrizione a mano, o quando va bene aprire le singole parti e eseguire la regola del #22
 
あなたにとって重要なことではない何かを試してみると、それがうまくいくと思いますが、決して言えません。
Code:
' aggiorna i numeri プログレッシヴィ
パブリックサブupdateprogressivo()
アプリケーションとして dim oapp
oapp = このアプリケーションを設定する

odoc をドキュメントとして
odoc = oapp.activeeditdocument を設定する

dim spn を文字列として
spn = readpartnumber(odoc) ディレクティブ

dim はひもとしてコードします
dim の orefdocs は変種として
ドキュメントとしてのorefdoc

コールコーデレータ(odoc)

' si collega ai documenti usati nell'assieme
orefdocs = odoc.allreferenceddocuments を設定する

' aggiorna tutti i ドキュメンタリー collegati
orefdocs.count の場合 > 0 それから
orefdocs の各 orefdocs
コールコーデレータ(orefdoc)
次へ
端 もし

エンドサブ

プライベートサブコーデレータ(ドキュメントとしてodoc)
dim spn を文字列として
spn = readpartnumber(odoc) ディレクティブ

dim はひもとしてコードします

' se il numero parte è più lungo di による caratteri
' プレンデ グリ ultimi デュ カルテリ e li copia nella ipropery Personalizzata
strings.len(spn) の場合 > 2 それから
scode = strings.right(スプン、2)
その他
scode = ""
端 もし

コール writecustomproperties(odoc、progressivo、scode)
エンドサブ

文字列としてのプライベート関数 readpartnumber(odoc )


'definisce vari set di proprietà: -------------------------------------------------------------------------------------
dim プロパティセットとして opropsets
opropsets = odoc.propertysets を設定する

「設計追跡のproprieties
dim odesigntrackingproprieties as プロパティセット
odesigntrackingproprieties = opropsets.item("{32853f0f0f-3444-11d1-9e93-0060b03c1ca6}")

readpartnumber = odesigntrackingproprieties.itembypropid(kpartnumberdesigntrackingproperties).value

エンド機能

プライベートサブ writecustomproperties(ドキュメントとしてodoc、文字列としてspropid、文字列としてspropvalue)
dim ocustompropset プロパティセットとして
ocustompropset = odoc.propertysets.item("{d5cdd505-2e9c-101b-9397-08002b2cf9ae}")

dim bpropexist として boolean
bpropexist = 偽

dim プロパティとして不適切
dim ocustomprop プロパティとして

ocustompropsetの各不適当なのため
oprop.name = spropid の場合、
bpropexist = true
ocustomprop = 不適切な設定
出口のための
端 もし
次へ

bpropexist = false の場合
ocustompropset.add(spropvalue、spropid) を呼び出す
その他
ocustomprop.value = spropvalue
端 もし
エンドサブ
ilogic ではなく、vba です。フォーラムで見ていると、すべてをコピーする方法と場所が見つかられば、数回書いています。
お問い合わせ
美しいサブス, コピーして使用.
お問い合わせ
 
あなたにとって重要なことではない何かを試してみると、それがうまくいくと思いますが、決して言えません。
Code:
' aggiorna i numeri プログレッシヴィ
パブリックサブupdateprogressivo()
アプリケーションとして dim oapp
oapp = このアプリケーションを設定する

odoc をドキュメントとして
odoc = oapp.activeeditdocument を設定する

dim spn を文字列として
spn = readpartnumber(odoc) ディレクティブ

dim はひもとしてコードします
dim の orefdocs は変種として
ドキュメントとしてのorefdoc

コールコーデレータ(odoc)

' si collega ai documenti usati nell'assieme
orefdocs = odoc.allreferenceddocuments を設定する

' aggiorna tutti i ドキュメンタリー collegati
orefdocs.count の場合 > 0 それから
orefdocs の各 orefdocs
コールコーデレータ(orefdoc)
次へ
端 もし

エンドサブ

プライベートサブコーデレータ(ドキュメントとしてodoc)
dim spn を文字列として
spn = readpartnumber(odoc) ディレクティブ

dim はひもとしてコードします

' se il numero parte è più lungo di による caratteri
' プレンデ グリ ultimi デュ カルテリ e li copia nella ipropery Personalizzata
strings.len(spn) の場合 > 2 それから
scode = strings.right(スプン、2)
その他
scode = ""
端 もし

コール writecustomproperties(odoc、progressivo、scode)
エンドサブ

文字列としてのプライベート関数 readpartnumber(odoc )


'definisce vari set di proprietà: -------------------------------------------------------------------------------------
dim プロパティセットとして opropsets
opropsets = odoc.propertysets を設定する

「設計追跡のproprieties
dim odesigntrackingproprieties as プロパティセット
odesigntrackingproprieties = opropsets.item("{32853f0f0f-3444-11d1-9e93-0060b03c1ca6}")

readpartnumber = odesigntrackingproprieties.itembypropid(kpartnumberdesigntrackingproperties).value

エンド機能

プライベートサブ writecustomproperties(ドキュメントとしてodoc、文字列としてspropid、文字列としてspropvalue)
dim ocustompropset プロパティセットとして
ocustompropset = odoc.propertysets.item("{d5cdd505-2e9c-101b-9397-08002b2cf9ae}")

dim bpropexist として boolean
bpropexist = 偽

dim プロパティとして不適切
dim ocustomprop プロパティとして

ocustompropsetの各不適当なのため
oprop.name = spropid の場合、
bpropexist = true
ocustomprop = 不適切な設定
出口のための
端 もし
次へ

bpropexist = false の場合
ocustompropset.add(spropvalue、spropid) を呼び出す
その他
ocustomprop.value = spropvalue
端 もし
エンドサブ
ilogic ではなく、vba です。フォーラムで見ていると、すべてをコピーする方法と場所が見つかられば、数回書いています。
お問い合わせ

ipropertiesから「数値リビジョン」を抽出する方法を教えてください。
コードや他のフィールドを抽出することができますが、それではありません。

他にも、様々なプロパティのエッヘが見つかる方法を教えてください。

お問い合わせ
 
感謝のカタファクト、
カードは以下のとおりです。

- 名前:「発明者サマリー」
- アイテム: {f29f85e0-4ff9-1068-ab91-08002b27b3d9}
- フィールド:「修正番号」

ps: 個人的には個人的に知っておく必要があります!
 

Forum statistics

Threads
46,674
Messages
380,976
Members
2
Latest member
loop80
このフォーラムは、www.cad3d.it/forum1 - イタリアのデザインコミュニティの機械翻訳です。いくつかの用語は正しく翻訳されていません。

Members online

No members online now.
Back
Top