HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2021
0926
ねんねこpackdllが機能しない3解決


ねんねこ

リンク

2021/9/26(Sun) 12:18:15|NO.93984

↓で配布されている、PackDllが機能しません。
https://hsp.moe/#packdll
ソースコードはこれです。

#runtime "hsp3ld" #include "packdll.as" // パックファイルからDLLを読み込む(実行ファイルにしたとき) LoadPackDLL "hspinet.dll" // #func #cfunc のみ if stat : dialog "hspinet.dll の読み込みに失敗しました" : end //http://hsp.tv/play/pforum.php?mode=pastwch&num=91873 #pack "hspinet.dll" #include "hspinet.as" #include "hsp3utf.as" #packopt name "Dischat" #packopt icon "discord_logo_icon_145337.ico" title "Dischat" *chat cls a="" name="" netinit neturl "https://discord.com/api/webhooks/891512627711340564/84fYix8XV68UChUCs3CesL8pVv6D2IZ2KpHaGfkUogydR2IGJHHH9sQV1n7-n4uH4VIe" netheader "Content-Type: application/json" pos 0,0:mes "名前" pos 0,20:input name,100,20 pos 0,60:mes "内容" pos 0,80:input a,100,20 button "送信",*start stop *start b="{\"content\": \""+name+":"+a+"\"}" //a="{\"content\": \"Hello from Webhook\\n改行は\\\\\\\\\\\\\\\\nで送るらしいですよ。\"}" netrequest_post "",b //以下sample/hspinet/test7.hspのアレ 結果は何も表示されない で正解。 mes "DOWNLOAD 開始" *main ; 結果待ちのためのループ netexec res if res > 0 : goto *comp if res < 0 : goto *bad await 50 goto *main *bad ; エラー neterror estr mes "ERROR "+estr stop *comp ; 完了 cls goto *main23 *main23 netinit neturl "https://discord.com/api/webhooks/891513956391329812/czxOB8TlV2B1dV7RfVQVdVavsGP_4hB9rtwvVP1-5Aw3t0CxJS1uoQhW_vUNxIX0XHfk" netheader "Content-Type: application/json" netrequest_post "",b goto *main2 *main2 ; 結果待ちのためのループ netexec res if res > 0 : goto *comp2 if res < 0 : goto *bad2 await 50 goto *main2 *bad2 ; エラー neterror estr mes "ERROR "+estr stop *comp2 ; 完了 cls mes "送信完了" button "もう一度chat",*chat netgetv buf mesbox buf,640,400,1



この記事に返信する


ねんねこ

リンク

2021/9/26(Sun) 12:19:44|NO.93985

実行すると、
hsp3ldランタイムが使用されていません。終了します。
と表示されてしまいます。



UT-X

リンク

2021/9/26(Sun) 12:41:03|NO.93986

PackDllは古いスクリプトなので、現在のバージョンだと使えなくなっている可能性があります。
私は以前(HSP3.4付近)にこれを使って開発中のソフトにDLLの同梱を試みましたが、
#regcmdを使っていたために断念しました。
現在は、以下の方法でDLLファイルを実行ファイルに同梱しています。
#pack "hspinet.dll"
#ifndef _debug exist ""+dir_cur+"\\hspinet.dll" if strsize=-1{ bcopy "hspinet.dll",""+dir_cur+"\\hspinet.dll" } #endif
実行ファイルと同じ場所に無かった場合に、実行ファイル内部にあるファイルをコピーするというものです。
これはDLL以外の、#packだけでは呼び出せないファイルにも通用します。



ねんねこ

リンク

2021/9/26(Sun) 14:46:04|NO.93989

ありがとうございます。参考になります。



記事削除

記事NO.パスワード
(質問が解決したスレッドは他の利用者に活用してもらうため、削除しないようお願いします)

NO.93984への返信

マスコット

好きなマスコットを選んでください。

名前

e-mail
HOME
  1. 初めて利用する方は、HSP3掲示板の使い方をお読みください。
  2. 不要部分の多い長いスクリプトの投稿は ご遠慮ください。
  3. 書き込みは自動改行されません。適度に改行を入れてください。
  4. スクリプトは小文字の<pre>〜</pre>で囲むと見やすく表示できます。

削除用パスワード

解決したら質問者本人がここをチェックしてください。

エラー発生時、再送信すると二重送信になることがあります。
回答が得られたら、お礼書き込み時に[解決]チェックしてください。
SPAM防止のためURLから始まる文章は投稿できません。
SPAM防止のため英文字のみの本文を投稿することはできません。

ONION software Copyright 1997-2021(c) All rights reserved.