ひとりゴト

2014年05月12日
XML
カテゴリ: プログラミング
調べてみるとなんかメッチャめんどくさそう。。
ファイル名指定するだけで変換してくれるようなのないかなーと検索してて、
とりあえず「 imgctl.dll 」というのを試してみた。

def_dll DIBtoPNG(string,long,bool):long:imgctl.dll
def_dll ToDIB(string):long:imgctl.dll
def_dll DeleteDIB(long):bool:imgctl.dll

DIB = ToDIB("test.BMP")
DIBtoPNG("test.PNG",DIB,0)
deleteDIB(DIB)


※宣言の仕方、引数はよくわからずやってます。たぶんどっか間違ってます。
結果はどうなったかというと。。。

ヽ(`▽´)/

とりあえず目的が果たせた。
作者様、ありがとうございます。宝物にします。




画面からキャプチャしてPNG保存みたいな事できるかな・・・?

def_dll GetDC(hwnd):long:user32.dll
def_dll ReleaseDC(hwnd,hwnd):long:user32.dll
def_dll DIBtoPNG(string,long,bool):long:imgctl.dll
def_dll DCtoDIB(hwnd,long,long,long,long):long:imgctl.dll
def_dll DeleteDIB(long):bool:imgctl.dll

wid = getid(get_frompoint_win)
hwnd = idtohnd(wid)
DC = GetDC(hwnd)
if DC = 0 then exit

DIB = DCtoDIB(DC,g_mouse_x,g_mouse_y,100,100)//デバイスコンテキストから
DIBtoPNG("test.PNG",DIB,0)//保存
deleteDIB(DIB)//必ず破棄
ReleaseDC(DC,hwnd)//必ず開放
doscmd("start test.png")//関連付けられたプログラムで開く


ヽ(`▽´)/





お気に入りの記事を「いいね!」で応援しよう

最終更新日  2014年05月13日 16時47分17秒
コメント(0) | コメントを書く
[プログラミング] カテゴリの最新記事


【毎日開催】
15記事にいいね!で1ポイント
10秒滞在
いいね! -- / --
おめでとうございます!
ミッションを達成しました。
※「ポイントを獲得する」ボタンを押すと広告が表示されます。
x
X

© Rakuten Group, Inc.
X
Design a Mobile Site
スマートフォン版を閲覧 | PC版を閲覧
Share by: