- 1 名前：デフォルトの名無しさん [2009/02/22(日) 22:10:29 ]
- Delphi(デルファイ)について、他のスレッドでは書き込めない超低レベル、
もしくは質問者自身何が何だか分からない質問を
勇気を持って書き込むスレッドです。
Delphi使いが優しくコメントを返しますが
お礼はDelphiの布教と初心者の救済をお願いします。
<前スレ>
くだすれDelphi(超初心者用)その48
pc11.2ch.net/test/read.cgi/tech/1225641040/
<過去スレ>
DelWiki避難所（Delphi 関連の過去スレッド）
delwiki.info/?%E3%83%AA%E3%83%B3%E3%82%AF%2F%E3%82%B3%E3%83%9F%E3%83%A5%E3%83%8B%E3%83%86%E3%82%A3%2FDelphi%20%E9%96%A2%E9%80%A3%E3%81%AE%E9%81%8E%E5%8E%BB%E3%82%B9%E3%83%AC%E3%83%83%E3%83%89
- 41 名前：デフォルトの名無しさん [2009/03/01(日) 11:40:37 ]
- Delphi7で下記用に記述すると
procedure TForm1.FormCreate(Sender: TObject);
var
i:integer;
begin
i:=-2147483648;
end;
[エラー] Unit2.pas(31): 数値演算のオーバーフロー
[致命的エラー] Project2.dpr(7): 'Unit2.pas' ユニットはコンパイルできませんでした
コンパイルが通らないなぜでしょう
- 42 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 12:10:10 ]
- >>41 釣りじゃないよな？
Integerの範囲は-2147483648〜2147483647
- 43 名前：デフォルトの名無しさん [2009/03/01(日) 12:14:22 ]
- >>42
delphi6,d2009は通りますけどd7は通らないので困っています
- 44 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 12:53:56 ]
- >>42
え？
- 45 名前：42 mailto:sage [2009/03/01(日) 13:01:03 ]
- すまん、-が見えてなかったorz
確かに編だな。なぜかi:=Low(Integer)は通る。
- 46 名前：42 mailto:sage [2009/03/01(日) 13:02:44 ]
- ×編
○変
ダメすぎ…
- 47 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 16:26:40 ]
- Delphi 2009 で ドライブ名(C: 等) から、
DeviceIoControl に渡すハンドルを得る為の
CreateFile へ渡すファイル名の取得にはどの様な手順を踏まえたらよろしいのでしょうか？
1. QueryDosDevice
2. GetDevNodeRegistryProperty
の手順でよろしいのでしょうか？
…なんか、全然Delphiっぽくない質問ですね…。
該当スレッドなどがあればそちらを照会させてくれると嬉しいです。
- 48 名前：デフォルトの名無しさん mailto:sage [2009/03/01(日) 17:16:37 ]
- ttp://www.page.sannet.ne.jp/kenjia/J_usb.html
- 49 名前：34 mailto:sage [2009/03/01(日) 21:20:59 ]
- 自己解決しました。
デプスバッファへの書き込み値を0≦rhw＜1にすると
正常に描画できました。
- 50 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 22:55:39 ]
- 自前の手続きの引数にはvarを付けた方がいいの？
有りと無しの違いは？
- 51 名前：デフォルトの名無しさん mailto:sage [2009/03/03(火) 23:00:46 ]
- ヘルプの「値パラメータと変数パラメータ」嫁
- 52 名前：デフォルトの名無しさん mailto:sage [2009/03/05(木) 12:04:37 ]
- var str:string;
Copy(str,1,4)とCopy(str,0,4)の結果が同じなんですが
どっちでもいいんですかね？
- 53 名前：デフォルトの名無しさん mailto:sage [2009/03/05(木) 17:16:41 ]
- Copyの場合のインデックスは１から始まりますよ。
０にした場合エラーにならなくてもワーニングが出てませんか？
- 54 名前：デフォルトの名無しさん mailto:sage [2009/03/05(木) 18:34:14 ]
- Unicode対応のアプリで TNTのコンポーネントを使ってるんですけど、
TStringStream のUnicode版が無いんです（Delphi7）。
代替案かよさげなライブラリなどありましたら教えてください。
- 55 名前：デフォルトの名無しさん mailto:sage [2009/03/05(木) 23:50:08 ]
- 作れ
- 56 名前：デフォルトの名無しさん mailto:sage [2009/03/06(金) 10:29:25 ]
- 54です。TMemoryStreamのWriteとReadを使って何とかできました。
- 57 名前：デフォルトの名無しさん mailto:sage [2009/03/06(金) 22:43:48 ]
- 文字コードの変換の事で教えてください。
この手のコードとかは検索して見つかったのですが、
word型というのを使うみたいですが何故word型なんでしょうか?
- 58 名前：デフォルトの名無しさん [2009/03/07(土) 14:18:49 ]
- Delphi7ではTCoolBarやTActionToolBarは不具合のあるので
ちょうどDelphi2007も持ってるので
2007のTCoolBarやTActionToolBarをDel7にインストールして使いたいんですが
こういったことはやはり無理なんでしょうか？
もし可能ならよろしかったら方法を教えて頂けないでしょうか。
2007を使えばいいんでしょうが重くて使いづらくって…
- 59 名前：デフォルトの名無しさん [2009/03/07(土) 14:54:10 ]
- パソコンを買い換えるのが吉
- 60 名前：デフォルトの名無しさん mailto:sage [2009/03/07(土) 20:08:54 ]
- やっぱ買うしかないか…
- 61 名前：デフォルトの名無しさん mailto:sage [2009/03/07(土) 21:31:03 ]
- Del7のに不具合とかあったっけ？
問題なく使っているかも
- 62 名前：デフォルトの名無しさん mailto:sage [2009/03/08(日) 10:06:53 ]
- XPモード表示でTCoolBarにツールバーを何個か置いて
位置を移動すると変な動作をしたり、表示・非表示したりすると位置がずれたりします。
他コンポも何個かあった。
- 63 名前：デフォルトの名無しさん mailto:sage [2009/03/08(日) 11:04:12 ]
- WndProcでWM_USER + $500を無視するといいんじゃなかったっけ？
- 64 名前： ◆XcB18Bks.Y mailto:sage [2009/03/08(日) 18:11:33 ]
- >>57
文字コードが2バイトの符号なしなら変数も2バイトの符号なしのWord型だと扱いやすい。
- 65 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 09:09:03 ]
- Delphi使うとある面では業効率がいいのですが、Delphiのバグと格闘するという
何のためにもならない時間が増大します。誰か助けてください。
- 66 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 11:25:07 ]
- 稚拙な質問の上に伝わらなかったらすまん。
Form上に動的に生成したパネルを4つalTopで配置。幅はform.height/4
それぞれのcaptionを1..4にしたとして、これの並び替えってどうやればいいんですか？
上から1234にしたり4321にしたり。
- 67 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 11:29:42 ]
- >>65
上にもちょっと出てるけど、よかったらDelphiのバグ教えてくれませんか？
なるべくそのコンポ使うの避ける。
- 68 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 11:41:57 ]
- >>66
一度全てをalNoneにして、上にしたいものからalTopではダメかな？
＞幅はform.height/4
これがよくわからないけど。
- 69 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 14:55:20 ]
- Delphi2006のプロジェクトを2007でコンパイルすると、アプリケーションがタスクバーに出なくなるのは
何か解決方法ありますか。
- 70 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 15:22:33 ]
- >>69
Delphi2009でコンパイルする。
- 71 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 17:59:09 ]
- >>69
なんか
Application.MainFormOnTaskbar := True;
みたいなコードが必要だった気がする
- 72 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 18:00:09 ]
- procedure A（param:integer)みたいなのがあって、
ボタン1が押された時に実行させるのですが、
この時Aが終了する前にボタン1が押されたら、
Aを別に複数実行みたいなことをマルチタスクを使わずに
行えますか?
- 73 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 18:26:32 ]
- >>68
失礼 高さです。フォームを4枚のパネルで埋め尽くす感じです。
教えていただいた方法では駄目でした。
- 74 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 19:25:42 ]
- >>73 いい加減ですまん。
各PanelのAlignをalNone
各PanelのTopに(Form.Height - PanelN.Height)を代入
上に置きたいPanelからAlignにalTop
これでそれっぽい動きをしたので、試してみて。
- 75 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 21:46:38 ]
- >72
マルチタスクが駄目ならマルチスレッドで。
- 76 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 22:26:06 ]
- マルチタスクってなに？
- 77 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 22:27:56 ]
- Windowsの世界ではマルチプロセスってことだと思う。
- 78 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 23:14:34 ]
- ファイルをD&Dすればunixサーバのscriptが実行されるものを作りたいんだけど、
何を調べればいいのでしょう？
また、Cygwin、unix for windows、を使わずにできるものでしょうか？
WinXPでDelphi6 personal 使ってます。
- 79 名前：デフォルトの名無しさん mailto:sage [2009/03/09(月) 23:28:08 ]
- D&Dしたファイルがscriptにどう影響を与えるのかとか
script本体はどこにあるのかとかさっぱりわからない。
sshを使うとかそういうイメージなんだろうか…。
- 80 名前：デフォルトの名無しさん mailto:sage [2009/03/10(火) 00:50:54 ]
- >>78
あなたを使わずに別の開発者を使えば可能です
- 81 名前：78 mailto:sage [2009/03/10(火) 06:50:53 ]
- >79
"calc"ってscriptがunixサーバ側に用意されてて、
たとえばWindows側にunix環境ができていれば、
$calc AAA.txt ってやるとAAA.txtがサーバで処理されて
AAA.resultsが返ってくる。
これを、cygwinなどのunix環境無しで、AAA.txtをD&Dしてできないかと思いまして。
"calcstat"で処理の進捗を表示させるのが最終目標です。
- 82 名前：72 mailto:SAGE [2009/03/10(火) 07:17:36 ]
- マルチタスクじゃなくて、スレッドでした。
ヘルプを見たりしましたが、別スレッドで実行するしかない
みたいですね。
クリエートなんちゃらとかあるかと思いました。
- 83 名前：デフォルトの名無しさん [2009/03/10(火) 10:27:31 ]
- >>78
セキュリティがザルなのでおすすめできないが
windowsプログラムからrcp,rshを起動すればいけんじゃない
rcp,rshならXPなら標準で入ってる
セキュアにしたいならssh
ただしWindowsには入ってないので自分で入手
- 84 名前：デフォルトの名無しさん mailto:sage [2009/03/10(火) 17:19:30 ]
- 突然でスイマセン
誰かdelphi perssonal もってたらください。
- 85 名前：デフォルトの名無しさん mailto:sage [2009/03/10(火) 17:27:27 ]
- お断りします
- 86 名前：78 mailto:sage [2009/03/10(火) 18:20:23 ]
- >>83
ありがとう。試してみる。
- 87 名前：デフォルトの名無しさん mailto:sage [2009/03/10(火) 19:02:24 ]
- >>74ども。確かに結果は得られました。
ありがとうございます。
しかし結局設計時に配置変えるときのような動作をさせるより他ないのかなぁ。
- 88 名前：デフォルトの名無しさん mailto:sage [2009/03/10(火) 19:26:24 ]
- 希望とは違うだろうけどalNoneのままそれぞれのTopを
0
Form.ClientHeight div 4
(Form.ClientHeight div 4)*2
(Form.ClientHeight div 4)*3
でOKなような。
- 89 名前：alCustom mailto:sage [2009/03/10(火) 23:02:32 ]
- 俺の出番か
- 90 名前：デフォルトの名無しさん mailto:sage [2009/03/10(火) 23:36:16 ]
- そんなものがあったのかorz
- 91 名前：デフォルトの名無しさん mailto:sage [2009/03/11(水) 14:28:50 ]
- D6Personal
reservoir.cc.kyushu-u.ac.jp/delphi/BorlandDelphiPersonalEditionJP.exe
reservoir.cc.kyushu-u.ac.jp/delphi/d6perdoc.zip
reservoir.cc.kyushu-u.ac.jp/delphi/delphi6update1.exe
でもアクティベーションが出来るかはわからない
- 92 名前：デフォルトの名無しさん mailto:sage [2009/03/11(水) 17:31:25 ]
- >>88ですな。
結局top,left,width,heightを希望するよう逐次設定してやれば希望の動作はします。
アンカーやタグの存在に気付いたときのように、もっとスマートな方法があるのでは
ないかと思い、質問してみた次第です。お騒がせしました。
- 93 名前：デフォルトの名無しさん mailto:sage [2009/03/11(水) 22:22:52 ]
- それぞれのalTopのパネルの上にalClientなパネルを置いて
配置換えするときはalClientなパネルのParentを変える
ってのはどうかな？
- 94 名前：デフォルトの名無しさん mailto:sage [2009/03/12(木) 13:24:52 ]
- forの中にforを作ったとして、すべてのループをBreakさせる手続きってありますか？
BreakAllみたいな。
- 95 名前：デフォルトの名無しさん mailto:sage [2009/03/12(木) 13:57:44 ]
- goto
- 96 名前：デフォルトの名無しさん mailto:sage [2009/03/12(木) 14:18:14 ]
- exit
- 97 名前：デフォルトの名無しさん [2009/03/12(木) 15:30:40 ]
- ECUで書かれたページを直接読み込んで、その中からキーワードを拾うときに
ソースの1行がTStringList１行に入るようにはできませんか？
ダウンロードするプログラムは初心者本のコピーなんですが、
どうも1単語になっているものが途中で切られて次行に行ったりするみたいで
うまくキーワードを拾えないときがあるんです。
どなたか教えてください。
- 98 名前：デフォルトの名無しさん mailto:sage [2009/03/12(木) 15:36:07 ]
- LoadFromFileをやめてReadlnで読む
- 99 名前：デフォルトの名無しさん mailto:sage [2009/03/12(木) 18:58:04 ]
- ECUとか何だか内容が良く分からないけど全部1行というか改行を削除して
検索すれば良い気がするが、外してる感じも大。
- 100 名前：デフォルトの名無しさん mailto:sage [2009/03/12(木) 21:33:16 ]
- >>94
if BreakAll then Break;
- 101 名前：デフォルトの名無しさん mailto:sage [2009/03/12(木) 22:21:12 ]
- try
for ...
for ...
if ... then raise Exception.Create('BreakAll');
...
except
end;
- 102 名前：デフォルトの名無しさん mailto:sage [2009/03/12(木) 22:38:36 ]
- 多重ループは例外で抜けるのがよさげ
- 103 名前：デフォルトの名無しさん mailto:sage [2009/03/13(金) 17:46:24 ]
- APIに関係しているかもしれないのですが、winsightで見ても表示されていないボタンに
メッセージを送りたい時の調べ方について教えてください。
一応、optionでトレースするメッセージをマウスのクリックに絞って、メッセージを
見てるのですがイマイチ分かりません。
どう調べればいいんでしょうか?
よろしくお願いします。
- 104 名前：デフォルトの名無しさん mailto:sage [2009/03/13(金) 18:07:44 ]
- それは、絵に描いた牡丹だからメッセージは送れないよ。
- 105 名前：デフォルトの名無しさん mailto:sage [2009/03/13(金) 20:05:11 ]
- そう思うんですけど、そのソフトの画面を切り替える外部ソフトがあるので
何とかならんかなと思って。
- 106 名前：デフォルトの名無しさん mailto:sage [2009/03/13(金) 21:39:24 ]
- Spyでしらべてみれば。
- 107 名前：デフォルトの名無しさん mailto:sage [2009/03/13(金) 21:58:55 ]
- つWindowTree.exe
- 108 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 03:35:58 ]
- del7pro
actionmainmenuと同等のプロパティが付いてるpopupmenuがあったと思ったんだがない。
このバージョンには付いてないんだっけか？
- 109 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 08:49:54 ]
- ちょっと質問があります。
IDEのエディタが改行しなくなりました。ENTERを押しても次の行にカーソルが進むだけで、
実際の改行がされないのです。
・既存のプロジェクトでも駄目
・新規作成でも駄目
・IDEの再起動でも駄目
・OSの再起動でも駄目
開発がまったくできず困っております。
10年来Delphiを使ってきて始めて遭遇しました。
解決方法はないものでしょうか？
環境：BDS2006 Vista SP1
- 110 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 08:52:20 ]
- >>109
自己解決しました。
エディタが上書きモードになっていましたｗｗｗｗ
今まで上書きモード使ったことなかったぜ
ホフォすぎる俺・・・
- 111 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 08:55:12 ]
- >>34-35
QuadrupleDしらんけど、ZバッファONなら、
後から書いてZバッファが同じなら、先に書いたものの上に上書きはされないよ。
- 112 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 01:01:16 ]
- いいなぁ、RSSつながって。
- 113 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 14:44:41 ]
- TForm上でDirectXを表示させる事は可能でしょうか？
可能ならばどのようにすればいいのでしょうか？
- 114 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 16:33:15 ]
- Clootie
- 115 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 16:33:21 ]
- そのフォームのキャンバスのハンドルを表示先に指定する
- 116 名前：113 mailto:sage [2009/03/15(日) 18:57:52 ]
- >>114-115
返信ありがとうございます。
ハンドルを指定すればいいのですね。
検索したらやり方がいろいろ出てきました。
アドバイスありがとうございました。
- 117 名前：デフォルトの名無しさん mailto:SAGE [2009/03/16(月) 21:36:18 ]
- 外部プログラムのボタンの位置をスクリーン座標で取得するにはどうすればいいですか？
ClientToScreenにハンドルを指定する引数がないので、あれ？って感じです。
- 118 名前：デフォルトの名無しさん mailto:sage [2009/03/16(月) 22:02:29 ]
- そのClientToScreen関数はTControlのもの
Win32APIを使う場合はWindows.ClientToScreenとして、Windows.pasのものを使うと明示すするべし
- 119 名前：117 mailto:SAGE [2009/03/16(月) 23:31:49 ]
- ありがとうございました。
外部アプリのボタンをハンドルではなく座標を指定して押すプログラムを
書いていて、Mouse_Eventで押すことは出来たんですがマウスカーソルが
動くのが嫌で調べていたら、SendInputというのがありました。
今回は別に使う必要はないのですが、これも座標を指定してクリックのメッセージ
を送ることは出来るのでしょうか？
- 120 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 14:21:35 ]
- delphi2009で、それ以前のString[n]と同じような宣言をしたいときは
どうしたらいいですか？AnsiString[n]というのは無いらしいし、
そのままString[n]では、全角を１文字としてしまうので使えないし。
- 121 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 14:40:44 ]
- >>120
ちゃんと試してからお聞きください。
- 122 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 14:49:16 ]
- >120
ウンコードの弊害です。あきらめてください。
- 123 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 14:49:46 ]
- >>119
WindowFromPointでその点にあるコントロールが分かるので、
そのハンドルを使ってWM_LBUTTONDOWNとWM_LBUTTONUPを送るとか
Win32でGroupBoxの上にコントロールを置いてると、
Zオーダーの関係でGroupBoxのハンドルが返ることがあるので注意
- 124 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 15:20:03 ]
- >>121
すまん、俺が勘違いしていたらしい。
そのままでいいみたいだった。ありがとう。
- 125 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 17:09:02 ]
- https://lazarus-ccr.svn.sourceforge.net/svnroot/lazarus-ccr/components/virtualtreeview-new/
にある VirtualTreeview のインストール方法を誰か知りませんか？
- 126 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 17:20:26 ]
- >>125
www.delphi-gems.com/
本家本元のをインストールしたら？
というか今見たら3月16日付で4.8.5にアップデートされてるね。
- 127 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 18:16:32 ]
- 複数のレコードを１つのレコードとしてアクセスする方法って無い？
type rec1 = rec2 + rec3;とか
type rec1 = record(rec2, rec3);とか
- 128 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 19:23:19 ]
- r2、r3の記述は必須なので、望み通りではないかな？
rec1 = record
r2: rec2;
r3: rec3;
end;
- 129 名前：117 mailto:SAGE [2009/03/17(火) 20:43:18 ]
- HD入れ替えてXPを入れ直したいんだけど、
Del7って認証受けなきゃダメだよね？
今でもページあるのかな？
アップデートあるのかな？
- 130 名前：デフォルトの名無しさん mailto:sage [2009/03/17(火) 20:55:36 ]
- D7なら認証を受けなくても使えないことはないわけだが。
認証しろとは言われるけど。
- 131 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 06:21:13 ]
- うちのPCには昨年末にDelphi7を入れたぞ。
確かやり方がややこしかったけど、それはVistaだったからのような気がする。
- 132 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 07:10:17 ]
- Delphi 6 updates and downloads for registered users
edn.embarcadero.com/article/38607
これがあるんだから7もありそうだけど、
さがしたけどよくわからんかった。
- 133 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 17:30:32 ]
- デバイコンテキストを使って文字列を書く時はTexteOutですけど、
その反対の書かれたテキストを取り出すのってないですか？
- 134 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 17:35:09 ]
- >>132
ttp://cc.embarcadero.com/reg/delphi7
- 135 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 17:38:45 ]
- >>133
それが出来たらCAPTCHAで苦労しねーよ
- 136 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 18:00:01 ]
- >>133
これが超初心者の成せる技か…
- 137 名前：デフォルトの名無しさん [2009/03/18(水) 18:25:13 ]
- アイコン選択ダイアログのアイコンリストのような３２×３２の
アイコンをリストアップできるコンポーネントを
どなたかご存知ないでしょうか？
リストビューで代用しようと思ったんですが
アイコン同士の間隔が広すぎて思ったようには出来ませんでした。
- 138 名前：132 mailto:sage [2009/03/18(水) 18:47:06 ]
- >>135,136
ハイハイ、プロプロ
- 139 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 18:49:09 ]
- >>137
TListBoxでもTDrawGridでも好きなの使えばいい。
- 140 名前：137 mailto:sage [2009/03/18(水) 23:27:16 ]
- >>139
ありがとうございます。
おかげでTDrawGridを継承してアイコン表示コンポを作ることが出来ました。
- 141 名前：デフォルトの名無しさん mailto:sage [2009/03/19(木) 13:34:00 ]
- スルー推奨
|
 |
