HSPTV!掲示板

スレッド一覧 | 新規書き込み | 新着一覧 | 使い方 | 過去ログ

未解決

解決

停止

削除要請


	2014 0402	マメシバ	axobjに余白ができてしまう･･･	10

マメシバ

2014/4/2(Wed) 10:25:43|NO.61231

axobjでgif形式(アニメ付き)を再生すると、左側と上側に余白ができてしまいます。
背景が黒だと白く余白が見えます。これはどうにかできないのでしょうか？余白を消す方法教えてください。

この記事に返信する

cats

2014/4/2(Wed) 10:36:16|NO.61232

gifを編集して背景色に合わせるのが楽かと思います。

あり

2014/4/2(Wed) 12:37:06|NO.61236

GIF画像とウィンドウサイズが同じなら
posでaxobjの位置調整をする事で、とりあえず余白は見えなく出来ます。
（私の環境ではpos -10, -15でGIF画像が左上端に密着しました）

マメシバ

2014/4/2(Wed) 14:08:06|NO.61237

catsさん、ありさん回答ありがとうございます。

>pos -10,-15でGIF画像が左上端に密着しました
できれば右下の方で使いたいのですが･･･

あり

2014/4/2(Wed) 16:13:37|NO.61242

根本的な疑問として、アニメGIFをどう使いたいのでしょう？
以前回答されたMCIでの再生ではダメなのですか？

Mameshiba

2014/4/2(Wed) 17:29:11|NO.61243

前回の質問そのままになってますよ。

マメシバ

2014/4/2(Wed) 19:51:39|NO.61261

mciでやってみたのですが、アニメーションになりませんでした…
止まったままです。

あり

2014/4/2(Wed) 23:06:16|NO.61283

axobj内での表示変更は分からないので、MCI再生でのサンプルを作ってみました。



;	Let's HSP!さんのサンプル【http://lhsp.s206.xrea.com/hsp_tips3.html#1】を改変。

	onexit *exit

	dialog "gif", 16, "画像ファイル"
	if stat = 0 : stop
	fname = refstr  ;  GIFファイルのパス
	
	buffer 1  ; GIFのサイズ取得の為、バッファに一度読み込む（サイズが分かっていれば必要なし）
	picload fname
	gifx = ginfo_sx  ;  GIFファイルのXサイズ
	gify = ginfo_sy  ;  GIFファイルのYサイズ

	gsel 0
;	GIFファイルの読み込み
	mci "open \""+fname+"\" alias A type mpegvideo style child parent "+hwnd+""

;	表示位置の設定 (画面右下に表示)
	mci "put A window at "+(ginfo_sx-gifx)+" "+(ginfo_sy-gify)+" "+gifx+" "+gify

;	GIFファイルの表示 or 再生
;	(｢repeat｣はアニメーションGIF用で、通常の画像表示なら不要)
	mci "play A repeat"

	mes "読み込み中"
;----------  ここから読み込み処理を書く  ----------

	wait 500  ;  仮想読み込みのwait（約5秒）

;----------  読み込み処理ここまで  ----------
	mci "stop A"  ;  アニメ停止
	mci "close A"  ;  MCIを開放しないと表示が消せない
	
	cls
	mes "読み込み終了"
	stop

*exit
	mci "close A"
	end

マメシバ

2014/4/2(Wed) 23:27:13|NO.61285

ありさんサンプルありがとうございます。
しかし…動かない！ちゃんとアニメーションGIFファイルだったのですが…

色々とやって地道にがんばります、、、ありがとうございました。

gotu

2014/4/3(Thu) 08:14:54|NO.61293

私の環境ではありさんのサンプル問題なく動きました。
ひょっとしたらマメシバさんのGifファイルに問題あるのかも。
画像はちょうど目的の用途に使えそうな以下のサイトで紹介されてたものを使いました。
http://gigazine.net/news/20080205_loadinfo_gif/

ついでにaxobjを使って左上に出すサンプルもおいておきます。



	onexit *exit
	dialog "gif", 16, "画像ファイル"
	if stat = 0 : stop
	fname = refstr  ;  GIFファイルのパス
	html={"
		<html>
		<body scroll="no" topmargin=0 leftmargin=0>
		<img src='file://%s'>
		</body>
		</html>
	"}
	axobj oIE, "Shell.Explorer.2", 640,480
	oIE->"navigate" "about:blank"
	oDoc=oIE("document")
	oDoc->"write" strf(html,fname)
	oDoc->"close"
	delcom oDoc
	stop

*exit
	delcom oIE

	end

マメシバ

2014/4/3(Thu) 13:59:32|NO.61300

gotuさんありがとうございます。

やはり教えていただいたサイトのGIFファイルでもくるくる回りませんでした…
くっつけてくださったサンプルを使ってみたところ…ちゃんと動いてるし余白もなくなってる！
ということで活用させていただきます。ありがとうございました！