CAE

< FEMAP APIプログラミング >

# No.4692 #　2003年2月3日 # yamasemi #
FEMAPのAPIでプログラミングをしているのですが,ひとつわからない点があります。
引数に配列を要求する関数を使おうとすると,うまくいかないのです。
たとえば,二つの座標系の距離を測る関数femeasuredistanceを使う場合,

Dim dist As Double
Dim p1(2) As Double
Dim p2(2) As Double
..................
rc = femap.femeasuredistance(p1,p2,dist)

などとすると,
Error on line:** - Type mismatch
といわれてしまいます。引数に配列を使わない関数はうまく動くのですが・・・

何かご存知の肩が折られましたらご教示願います。

# No.4693 #　2003年2月3日 # saito #
> Dim dist As Double
> Dim p1(2) As Double
> Dim p2(2) As Double
FEMAPはまったく門外漢ですが・・・
distは配列でもないのに,Dimで配列宣言するのですか?

# No.4698 #　2003年2月4日 # ハッピー #
> Dim dist As Double
> Dim p1(2) As Double
> Dim p2(2) As Double
> ..................
> rc = femap.femeasuredistance(p1,p2,dist)
> Error on line:** - Type mismatch

FEMAPは使いますがAPIは経験ありません
ヘルプをつらつら見ると、座標(p1(0),p1(1),p1(2))と座標(p2(0),p2(1),p2(2))の
距離を求めdistとし、これをrc(return code? record?)に入れる、という意味ですね?
saitoさん、仰るようにスカラー量のdistにDimension宣言はおかしい気がします。
Real8　dist　かな? あるいは省略可能か。

# No.4699 #　2003年2月4日 # yamasemi #
ご返信,ありがとうございます。

ご指摘のdimによる定義ですが,マニュアル内のサンプルを見る限り,
femapではオブジェクトも含め全てdim宣言するようです。
他の定義方法がマニュアルで見つけられませんでしたので,これに従っています。

さて,本題ですが,その後試行錯誤を続けた結果,
p1,p2の定義をせずに実行したところうまく流れるようになりました。
ちょっと気持ち悪いですが,まずはこれで続けてみようと思います。
ありがとうございました。

# No.4704 #　2003年2月4日 # test #
> さて,本題ですが,その後試行錯誤を続けた結果,
> p1,p2の定義をせずに実行したところうまく流れるようになりました。
> ちょっと気持ち悪いですが,まずはこれで続けてみようと思います。
> ありがとうございました。
確信は持てませんが、p1,p2(今回の場合)の定義はVariant型で定義
しなければいけないと聞いたことがあります。
「p1,p2の定義をせずに実行したところうまく流れるようになりました。」
とありますが、データ型を指定しなかったために、Variant型になり上手く
いったのではないでしょうか。
上記記述について、調べたわけではなく、自信がありません。
ご参考までに。

# No.4728 #　2003年2月6日 # tana #
はじめまして
私、FEMAP APIでFEMAPのカスタマイズを多少経験したことのある者です。
現在の最新のFEMAPv8.2に含まれるマニュアルapi.pdfには、
配列型の引数とバリアント型についての記述があります。
(1.2.1 Arrays and Variantsの項目)

マニュアルの中に"All arrays must be passed as Variant data types. In Basic,"
という記述があり、すべての配列型データは、バリアント型データに渡して
FEMAP APIに渡す必要があるようです。

> 「p1,p2の定義をせずに実行したところうまく流れるようになりました。」
> とありますが、データ型を指定しなかったために、Variant型になり上手く
> いったのではないでしょうか。
その通りだと思います。VBでデータ型を指定しない変数は、バリアント型になるため、
結果的に配列型の引数をもつ
FEMAP APIがうまく実行されたのだと思います。

ご参考までに。
(編集担当：T学生 2003/05/27)

< FEMAPでのVRMLについて >

#　2002年1月17日# フランソワ#
> http://www.hoops.ne.jp/~atmori/xvl/
> にAnsysのVRMLをXVLに変換した例を載せました。
by　atmoriさん

見させていただきました。とても詳しく書いてらっしゃって、勉強になります。
うちはFEMAP使ってるんですけど、VRML1とか、2とかってないんですけど、
誰か知っていらっしゃる方、いらっしゃいませんか?
CADからのソリッドモデルをしてみようとも試みたのですが、
こちらも同様です。
VRML形式で保存したものを、
そのままCosmoPlayerに持っていった(練習ではサメが魚を食べるやつです)のですが、
何も表示されないのです・・

#　2002年1月17日# ハッピー#
> うちはFEMAP使ってるんですけど、VRML1とか、2とかってないんですけど、
> 誰か知っていらっしゃる方、いらっしゃいませんか?
byフランソワさん

Helpを見る限り、FileExportの対象はSolidModelのみでコンターは無理でしょう。
SolidもFemapにProModellerオプションを付けて、Femapでモデリングしたもの
が対象のような気がします。私のFEMAPはProModellerでなく、Volumeを作っても
VRML出力不可(Solidがないとのメッセージ)でした。外から取り込んだCADの
3Dデータもこれと同じでは? 　想像ですが。

#　2002年1月18日# フランソワ#
> Helpを見る限り、FileExportの対象はSolidModelのみでコンターは無理でしょう。
> SolidもFemapにProModellerオプションを付けて、Femapでモデリングしたもの
> が対象のような気がします。私のFEMAPはProModellerでなく、Volumeを作っても
> VRML出力不可(Solidがないとのメッセージ)でした。外から取り込んだCADの
> 3Dデータもこれと同じでは? 　想像ですが。
by ハッピーさん

CADでの変換がようやくできました。
というか、ビューワで見たときに、すっごくちっさかっただけでした・・・
拡大していったらちゃんとありました。
私もVolumeを作ってやってたんですが、できませんよねぇ。
ふぅ。
いつもお返事ありがとうございます。
(編集担当：T学生 2002/03/28)

< 各propertyの色の設定など >

#　2002年1月8日# フランソワ#
プリポストにFEMAPを使ってるんですけど、
propertyの色を表示させるのって、どうやるのでしょう?
各propertyごとに色の設定はできるのですが、表示の仕方が・・・

あと、モデルの体積とか面積とかってFEMAP上では分からないんですかねぇ・・

#　2002年1月8日# Ysan#
> プリポストにFEMAPを使ってるんですけど、
> propertyの色を表示させるのって、どうやるのでしょう?
> 各propertyごとに色の設定はできるのですが、表示の仕方が・・・
修正/色/要素　で選択方式を要素特性で要素を選択して、適当な色を選択します。

> あと、モデルの体積とか面積とかってFEMAP上では分からないんですかねぇ・・
ツール/形状特性でみます。体積はソリッド化する必要があります。
以上、V8 日本語でのオペレーションです。

#　2002年1月9日# ハッピー#
> プリポストにFEMAPを使ってるんですけど、
> propertyの色を表示させるのって、どうやるのでしょう?
> 各propertyごとに色の設定はできるのですが、表示の仕方が・・・
byフランソワさん

こんばんは。
Ysanさんの方法でも色の変更は可能ですが、既に
Modify>Color>Property
で、各Propertyに対して色を設定されたのでしたら、
View>Option
のダイアログボックスで、Categolyの「Label、Entity、Color」にチェックを入れた上で
Optionsの箱の中から「Element」を選び、
右側のColorModeを、
デフォルトでは「0.EntityColor」となっているのを「3.PlopertyColor」と
すれば、先に設定したProperty色で色分けされます。

あと、ご存知かも知れませんが、Categolyを「Tools&ViewStyle」にチェックして
Optionsの箱の中から「Fill,BlackFace,Hidden」を選び、
右上の「Fill On」にチェックを入れると塗りつぶしで表示されます。

このView>Optionには可視化の多くの機能が詰め込まれています。

#　2002年1月11日# フランソワ#
> > プリポストにFEMAPを使ってるんですけど、
> > propertyの色を表示させるのって、どうやるのでしょう?
> > 各propertyごとに色の設定はできるのですが、表示の仕方が・・・
> byフランソワさん
>
> Modify>Color>Property
> で、各Propertyに対して色を設定されたのでしたら、
> View>Option
> のダイアログボックスで、Categolyの「Label、Entity、Color」にチェックを入れた上で
> Optionsの箱の中から「Element」を選び、
> 右側のColorModeを、
> デフォルトでは「0.EntityColor」となっているのを「3.PlopertyColor」と
> すれば、先に設定したProperty色で色分けされます。
byハッピーさん

ありがとうございます。
「3.PlopertyColor」とする、ここが抜けていたんですね・・・
(編集担当：T学生 2002/03/28)

< イメージ。 >

# 2001年5月11日 # T-2000 #
実際にどんな物を解析しているかといいますと、タンクなどの板厚は薄い（3mm）のに規模は大きい（高さ4m、直径3m）などです。3mmにあわせれば恐ろしくノード数は増えますし、4mにあわせばメッシュが大きすぎます。またうまく切れませんしね。このようなことが可能になる補助ソフトなどはなうでしょうか？ちなみに3DCADは使用しております。

# 2001年5月12日 # ハッピー #
>タンクなどの板厚は薄い（3mm）のに規模は大きい（高さ4m、直径3m）
>などです。by_T-2000さん
モＬＤさんがおっしゃるように、こりゃシェル要素の出番でしょうね。解析ソフトに中立面オフセット機能があればそれを使う手もありますね。3ｍに対して3mmですから、解析目的によってはオフセットは無視しても良いかも。何れにしても、ＦＥＭＡＰだけでＯＫですよ。
(編集担当：T学生 2001/12/24)

< 円柱（メッシュ）のメッシュ切りについて　 >

# 2000年7月6日 # N4W #
＜環境＞
モデル作図：AutoCadR14(ＭＤＴ（Ver3.0）)
ＣＡＥ：N4WVer3.0
例えば、円筒（上面、下面は空いているものとする）の肉厚：0.01mm高さ：1000mmのモデルをシェル要素として解析したいとき次の手順で行いました。
1）AutoCadR14(ＭＤＴ（Ver3.0）)で円筒の断面を作図。
2）Ｎ4Ｗ側でインポート。この後、以下のことできるのでしょうか？綺麗なメッシュにこだわるので、押出す前にメッシュ切りを行い、メッシュ切りしたものを押出す。で、ひっかかるのは、ソリッドならメッシュ分割後押出せますがシェルの場合、本当にできるのかなという疑問です。ＤＭＳさんの場合だと、どうしてますか？以上よろしくお願いします。

# 2000年7月6日 # DMS #
>1）AutoCadR14(ＭＤＴ（Ver3.0）)で円筒の断面を作図。
>2）Ｎ4Ｗ側でインポート。
> >この後、以下のことできるのでしょうか？綺麗なメッシュに
>こだわるので、押出す前にメッシュ切りを行い、メッシュ切りしたものを
>押出す。
ソリッドデータをFEMAPでオートメッシュする場合、円とか球は大抵汚くなります。今回のように形が簡単な場合は、MDT等のCADを使わずにFEMAP上で全ての作業を行った方が良いと思います。
> >で、ひっかかるのは、ソリッドならメッシュ分割後押出せますが
>シェルの場合、本当にできるのかなという疑問です。
>プレート要素は、ビーム要素を押し出したり回転させて作ることが出来ます。
今回の場合なら、
（1）メニューのGeometoryで直線を画いて、
（2）それ元にビーム要素を作成し、
（3）ビーム要素と平行なベクトルを中心に（2）を回転させる以上で円筒をプレート要素で作ることができます。
ご指名なので少々緊張しています（笑）またしても外していたらごめんなさい。
(編集担当：T学生 2001/12/24)

< IGESファイルについて >

# 2000年6月27日 # N4W #
MDT（Ver3.0）において、円を書きMDTにおける押出しサーフェイスで押出した後IGESで吐出し、NasranForWindowsでデータを読込ましたが、MDTで押出すもとになった底面のみがインポートされてます。なぜ、インポートされないのでしょうか？

# 2000年6月27日 # DMS #
N4Wさん、はじめまして。DMSと申します。MDTはバージョン4ですが、ほとんど同じ環境だと思います。 >MDT（Ver3.0）において、円を書きMDTにおける押出しサーフェイスで押出した後 >IGESで吐出し、NasranForWindowsでデータを読込ましたが、 >MDTで押出すもとになった底面のみがインポートされてます。 >なぜ、インポートされないのでしょうか？私のところでは、円の帯がインポート出来ました。インポートした形状を使った適当な解析（プレート要素）も通っています。「Ctrl」+「Q」で見れるビューのオプションはどうなっていますか？N4Wさんの書き込みはソリッドをFEMAPへインポートしたいように取れるのですが、そうでしたらSATファイルの方が良いと思います。その際AutoCADが吐き出すACISのバージョンが問題になりますが、acsioutverコマンド（かなり自身無し）で設定できたハズです。#ACISのホームページで落とせるビューワでもバージョンの変更が出来ます。以上長々と書き込みましたが、外していたらごめんなさい。同じN4Wユーザーということで、これからよろしくお願いします。

# 2000年6月28日 # N4W #
DMSさん、こんにちわ！
>「Ctrl」+「Q」で見れるビューのオプションはどうなっていますか？
すべての項目にチェックがついています。
>N4Wさんの書き込みはソリッドをFEMAPへインポートしたいように取れるのですが、
そのとおりです。
>そうでしたらSATファイルの方が良いと思います。
SATだとソリッドになりますよね？SATの吐出し方法は、しってます。（バージョンの変更も）目的は、N4Wにおけるシェルとして、扱いためＩＧＥＳで吐出したいと思っているのです。よろしくご指導のほどお願い致します。

# 2000年6月28日 # DMS #
>SATだとソリッドになりますよね？
>SATの吐出し方法は、しってます。（バージョンの変更も）
>目的は、N4Wにおけるシェルとして、扱いため
>ＩＧＥＳで吐出したいと思っているのです。
>よろしくご指導のほどお願い致します。
すいません。見当違いの回答をしてしまいました。SATはその名(SolidAsText)が示すとおりソリッドのための書式ですが、サーフェスも大丈夫だったと思います。（昔試しにやった記憶があります）IGESは普段使っていないので詳しいことはアドバイス出来ませんが、XY平面状の直径10mmの円を、AutoCADの「押し出しサーフェス」でZ軸方向へ50mm押し出した形状のIGESファイルの内容を載せておきます。私はこのファイルをFEMAPへインポートして、筒の形の有限要素モデル（プレート要素）を作成することが出来ました。「N4W」さんの円しか表示できないファイルがこれより少ないデータなら、正常にエクスポートされていない可能性があります。IGESに詳しい方のアドバイスをお願いします。
-------------以下AutoCADでエクスポートしたIGESファイル-----
S 1,,20HE:\work\Drawing4.dwg,46H\\Semi6\work\miyamoto\SATfiles\iges\t_iges.G 1igs,70HAutoCAD-15.0h(HardwareLock)(MicrosoftWindowsNTVersion4.0(G 2x86)),64HAutodeskIGESTranslatorR15.0(Sep 11999)fromAutodesk,IncG 3.,32,38,6,99,15,20HE:\work\Drawing4.dwg,1.0D0,1,2HIN,211, G 48.30708661417323D-2,15H20000628.221830,2.07052689747811D-7, G 5207.052689747811D0,,,11,0,15H20000628.221349,; G 6100 1 0 1 0 0 0000000000D 1100 0 8 3 00D 2406 4 0 0 0 0 0000000000D 3406 0 0 1 30D 4128 5 0 1 0 0 0000000000D 5128 0 820 00D 6100,0.0D0,201.552689747811D0,127.501910703026D0,1P 1206.552689747811D0,127.501910703026D0,206.552689747811D0,1P 2127.501910703026D0;1P 3406,2,0,1H0;3P 4128,8,1,2,1,1,0,0,0,0,0.0D0,0.0D0,0.0D0,.25D0,.25D0,.5D0,.5D0,5P 5.75D0,.75D0,1.0D0,1.0D0,1.0D0,0.0D0,0.0D0,1.0D0,1.0D0,1.0D0,5P 6.707106781186548D0,1.0D0,.707106781186548D0,1.0D0,5P 7.707106781186548D0,1.0D0,.707106781186548D0,1.0D0,1.0D0,5P 8.707106781186548D0,1.0D0,.707106781186548D0,1.0D0,5P 9.707106781186548D0,1.0D0,.707106781186548D0,1.0D0,5P10206.552689747811D0,127.501910703026D0,0.0D0,206.552689747811D0,5P11132.501910703026D0,0.0D0,201.552689747811D0,132.501910703026D0,5P120.0D0,196.552689747811D0,132.501910703026D0,0.0D0,5P13196.552689747811D0,127.501910703026D0,0.0D0,196.552689747811D0,5P14122.501910703026D0,0.0D0,201.552689747811D0,122.501910703026D0,5P150.0D0,206.552689747811D0,122.501910703026D0,0.0D0,5P16206.552689747811D0,127.501910703026D0,0.0D0,206.552689747811D0,5P17127.501910703026D0,50.0D0,206.552689747811D0,132.501910703026D0,5P1850.0D0,201.552689747811D0,132.501910703026D0,50.0D0,5P19196.552689747811D0,132.501910703026D0,50.0D0,196.552689747811D0,5P20127.501910703026D0,50.0D0,196.552689747811D0,122.501910703026D0,5P2150.0D0,201.552689747811D0,122.501910703026D0,50.0D0,5P22206.552689747811D0,122.501910703026D0,50.0D0,206.552689747811D0,5P23127.501910703026D0,50.0D0,0.0D0,1.0D0,0.0D0,1.0D0;5P24 S1G6D6P24 T 1
(編集担当：T学生 2001/12/24)