Jw_cad 情報交換室−その3New

 JWW についての情報交換の場としてお使いください
初心者の方などのご相談は Jw_cad 相談 室−その2をご利用ください
なお、情報交換室と相談室の両方に同じ内容を投稿するのはご遠慮ください

2009年9月以前の発言過去ログのページからご覧ください。

それ以降の過去ログは消失しています。
申し訳ありませんが、復活の予定はありません。


  新規投稿 ┃ツリー表示 ┃スレッド表示 ┃一覧表示 ┃トピック表示 ┃番号順表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12 / 301 ツリー    ←次へ | 前へ→

図面情報コピーとタグジャンプ mirror 17/3/22(水) 19:33

Re:図面情報コピーとタグジャンプ mirror 17/4/1(土) 11:16
Re:図面情報コピーとタグジャンプ いっち 17/4/1(土) 14:48

Re:図面情報コピーとタグジャンプ
 mirror  - 17/4/1(土) 11:16 -
▼いっちさん:

>UWSCでDoEventsを実行となると、少々勉強が必要です

DoEventsの実態の動作は

PeekMessage(msg,NULL,0,0,PM_REMOVE)が真の間
msg構造体内のmessageを調べて
WM_QUITならExitProcess()
そうでない場合は
TranslateMessage(msg)とDispatchMessage(msg)を実行するです

WindowsAPIを使えば、UWSCでも実装できると思います
Exmenuでは、CPU使用率低減や実行速度改善のため自前で実装しています

引用なし

パスワード


<Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/51.0.2704.79 Safari/537.36 Edg...@FLA1Aae197.koc.mesh.ad.jp>
・ツリー全体表示

Re:図面情報コピーとタグジャンプ
 いっち  - 17/4/1(土) 14:48 -
mirrorさんのレスの内容が、現在の私にとっては、大変難しい内容の為、今すぐに具体的なコードを書くことは出来ません。

しかしながら、mirrorさんのレスの内容は、単に難しいだけでは無く、的確な内容を書かれているように思える為、取り急ぎ、mirrorさんのレスの内容そのままを解る範囲でコードにしてみました。

ここに書いた内容を、UWSCで実際に動かすような事は、一切行っておりません。(というより、このままでは、行えないはずです。)
どこが間違えているかも、(私本人は)解っていません。

いつになったら、ちゃんとしたコードが書けるのか、謎です。

> WindowsAPIを使えば、UWSCでも実装できると思います

// DEF_DLL 関数名(型, 型, ...): 戻り型: DLL名
// 型: int、long、bool、uint、hwnd、string、Wstring、float、double、word、dword、byte、char、pchar、Wchar、pWchar、boolean、longlong、SafeArray
// 構造体:型を { } にて展開して書く 関数名( double, {int, int, int} ) 
DEF_DLL PeekMessage({LPMSGのUWSCでの指定方法不明です?},hwnd,uint,uint,uint)bool:user32.dll

> DoEventsの実態の動作は
> PeekMessage(msg,NULL,0,0,PM_REMOVE)が真の間
> msg構造体内のmessageを調べて
> WM_QUITならExitProcess()
> そうでない場合は
> TranslateMessage(msg)とDispatchMessage(msg)を実行するです

// DoEventsの実態の動作は
Procedure UwscDoEvents()
// PeekMessage(msg,NULL,0,0,PM_REMOVE)が真の間
While PeekMessage(msg,NULL,0,0,PM_REMOVE)
// msg構造体内のmessageを調べて
Select msg.message
// WM_QUITならExitProcess()
Case WM_QUIT
ExitProcess()
// そうでない場合は
// TranslateMessage(msg)と
// DispatchMessage(msg)を実行するです
Default
TranslateMessage(msg)
DispatchMessage(msg)
Selend
Wend
Fend

引用なし

パスワード


<Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/57.0.2987.133 Safari/537.36@KD113151236026.ppp-bb.dion.ne.jp>
・ツリー全体表示

12 / 301 ツリー    ←次へ | 前へ→
  新規投稿 ┃ツリー表示 ┃スレッド表示 ┃一覧表示 ┃トピック表示 ┃番号順表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
 651995
ページ:  ┃  記事番号:  

C-BOARD Moyuku v1.03b3
Jw_cad Copyright (C)1997-2016 Jiro Shimizu & Yoshifumi Tanaka