トップページ⇒tech
295コメント81KB

2ちゃんねる発『画像ビューア』作成スレ

■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん NGNG

２ちゃんねる発のフリーの画像ビューアを作りませんか？
0002デフォルトの名無しさんNGNG
作りませんかといって、ほんとは
「作ってください」ってのが定番だな。
0003デフォルトの名無しさんNGNG
3get
0004デフォルトの名無しさんNGNG
>>1
OSは？言語は？クライアントはIE？
0005デフォルトの名無しさんNGNG
Delphiでおながいします。
0006デフォルトの名無しさんNGNG
なんでわざわざいまさら画像ビューアなんぞ作らねばならんのだ？
0007デフォルトの名無しさんNGNG
>>1
なんでコテハンじゃないの？
00081NGNG
>>2
その通りです
作ってくださいm(_ _)m
>>4
＞OSは？
ウィンドウズ
＞言語は？
Delphi6 パーソナル
＞クライアントはIE？
なんですか？わかりません（； ´Д｀）
00095NGNG
Ｂ　Ｉ　Ｎ　Ｇ　Ｏ　！！ヽ（´∀｀　）ノ
0010デフォルトの名無しさんNGNG
＞＞クライアントはIE？
＞なんですか？わかりません（； ´Д｀）
いや、ビューワそのものは何で動かすのか。
ブラウザなのかWindowsアプリなのかFlashなのか。
でもDelphi知らないので１ヌケです・・・
0011デフォルトの名無しさんNGNG
どうせ得ろ画像がみたいだけなんだろ
0012デフォルトの名無しさんNGNG
Delphiという時点で終わり、
いいものができてもデルの速度のもんだいが必ず出てる
0013デフォルトの名無しさんNGNG
輪郭抽出して AA に変換表示するビューアってことで。
0014デフォルトの名無しさんNGNG
delphiでつくるなら、VCLにどこまで依存させるか考えなきゃあかん。
TBitmapでデータをもつのか？
0015デフォルトの名無しさんNGNG
フサギコ来て〜
0016デフォルトの名無しさんNGNG
それではＰ２Ｐビューアということで
話はまとまりましたか？
0017デフォルトの名無しさんNGNG
＞16
ｿﾚﾀﾞっ
半角画像専用P2Pビューアマンセー
0018デフォルトの名無しさんNGNG
Ｐ２Ｐビューア、、できたらすごいぜ。
0019デフォルトの名無しさんNGNG
ＡＡ用のフォーマットを作るのはどうですか
0020デフォルトの名無しさんNGNG
作れば？
0021デフォルトの名無しさんNGNG
フォント埋め込み出来る奴？
……って、PDFでいいじゃん。
0022デフォルトの名無しさんNGNG
1よ
目的はなにかはっきりしろ！
0023デフォルトの名無しさんNGNG
画像ビューわ

<IMG SRC="見たい画像のパスをここに入れてね！">
0024デフォルトの名無しさんNGNG
>23
フォルダ内の画像ファイルを検索して、
そのタグにはめ込んで一つのHTMLファイル作れば意外に便利かもな。
スクリプトで十分できるだろーし。
0025デフォルトの名無しさんNGNG
Cで作って見ました、適当に改良してﾁｮ。

#include <stdio.h>
#include <direct.h>
#include <sys/stat.h>

void readImageDir(char *path) {
DIR *d;
char w[256];
struct dirent *e;
struct stat s;

if ((d = opendir(path)) == NULL)
return;

chdir(path);
printf("<html><body>\n");
0026デフォルトの名無しさんNGNG
while((e = readdir(d)) != NULL) {
stat(e->d_name, &s);
if (
!S_ISDIR(s.st_mode)
&& strcmp(".", e->d_name) != 0
&& strcmp ("..", e->d_name) != 0
) {
printf("<img src=\"./%s\">\n", e->d_name);
}
}
printf("</html></body>\n");
closedir(d);
}
0027デフォルトの名無しさんNGNG
void main(int argc, char *argv[1]) {
if (argc < 2)
readImageDir("./");
else
readImageDir(argv[1]);
}

"test.exe [dir] > out.html"てな感じで。
002825NGNG
＞chdir(path);
これはいらなかったですね、すみません。
002925NGNG
うわ、よくみたらいろいろとバグありで…お恥ずかしい（＊´∀｀）
0030デフォルトの名無しさんNGNG
２ちゃんねる発のフリーの画像ビューアを作りませんか？
0031デフォルトの名無しさんNGNG
２ちゃんねる発のフリーのPhotoshopに劣らないくらいの機能を持つソフト作りませんか？
0032デフォルトの名無しさんNGNG
>>23
パスかかってない画像はどうすればいいですか？
0033デフォルトの名無しさんNGNG
PATH
0034デフォルトの名無しさんNGNG
自動でマスクのパスをはずしてくれる
画像ビューアを作成してくれるスレッドはここですか？
0035デフォルトの名無しさんNGNG
どうせ得ろ画像がみたいだけなんだろ
0036デフォルトの名無しさんNGNG
インターネット上にエロ画像以外に見るべき画像があるとでも？
0037デフォルトの名無しさんNGNG
VC++6.0 - SDI形式キボンヌ。
0038デフォルトの名無しさんNGNG
エロ画像以外の画像なんて見る必要ないだろ
0039デフォルトの名無しさんNGNG
あなたは神を信じますか？
0040デフォルトの名無しさんNGNG
ぜんぜん、
0041デフォルトの名無しさんNGNG
あなたはサンタさんを信じますか？
0042デフォルトの名無しさんNGNG
Yes!!、最高！！、信じまくり…･ﾟ･｡(ﾉД`)･ﾟ･
0043デフォルトの名無しさんNGNG
GIFはどうすんのかな。
やっぱIEに○投げ？
0044デフォルトの名無しさんNGNG
七行スレに画像ビューアがあったぞ。
C#だが、BMP,GIF,JPG,TIFF,EMF,PNGなどが表示可能。
http://pc3.2ch.net/test/read.cgi/tech/1033143528/430
0045デフォルトの名無しさんNGNG
作れば?
0046デフォルトの名無しさんNGNG
（　´,_ゝ`）ﾌﾟｯ　おまいら画像ビューアも作れんのか？
0047デフォルトの名無しさんNGNG
画像表示エンジンは Susie Plug-in 対応にすれば GIF も問題ない。
というか、外部に責任転嫁できる。
0048デフォルトの名無しさんNGNG
ここでいう“画像ビューア”に必要な機能って何よ？

・サムネイルで一覧表示
・スライドショー機能

・・くらいしか思いつかないのだが、
エクスプローラのサムネイル機能じゃ不満なのか？
0049デフォルトの名無しさんNGNG
>>48
軽い・速い・シンプル
0050デフォルトの名無しさんNGNG
>>49
全体的な動作としてエクスプローラより軽くて速いってのは不可能な気が・・・
サムネイル作成のアルゴリズムあたりは高速化できるかもしれんが。
0051デフォルトの名無しさんNGNG
２ちゃんねる画像ビューアということなら，
うｐロダの画像一覧とかも見れるといいな。
0052デフォルトの名無しさんNGNG
Gif読めるGV。それでいいよ。
005352NGNG
リスト機能とサムネイルはエクスプローラで良い。
操作性もよくて使い慣れてる。
何より、「画像を見るぞ！」と言う心構えが必要ないので楽ちん。

そしてGV、これはリターンで起動。もう一度リターンで閉じることが出来る。
まさにお手軽。これに勝るビューアはないだろう。
0054デフォルトの名無しさんNGNG
やっぱIrfanViewだな。
リターンで起動。左右で同じフォルダの画像を次々閲覧。Escで閉じることができる。
0055デフォルトの名無しさんNGNG
＞左右で同じフォルダの画像を次々閲覧

いらん、むしろ迷惑。
0056デフォルトの名無しさんNGNG
ある画像を指定すると、それと似た画像をネット中から探し集めてくれる機能。
0057デフォルトの名無しさんNGNG
>>56
まぁ、いいけどな。必死だぞ。それ。
0058デフォルトの名無しさんNGNG
>>56
googleの画像検索でいいじゃん。
0059デフォルトの名無しさんNGNG
ここは夢のあるインターネットですね。
0060デフォルトの名無しさんNGNG
>>58
キーワードでなく画像の内容で類似判定するわけだから、
言語の壁や貧困な発想の制約を受けない検索結果が得られる。
ニューラルネットワークを応用した先行研究はけっこうあるが、
実用的なアプリは皆無に等しいので、開発する意義はあると思う。

googleだと絵炉画像除外されてるしな。
0061デフォルトの名無しさんNGNG
>>60
pussyは数件ひっかかる
0062デフォルトの名無しさんNGNG
>>56
えむえーくす、使えば？
0063デフォルトの名無しさんNGNG
盛り上がってまいりました
0064デフォルトの名無しさんNGNG
>>62
MX使うと似た画像が取れるの？？？
0065デフォルトの名無しさんNGNG
>>64
あっちはファイル名で詳細に中身が語られているためgoogleよりはよっぽど精度は良い。
ただし、タグ付けはあらかじめ信用ある人間が行う必要がある。

けど、これって欲しいオブジェクトの名前をキーにして画像に写っているオブジェクトが列挙
されたファイル名を検索するというある意味オブジェクトを対象とした画像検索といえなくもない。
0066デフォルトの名無しさんNGNG
ありとあらゆる種類の画像フォーマットのローダを内蔵するのは無理だから
Susieプラグイン対応は必須だろう。
0067デフォルトの名無しさんNGNG
>>55
なんで？
いちいち開いて閉じての方がめんどいじゃん。
しかも左右押さなきゃ迷惑にもならんと思うが。
0068デフォルトの名無しさんNGNG
誰かサンプルつくってくれませんか〜〜
0069デフォルトの名無しさんNGNG
>>56
わぁ、それ俺の修士時代の研究テーマに恐ろしく近い…。
ニューラルネットワークの学習を使って、ユーザの評点に従った画像を
検索するというようなものだったけれど、なかなか効率のよい検索シス
テムにならなくって正直かなり骨が折れたなぁ。
この機能、マジで追いかけてそれなりの結果が出せれば論文出せます
レベルになっちゃうと思うけれどね…。
でもそれくらいの方が面白いのかもね。
0070デフォルトの名無しさんNGNG
>>1
えっと、ネタですよね？もちろん。
0071デフォルトの名無しさんNGNG
>>69
軽くいろんな賞を総ナメに出来ると思われ。
007269NGNG
>>71
うん、実用に足るレベルにできれば、ね。
性能評価をどうするのかとか考えるととても難しいのだけれど。

0073デフォルトの名無しさんNGNG
age!!
0074デフォルトの名無しさんNGNG
ここは夢のあるインターネットですね。
0075デフォルトの名無しさんNGNG
誰かサンプル
00761NGNG
>>70
ええ、もちろん！
0077デフォルトの名無しさんNGNG
（　´,_ゝ`）ﾌﾟｯ　おまいら画像ビューアも作れんのか？
0078デフォルトの名無しさんNGNG
とっくに作りましたが何か？
0079デフォルトの名無しさんNGNG
画像ビューア作った。フリーソフトだから俺に感謝して自由に使ってくれ。バグ修正改良自由にして良いぞ。
だからサポートは無しだ。質問は受け付けん。




<HTML>
<HEAD><META HTTP-EQUIV="Content-Type" Content="text/html; charset=shift_jis"></HEAD>
<BODY>
<SCRIPT language="VBScript">
<!--
　　Dim fso, f, fs, ext
　　Set fso = CreateObject("Scripting.FileSystemObject")
　　Set f = fso.GetFolder(replace(replace(Mid(location.href,InStr(location.href,"?")+1),"%20"," "),"/","\"))
　　For Each fs in f.Files
　　　　ext = lcase(fso.GetExtensionName(fs.Path))
　　　　if ext = "jpg" or ext = "bmp" or ext = "gif" or ext = "jpeg" or ext = "png" then
　　　　　　document.write "<img src=""" & fs.Path & """><br>"
　　　　　　document.write fs.Path & "<br>"
　　　　end if
　　Next
-->
</SCRIPT>
</BODY>
</HTML>


使い方はviewer.htmlで保存してviewer.html?フォルダ名でブラウザで開け。
0080デフォルトの名無しさんNGNG
画像ビューア作った。フリーソフトだから俺に感謝して自由に使ってくれ。バグ修正改良自由にして良いぞ。
だからサポートは無しだ。質問は受け付けん。

Set obj = CreateObject("Scripting.FileSystemObject")
Set obj2 = CreateObject("Scripting.FileSystemObject")
Set FW = obj2.CreateTextFile("Viewer.HTML")
call subFolder(obj.GetParentFolderName(obj.GetAbsolutePathName("Viewer.vbs")),FW)

Sub subFolder(FolderPath,FW)

Set FD = obj.GetFolder(FolderPath)
For Each FSO_File In FD.Files
If StrComp(Right(FSO_File.Name, 3),"JPG", 1) = 0 Or StrComp(Right(FSO_File.Name, 3),"GIF", 1) = 0 Or StrComp(Right(FSO_File.Name, 3),"PNG", 1) = 0 Then
FW.WriteLine ( "<IMG SRC=" & Chr(34) & FSO_File.Path & Chr(34) & "></br>" & FSO_File.Path & "</p>")
End If
Next
For Each FSO_SUB_FOLDER In FD.SubFolders
Call subFolder(FSO_SUB_FOLDER.Path,FW)
Next

End Sub

使い方はViewer.vbsで保存してダブルクリック。
0081デフォルトの名無しさんNGNG
そのうちlove letter が貼られそうな予感
0082デフォルトの名無しさんNGNG
>>79
一応動くんだね。

>>80
それ画像ビューアじゃなくてHTML作成してるだけじゃない？
しかもフォルダ指定できない。
0083デフォルトの名無しさんNGNG
2chでラヴレターに感染しかけたことある(´･ω･`)
00841NGNG
>>82
では聞くが、お前の言う「画像ビューア」とは何だ？
0085デフォルトの名無しさんNGNG
>82
いや、ネタのつもりだったんだが...

Set Shell = CreateObject("Shell.Application")
Set BFF = Shell.BrowseForFolder(0,"どこのフォルダを見るん？",0)

If BFF is nothing then
Else
Set obj = CreateObject("Scripting.FileSystemObject")
Set obj2 = CreateObject("Scripting.FileSystemObject")
Set FW = obj2.CreateTextFile("Viewer.HTML")
call subFolder(obj.GetParentFolderName(BFF.Items.Item.Path),FW)
End If


Sub subFolder(FolderPath,FW)

Set FD = obj.GetFolder(FolderPath)
For Each FSO_File In FD.Files
If StrComp(Right(FSO_File.Name, 3),"JPG", 1) = 0 Or StrComp(Right(FSO_File.Name, 3),"GIF", 1) = 0 Or StrComp(Right(FSO_File.Name, 3),"PNG", 1) = 0 Or StrComp(Right(FSO_File.Name, 3),"BMP", 1) = 0 Then
FW.WriteLine ( "<IMG SRC=" & Chr(34) & FSO_File.Path & Chr(34) & "></br>" & FSO_File.Path & "</p>")
End If
Next

For Each FSO_SUB_FOLDER In FD.SubFolders
Call subFolder(FSO_SUB_FOLDER.Path,FW)
Next

End Sub

これでいいか？
0086デフォルトの名無しさん NGNG

　 ∧＿∧ 　　
　（　´∀｀）＜　本当に画像ビューアができちゃったみたい

0087デフォルトの名無しさんNGNG
>>85
どうやって使うの？
フォルダ選択したらおわっちゃったよ
0088デフォルトの名無しさんNGNG
>>87

　 ∧＿∧ 　　
　（　´∀｀）＜　>>79のViewer.HTMLを作るもな

0089デフォルトの名無しさんNGNG
すごいね。
←→で次の画像の頭に移動するようにできませんか？
0090デフォルトの名無しさんNGNG
暇ならSusieの仕様でも練り直しといてくれ
0091デフォルトの名無しさんNGNG
取りあえずツールボックス動かすと変な線が出るバグ何とかしてくれ。
0092デフォルトの名無しさんNGNG
期待age
0093デフォルトの名無しさんNGNG
先生！こんな事言ってるヤツいますよ。

------------------------------------------------------------------------
30 名前：名無したん(;´Д｀)ﾊｧﾊｧ　sage 投稿日：02/11/23 18:49 ID:vYyPfchr
TEroListとvixやlinar見たいなのが一つになったソフトがあると便利なんだがなぁ

TEroListのようにとりあえず登録しとけば検索・全件表示できて
タイトルを選択すると表紙のサムネイルが表示され、
そこからクリックするとviやlinar見たいにその漫画のサムネイル一覧が表示されて
クリックすると全画面・画面表示できなおかつスライドショーとかも可能なヤツ

だれか作って
------------------------------------------------------------------------

私からもお願いします
0094デフォルトの名無しさんNGNG
↑ こんな事言っている奴 ＝ 私
0095（　´∀｀）NGNG
全くその通りでございます
どうか、よろしくお願いします。
0096デフォルトの名無しさんNGNG
…vi？
0097デフォルトの名無しさんNGNG
だれか
>>89
よろしく
0098デフォルトの名無しさんNGNG
>>97
次の定義を頼む。
0099デフォルトの名無しさんNGNG
次の定義ってなに？
0100デフォルトの名無しさんNGNG
次の駅どこ？
0101デフォルトの名無しさんNGNG
definition of next
■ このスレッドは過去ログ倉庫に格納されています