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


HSPTV!掲示板


未解決 解決 停止 削除要請

2019
0331
Densyaobjimageで使用する画像のx軸をそのままで拡大1未解決


Densya

リンク

2019/3/31(Sun) 18:36:50|NO.87013

題名にもある通り、objimageで使用する画像のx軸をそのまま変えずにy軸だけ拡大したいです。
一度gcopy等で試してみましたが、x軸も一緒に拡大してしまいます。
どうにか出来ないでしょうか...。



この記事に返信する


とあるプログラマ

リンク

2019/4/6(Sat) 00:03:14|NO.87085

多少面倒にはなりますが、a2dのストレッチコピーを使えばいけます。a2dは汎用性が高いので、こちらを使うことをオススメします。

#include "a2d.hsp" screen 0 buffer 1 ;ここのファイルは自前のに変えてください alCreateImageByFile 0,"C:/Windows/SystemApps/Microsoft.Windows.ContentDeliveryManager_cw5n1h2txyewy/Images/SmallLogo.scale-100.png" if stat=-1 : dialog "エラー" : end ; ImageID,スクリーンID , コピー元座標x,y , コピー元サイズx,y , コピー先座標x,y , コピー先サイズx,y alStretchImageToScreen 0,1 , 0,0 , alGetWidth(),alGetHeight(), 0,0, alGetWidth(),alGetHeight()*2 ;コピー先の縦(Y)を2倍 alStretchImageToScreen 0,0 , 0,0 , alGetWidth(),alGetHeight(), 0,0, alGetWidth(),alGetHeight()*2 ;メインウィンドウにも確認用にコピー gsel 0 objimage 1, 0,0 , 0,0 , 0,0 objsize alGetWidth(),alGetHeight()*2 ;ボタンサイズを設定 pos alGetWidth()+10,0 ;右隣に配置 button gosub "",*press redraw 1 stop *press mes "ぽち" return



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