HSPTV!掲示板

連続投稿すいません
先ほどの続きです

#include "hspext.as"

buffer 0
exec "D:\\Program Files\\TeraPad\\TeraPad.exe",16

wait 10
aplsel "無題"

aplact

aplobj "EDIT"
wait 10
aplstr "#!D/perl/bin/perl"
wait 15

TeraPadには付属でヘッダをつける機能がないのでそれをHSPで実装してみようと思ったのですがうまくいきません
（文の最初にperlのパスを入れたい、毎回同じなため・・・）



メモ帳なら
　　　　aplobj "EDIT"
wait 150
aplstr "自動入力中...."
wait 15
でうまくいくのですが・・・


データを送信するときはオブジェクトIDというのが必要なんですよね？
それがわかりません


わかる方ぜひご教授願います

>aplobj "EDIT"
aplobjには"EDIT"ではなく"TEditor"を指定する必要があるみたいです。

回答ありがとうございます

#include "hspext.as"

screen 0
exec "D:\\Program Files\\TeraPad\\TeraPad.exe",16

wait 100
aplsel "無題"
mes refstr:mes stat

aplobj "TEditor"
mes refstr:mes stat
wait 15
aplstr "#!D/perl/bin/perl"
wait 15
stop

にしました
スクリーン0には

無題 - TeraPad
0
TEdit
0

と表示されます

オブジェクトのキャプチャにはどうやら成功しているようなんですが文字が表示されません

うーん、apl系じゃ無理かな

#uselib "user32.dll"
#cfunc FindWindow "FindWindowA" sptr,sptr
#cfunc FindWindowEx "FindWindowExA" sptr,sptr,sptr,sptr
sendmsg FindWindowEx(FindWindow("TTeraPadMainForm", 0), 0, "TEditor", 0), $0000000C, 0, "#!D/perl/bin/perl"
stop

ありがとうございます。
うまくできました＾＾。感謝します。

やはり外部DLL使用ですかぁー・・・。