Delphiで無料でプログラミングしてみるお

■戻る■ 全部 1- 101- 201- 301- 401- 501- 最新50

1 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 00:53:58.60 ID:scUT+3HB0: ★まとめWiki★
http://www.wikihouse.com/DelphiVIP/

●Delphi6 無料版●
http://www.vector.co.jp/soft/dl/win95/prog/se205882.html

導入手順
http://www.wikihouse.com/DelphiVIP/index.php?%C6%B3%C6%FE%BC%EA%BD%E7

Delphi専用うｐろだ
ttp://vipdelphi.run.buttobi.net/cgi-bin/upload.html
2 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 00:55:03.80 ID:scUT+3HB0: ★よくわからないけど覗いてくれた人へのFAQ

○Delphiって何？
●プログラミング言語　および　統合開発環境　です。GUIアプリが簡単に作れます。

○GUIアプリって何？
●Windowsの、ウィンドウがあって、その中にボタンとかテキストボックスがあるアプリのことです。

○何をするスレなの？
●Delphiでプログラミングして、質問しあったり、コラムを読んだりしましょう。

○コラムって？
●主にぬーぬー ◆9fLecX9sq2が書いている初心者向けの解説です。実際にアプリを作りながら説明してます。

○ぬーぬーって？
●暇人。

○本当にそういうの全然知らないんだけど・・・？
●技術０から参加できます。ちょっと覗いてみませんか？　わからない事があればスレにどんどんどうぞ

○っていうかvip自体よく知らないんですけど。。。
●新参さんも気兼ねなく「保守」とだけ書き込んでください。それがvipヌクモリティ。
3 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 00:55:28.62 ID:scUT+3HB0: ★ちょっと詳しい人へのFAQ

○プログラム板でやれよ
●新しく始める人を増やしたいのでvipです。それに、あっちは馴れ合いに向きません。

○Delphi？（ ´,_ゝ｀）ﾌﾟｯ
●無料でGUIが簡単だから・・・　ごめん。

○コラムのレベルが低いんだけど
●初心者向けです。あと、筆者の技術がそこまで高くないんです。

○Del厨の俺が着ましたよ
●困ってる人助けたり、何か作ってうｐしたりしてみてください。

○暇人だけど、何かでばんある？
●コラム筆者募集中です。wikiもどんどん弄くってください。
4 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 00:57:46.87 ID:scUT+3HB0: 落ちてたようなので、
勝手にスレ作っときました(｀･ω･´)

…………いいよね？(´･ω･`)
5 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:01:31.82 ID:Y09dvqoLO: ほ
6 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:02:33.17 ID:MH7JNANM0: >>1-4
おつおつﾉｼ
7 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:02:38.91 ID:nIs5QKjG0: >>1
GJ!!!!!!!!!!!!!!!!!
8 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:03:57.36 ID:MYdzHARq0: >>1乙
9 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:04:29.05 ID:+fwneFgS0: 保守

このスレ初めて来たけど、このスレから第２の泉和良が生まれるといいね。
10 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:13:21.13 ID:nIs5QKjG0: ho
11 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:22:09.90 ID:scUT+3HB0: rp
12 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:24:40.44 ID:Y09dvqoLO: De
13 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:38:20.08 ID:nIs5QKjG0: up
14 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:42:00.68 ID:cxnMPIi+0: >>1
GJ

＞泉和良
って誰？って思ってググってみた
ベクターがヒットした
すげぇｗｗｗｗゲーム作りすぎｗｗｗｗｗｗｗｗｗｗ
15 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 01:45:52.79 ID:/WCMRrHJ0: Turbo Pascal 3 から使ってる俺が着ましたよ。
寝るけど。
16 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 02:17:47.59 ID:6VX7L5MC0: 保守
17 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 02:18:06.04 ID:MH7JNANM0: ほヾ(*´∀｀*)ﾉｷｬｯｷｬ
18 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 02:33:38.04 ID:1FPi/9eF0: ほ
19 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 02:55:40.43 ID:cxnMPIi+0: ho
20 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 03:47:32.08 ID:1DXZgd+a0: ほ
21 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 04:03:41.46 ID:cxnMPIi+0: ぁ
22 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 04:11:19.91 ID:nIs5QKjG0: 腹減ったお
23 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 04:29:05.12 ID:GveXITVU0: 保守　腹減ったな
24 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 05:07:22.56 ID:cxnMPIi+0: 朝だー！朝だよー！！
25 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 05:16:10.67 ID:l3pw5JiA0: 暇なので30分で何か作るお
26 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 05:30:22.23 ID:6VX7L5MC0: あと15分
27 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 05:31:10.71 ID:nIs5QKjG0: ｗｋｔｋ
28 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 05:42:34.79 ID:pl+k4Aq30: wktk
29 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 05:45:53.90 ID:l3pw5JiA0: 間に合わないorz
30 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 05:49:17.09 ID:nIs5QKjG0: ｗｋｔｋ
31 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 06:13:57.25 ID:6VX7L5MC0: さあ1時間だ
32 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 06:21:15.58 ID:nIs5QKjG0: スパゲティ茹でてくるお（　＾ω＾）
33 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 06:44:28.57 ID:l3pw5JiA0: ｽﾏｿ子供が起きてきてしまった･･･

うｐしたお
http://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0023.zip
34 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 06:51:56.82 ID:6VX7L5MC0: 綺麗にまとまっていていいソースだ
35 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 06:56:59.22 ID:nIs5QKjG0: 子供うｐ！！１１１１１１
1000000回保存したお
36 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 07:31:29.46 ID:Y09dvqoLO: うわ気になる！！
37 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 07:35:01.57 ID:S4JJpQV50: http://www.vipper.org/vip193749.zip
ライフゲームできたお＾＾
38 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 07:55:06.85 ID:1FPi/9eF0: ほ
39 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 08:21:36.22 ID:MYdzHARq0: も
40 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 08:27:16.39 ID:3ovCEOMp0: >>37
（・∀・）ｲｲ！
41 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 08:39:08.19 ID:nIs5QKjG0: >>37
こういうの作りてえええええええ
パラメータ設定できるのとかﾃﾗﾓｴｽ
42 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 08:58:52.17 ID:MYdzHARq0: >>37
モザイクはどういう意味?
43 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 09:18:30.17 ID:3ovCEOMp0: あと、下と右側は生きてる奴がいるっていう処理っぽいんだが
44 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 09:20:55.50 ID:m9Sg0W6G0: オナヌー実況ってこんｔｙろｗｈさｊｊっがいｙてらいやｆ
ttp://37514.net/pc/weblog/home/mol/archives/blog20060122.html
45 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 09:24:51.99 ID:3ovCEOMp0: ｈｓ
46 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 09:39:39.41 ID:S4JJpQV50: >>42
あまり意味はないけどその区画の色の平均値を見たかったのでつけてみた

>>43
うはｗｗ今日の夜にでも直してうｐするお＾ω＾；
47 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 10:11:52.57 ID:1DXZgd+a0: ほ
48 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 10:17:00.37 ID:dXLXxVwy0: ここか
49 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 10:38:28.76 ID:Mff5LjIQ0: hohoho
50 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 10:59:00.78 ID:MYdzHARq0: syusyusyu
51 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 11:18:18.95 ID:rBCRdx/B0: ほす
52 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 11:18:44.29 ID:rBCRdx/B0: さげてた
53 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 11:29:52.34 ID:+fwneFgS0: >>14
それ全部Delphiで作られてるのよ。

>>37
「死んでいる駒を生かす隣接駒の数」って正しく機能してる？
54 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 11:48:19.07 ID:jd/kQP4d0: 暇なんでなんか作るお
お題 >>55
55 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 11:48:56.77 ID:FcANnQi60: タブブラウザ
56 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 11:56:42.99 ID:FcANnQi60: http://www.euromind.com/iedelphi/embeddedwb.htm
Personalで動くかどうかは不明
57 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 12:13:16.17 ID:jd/kQP4d0: はあ？プニルでも使ってろカスｗｗｗｗｗｗｗｗｗｗ

という逃亡
ttp://delphi.sakura.vg/index2.html
この辺参考にすれば結構簡単に作れそうだけどあんまり意味ないよね
あと英語サイトは読めません＞＜
58 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 12:15:11.82 ID:m9Sg0W6G0: つ【まんまんみて】垂れ流し【ちんちんおっきおっき】
ttp://37514.net/pc/weblog/home/mol/archives/blog20060122.html
59 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 12:21:56.15 ID:Y09dvqoLO: せくろす
60 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 12:35:03.98 ID:GveXITVU0: ライブドアゲーム
61 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 12:40:16.14 ID:FcANnQi60: ぬーぬー先生のコラムのテトリスに対抗して
コラムスとかどうよ？
62 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 12:47:59.89 ID:nIs5QKjG0: マインスイーパとかどうかお？
63 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 12:49:50.04 ID:jd/kQP4d0: ちょｗｗｗｗ逃亡宣言してんだからもっと煽るなりしてくれｗｗｗｗｗｗ
まあコラムスならなんとなく出来そうな気もするんでアルゴリズム練ってみる

と、その前にマインスイーパやってみるか
64 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:10:02.03 ID:Y09dvqoLO: こら蒸すってなんだ
65 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:15:26.92 ID:D2196NwF0: >>14の泉って人のライスタ１あたりは、サンプルプログラムに良さそうじゃない？
66 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:15:53.34 ID:FcANnQi60: >>64
http://www.kddi.com/corporate/news_release/2005/1214/image/p_besshi_08.gif
http://sega-gamehompo.jp/game/MD_COLM1/index.html
67 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:21:30.36 ID:nIs5QKjG0: これだけは入れておけっていうコンポーネントは何かあるかお？
68 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:28:52.14 ID:FcANnQi60: 作るものによるけど、インターネット関連ならIndyかな？
69 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:30:49.27 ID:FcANnQi60: あとDelphi6でXPStyleを適用するとバグるから、
それの防止でWindows XP Theme Manager
http://www.delphi-gems.com/ThemeManager.php
70 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:37:16.48 ID:nIs5QKjG0: Indy入れてくるお
71 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:48:59.50 ID:jd/kQP4d0: マインスイーパ途中まで
ttp://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0024.zip

あとは
　クリア、ゲームオーバー
　即死回避
　0だったら周りを自動に開く
　右クリックで目印
ぐらいかな
72 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:55:27.76 ID:dXLXxVwy0: 誰かいる？
73 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 13:56:33.12 ID:jd/kQP4d0: いらねーよ
74 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:00:00.78 ID:dXLXxVwy0: >>73
いたいたｗｗｗｗｗｗｗ
ボタン押すとｔｘｔに文字を書き込むプログラム作ってるんだけど
一回はちゃんと書き込むんだが二回目以降は書き込まないんだよね

最後の行に追加していくのってどうやったらいいのかな
75 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:01:55.02 ID:m7SbeFAI0: DELPHIでMIDI関係のアプリ作りたいんだけど
オススメの解説サイトなんてありません？
76 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:04:58.82 ID:jd/kQP4d0: >>74
よくわからんけどAppendで開いてWritelnじゃいかんの？
77 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:05:57.82 ID:dXLXxVwy0: >>76
ありがと！調べてくる
78 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:08:38.43 ID:6VX7L5MC0: TStringList.LoadFromFile
TStringList.Add
TStringList.SaveToFile
79 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:09:34.57 ID:FcANnQi60: >>74
TMemoの事なら
Memo1.Lines.Add('ぬるぽ');
か
Memo1.Text:=Memo1.Text+'ぬるぽ';
だお

>>75
解説サイトは知らないけど、MIDI機器制御なら
midiOutGetNumDevs
midiOutGetDevCaps
midiOutOpen
midiOutShortMsg
midiOutClose
だけ覚えれば大丈夫だから簡単だお
MIDIそのものは別で覚えないとだめだけど
80 名前：75 ：2006/02/08(水) 14:12:30.78 ID:m7SbeFAI0: >>79
れすｻﾝｸｽです。
調べてみます～
81 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:13:37.25 ID:6VX7L5MC0: エクスクルーシブのことも忘れないであげてください
82 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:16:27.23 ID:FcANnQi60: おいらの作ったMIDI関連のソフトのそれっぽいところ書くお
uses に　MMSystem　追加

var hMidi :HMidiOut;

オープン
procedure ないしょ.OpenMIDI(Index: integer);
begin
　if (Index>-1) and (Index<GetDeviceCount) then
　　begin
　　　midiOutOpen(@hMidi,Index,0,0,CALLBACK_NULL);
　　　//略
　　end;
end;

クローズ
procedure Tないしょ.CloseMIDI;
begin
　midiOutClose(integer(hMidi));
　//略
end;
83 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:17:54.26 ID:ETur5ahr0: やたーマインスイーパクリアできたよー
http://up2.viploader.net/pic/src/viploader77846.jpg
久々にやったら妙にはまってしまった
84 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:20:35.32 ID:FcANnQi60: ノートオン

function Tないしょ.OutNoteON(AKey: byte; AVelocity: byte): boolean;
const
nowch=byte(0); //ちゃんねる
begin
result:=false;
if デバイスが使える状態 then
begin
midiOutShortMsg(integer(hMidi),$90 or
(AKey shl 8) or
(AVelocity shl 16) or
nowch);
result:=true;
end;
//
end;
85 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:22:53.63 ID:FcANnQi60: ノートオフ

function TGMIDIOutDevice.OutNoteOFF(AKey: byte): boolean;
const
nowch=byte(0);//ちゃんねる
begin
result:=false;
if デバイスが使える状態 then
  begin
   midiOutShortMsg(integer(hMidi),$80 or (AKey shl 8) or nowch);
   result:=true;
  end;
//
end;

バレ無いように変な事になってるけど、ごめんだお
86 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:23:16.89 ID:FcANnQi60: やっちゃた！
orz
87 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:24:44.52 ID:dXLXxVwy0: >>78
ありがと。一回ロードしないとダメだったのか
>>79
Memoは置かないでボタンしか配置してないんだ

調べてくる
88 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:26:23.44 ID:m7SbeFAI0: >>86
超ｻﾝｸｽ
参考にさせてもらいます。

とりあえず五線譜に♪を配置する部分から作って行きます
DELPHIは久しぶりなんで時間かかりそう(´・ω・)
でもガンガル
89 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:26:30.48 ID:nIs5QKjG0: Indyインストール苦戦した
いっぱい機能が増えたお
90 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:26:38.94 ID:FcANnQi60: 誰も見て無い
きっとここは見て無い
（∩ﾟдﾟ）あーあーきこえないきこえないあーあー
91 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:27:44.29 ID:6VX7L5MC0: 日記ならチラシの裏に書けばいい
92 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:30:37.69 ID:nIs5QKjG0: 見てないお
93 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:30:45.95 ID:X0qZ0rpG0: 落ちるくらいならチラシとして使っていただけたほうが・・・
94 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:34:53.47 ID:FcANnQi60: >>88
ということで、専用のクラス作って固めちゃうってのがおすすめ

>>89
ぶらうざのようなもの
TMemoとTButtonとTIdHTTP（地球マークの）を貼る

procedure TForm1.Button1Click(Sender: TObject);
begin
　Memo1.Text:=TIdHTTP1.Get('http://ex14.2ch.net/news4vip/');
end;
95 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:58:35.92 ID:nIs5QKjG0: >>89
ｻﾝｸｽ！
ちょっとインストールできてるのか不安だったので
96 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 14:58:48.63 ID:Y09dvqoLO: TGMIDIOutDevice
きたこれ

なんなのか知らないけど・・・
97 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 15:11:17.96 ID:FcANnQi60: 簡単MIDI出力クラスライブラリとそれ使って作ったソフトを
自サイトでうpしようと思ってたけど、もう出来ない（´；ω；｀）ﾌﾞﾜｯ
98 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 15:36:35.26 ID:bpD3UGll0: も
99 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 15:57:49.90 ID:bpD3UGll0: ほ
100 名前： ◆4JPkfEaNg. ：2006/02/08(水) 15:59:39.19 ID:FcANnQi60: #}ップスター
101 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 16:00:05.77 ID:FcANnQi60: ごめん誤爆した
102 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 16:03:18.48 ID:nIs5QKjG0: よし！！！○×ゲームに挑戦！！
103 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 16:06:09.20 ID:WAyTuDBkO: このスレが気になって最近は携帯でも覗きに来ちゃいます＞＜
104 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 16:18:33.73 ID:jd/kQP4d0: マインスイーパできまんまん＞＜
ttp://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0025.zip
行き当たりばったりに書くからコードが読みにくくて困る

コラムスは明日にでも挑戦するお
105 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 16:33:52.09 ID:80ZCMGLO0: ぼす
106 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 16:46:24.62 ID:cxnMPIi+0: ttp://www.vipper.org/vip193870.zip.html
スレ一覧の取得まで出来た
107 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 17:07:58.49 ID:80ZCMGLO0: ぼす
108 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 17:11:04.04 ID:jd/kQP4d0: >>104
うはｗｗｗｗクリア判定しくってたｗｗｗｗｗ
目印使うと物故割れるｗｗｗｗｗｗｗｗ
109 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 17:15:35.28 ID:zVTm2+Lj0: wikiの作品が醜過ぎ
どんな事が出来るのか明確に表示しろよ
そんなんだから人来ないんだよ
110 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 17:17:54.06 ID:80ZCMGLO0: ラーメン吹いた
111 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 17:20:46.54 ID:MYdzHARq0: シャボン玉吹いた
112 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 17:27:46.95 ID:jd/kQP4d0: 菊門拭いた
113 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 17:31:15.16 ID:S4JJpQV50: ほしゅ
114 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 17:48:27.99 ID:Y09dvqoLO: うぷアプリまとめは誰かに任せた
115 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 18:04:28.44 ID:+apdbKpv0: >>109
wikiなんだから気づけば自分が書き換えればよくね？
116 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 18:20:30.99 ID:X0qZ0rpG0: そうじゃなくて、もうちょっとすげー作品作ってうｐしろって事じゃない？
俺たちはひとつひとつの機能やら書き方やらを見て
あの作品たちからものを学べるわけだが、
興味薄い人とかにはその辺でフリーで出回ってるようなゲームを作ってうｐってもらった方が
どんなことができるのか分かりやすい。

ちなみに僕は痴漢コラムまでしかやってません
117 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 18:25:00.66 ID:cxnMPIi+0: すげー作品ってのも思いつかんが
今まで２ちゃんねるですげーって言われてたのは
みんながアイデア出して作っていくとかそんな感じ？
118 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 18:27:02.21 ID:cxnMPIi+0: 作品集どんな風になってるかと見てみたが・・・・ツンデレアプリﾜﾛｽ
119 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 18:27:46.20 ID:cxnMPIi+0: 出オチなソフトの解説つけるのも無粋な気がしたが適当にスクショとか入れてみようか
120 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 18:33:03.15 ID:cxnMPIi+0: っていうかブログつくってソフト紹介しながらアフィリエイト貼ったら俺大富豪確定じゃんｗｗｗｗｗｗ
リンゴ売るよりハイテクっぽいしｗｗｗｗｗｗｗ俺頭いいｗｗｗｗｗｗｗｗｗｗｗ
121 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 18:43:37.62 ID:RYGXoqpe0: ってか>>106すごくね？
122 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 18:45:17.73 ID:RYGXoqpe0: >>97
ｶﾜｲｿｽｗｗｗｗｗｗｗ
123 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 18:48:26.77 ID:GEsY26CJ0: VIPの皆VIPが馬鹿にされたお（#　＾ω＾）ﾋﾟｷﾋﾟｷ

このスレに
ID:sh8C8B0oは二度とこのスレに足を踏み入れるな
って書き込んで欲しいお(#　＾ω＾）ﾋﾟｷﾋﾟｷ

HUNTER×HUNTER ネタバレスレッド 586
http://etc4.2ch.net/test/read.cgi/wcomic/1139309301/l50
124 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 19:22:08.03 ID:RYGXoqpe0: はめはめ
125 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 19:57:05.75 ID:cxnMPIi+0: >>121
ですよねー
126 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:10:23.93 ID:cxnMPIi+0: よくわからんがDelphiやばいのかよ

139 名前：デフォルトの名無しさん[] 投稿日：2006/02/08(水) 19:22:52
Borland to Acquire Software Quality Company, Segue Software;
Announces Plan to Divest IDE Product Lines;
Company Sets Course for Accelerating Execution of Its Software Delivery Optimization Vision

ソフトウェア品質管理ツールの Segue Software を買収
IDE 製品群を売却
SDO 計画の実現に向けて舵を取る。

140 名前：デフォルトの名無しさん[] 投稿日：2006/02/08(水) 19:25:27
...In addition, Borland announced plans to seek a buyer for the portion of its business associated with
the Integrated Development Environment (IDE), including the award-winning Borland Developer Studio (Delphi(R), C++Builder(R)
and C#Builder(R)) and JBuilder(R) product lines.

さらにボーランドは，Delphi, C#Builder, JBuilder 等の IDE 製品群の売却先を探していること公に宣言した。

http://pc8.2ch.net/test/read.cgi/tech/1136472830/
127 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:26:25.89 ID:pHkGR+W60: でるふぃ
128 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:30:33.43 ID:FcANnQi60: >>126
　　　　　　　　　　　　　　　　　　　　　　o
　　　　土　　ヽ　十 '' 　ヽ___ﾉ　｜干
　　　 .し　つ　｜こ　（ヽﾉ） .│ の
　　　　　　　　　　　　　　￣
　+　　　　　　　　　　　。。
　　　。　　　　。　+ 　ヽヽ
゜　。・　。　+゜　　｡･ﾟ　(;ﾟ´дﾌ。
　　　　　　　　　　　　ノ(　/
　　　　　　　　　　　/ >
129 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:37:03.81 ID:80ZCMGLO0: このスレを秒間２０回くらい保守するツール作りたいんだけど
130 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:39:59.27 ID:MYdzHARq0: >>129
作っていいよ。俺が許可する
131 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:42:07.38 ID:RYGXoqpe0: >>126
　　　　　　　　　　　　　　　　　　　　　　o
　　　　土　　ヽ　十 '' 　ヽ___ﾉ　｜干
　　　 .し　つ　｜こ　（ヽﾉ） .│ の
　　　　　　　　　　　　　　￣
　+　　　　　　　　　　　。。
　　　。　　　　。　+ 　ヽヽ
゜　。・　。　+゜　　｡･ﾟ　(;ﾟ´дﾌ。
　　　　　　　　　　　　ノ(　/
　　　　　　　　　　　/ >
132 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:44:38.87 ID:RYGXoqpe0: ライフゲーム今見た

すげえｗｗｗｗｗｗｗｗ
１ドット１ピクセルで見たの初めてだｗｗｗｗｗ
133 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:46:02.83 ID:FcANnQi60: Delphi買うような所ってドイツのソフトウェア企業辺りかな？
ホリエモンが生きていたらライブドアが買ってたんだろうけど、

最悪のシナリオは、マイクロソフトが買収→握り潰す
｡･ﾟ･(ﾉД`)･ﾟ･｡
134 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:46:25.08 ID:gA/iMv+t0: このスレ見ててやりたくなった( ＾ω＾)
チャレンジしてみるお
135 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:48:44.75 ID:RYGXoqpe0: >>133
>マイクロソフトが買収
ちょｗｗｗｗそれはヒドイｗｗｗｗｗｗｗ
136 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:52:01.73 ID:FcANnQi60: >>135
今じゃ信じられないかもしれないけど、
Delphi全盛期は、マイクロソフトにとっては目の上たんこぶで超敵視してたの。
だから、Delphi製の有名ソフト作ってる奴にVisualStudioをタダで配ってたって話もあるの。
137 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:54:18.16 ID:RYGXoqpe0: >>136
>VisualStudioをタダで配ってたって話もあるの。
えーっ！！！
怖ええええええええええ
138 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:55:08.90 ID:pl+k4Aq30: 作品集の解説入れたやつのジャンルの選定とかコメントが面白すぎるｗｗｗｗｗｗ
139 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:56:07.00 ID:RYGXoqpe0: >>138
俺も今テラワロってたｗｗｗｗｗｗｗｗ
脳活性化ってｗｗｗｗｗｗｗｗｗｗ
140 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 20:59:00.42 ID:pl+k4Aq30: >>139
やべぇｗｗｗｗ笑いが止まねーｗｗｗｗｗｗ
編集したやつセンスあるなｗｗｗｗｗｗ
コメントがシュールすぎるｗｗｗｗｗｗｗｗｗ
141 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:02:07.89 ID:RYGXoqpe0: とあるものの完成に向けた第一歩

アドレスだけのコピーと、実体ごとのコピー（メモリ解放もするよ）
を、どっちもできるクラス

ttp://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0027.zip

まぁ、これだけじゃ利用価値ないけど
142 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:07:22.45 ID:S4JJpQV50: 仮想メソッドの作り方がわからないお・・・

type
TABC=class
private
public
constructor create;virtual;
end;

ってやると
forwardまたはexternal宣言された'TABC.create'が見つかりません
って出る
143 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:18:32.75 ID:FcANnQi60: 普通はコンストラクタはVirtualにしないと思います＞＜
144 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:20:56.84 ID:S4JJpQV50: >>143
適当だからお母さんごめんね＞＜
procedureで書いても同じ結果になった
145 名前：143 ：2006/02/08(水) 21:21:29.67 ID:FcANnQi60: ごめんなさい
普通はしないけどする事もあるみたい(´･ω･`)
146 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:24:23.05 ID:FcANnQi60: もしかして仮想じゃなくて抽象？

constructor create;virtual; abstract;
　　　　　　　　　　　　　　　　　↑
　　　　　　　　　　　　　　　　　これ追加してみて
147 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:27:58.72 ID:FcANnQi60: 試してみたけど
constructor hoge; virtual;
　↓
[エラー] UMain.pas(13): forward または external 宣言された 'THoge.hoge' が見つかりません

constructor hoge; virtual; abstract;
　↓
おｋ

だったお
148 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:29:11.74 ID:FcANnQi60: もう居なくなっちゃったかな(´･ω･`)
変なこと書いてごめん｡･ﾟ･(ﾉД`)･ﾟ･｡
149 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:32:37.00 ID:S4JJpQV50: >>147
抽象メソッド、ヘルプ見たらちゃんと載ってた（＾ω＾；）
ありがとう

でももう一つ質問させて下さい
このクラスを継承したクラスで抽象メソッドをoverrideしないと
継承したメソッドをimplemetationに書いても使えないんですか？
継承して手間を省こうと思ったのにvirtual;abstract;をoverrideに書き換えてコピペしないとだめ？
150 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:38:42.49 ID:FcANnQi60: overrideつけないで

THoge = class(TObject)
　public
　　procedure hoge; virtual; abstract;
　end;

THogehoge = class(THoge)
　public
　　procedure hoge;
　end;

これでも大丈夫みたいだお
151 名前：150 ：2006/02/08(水) 21:40:09.58 ID:FcANnQi60: ごめんなさいまた間違えた
overrideをつけてください！

｡･ﾟ･(ﾉД`)･ﾟ･｡
152 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:40:14.82 ID:S4JJpQV50: >>150
継承先でも使う関数の宣言はしてねってことだね
ありがとう
153 名前：150 ：2006/02/08(水) 21:41:00.50 ID:FcANnQi60: [警告] UMain.pas(18): 'hoge' メソッドが基本型 'THoge' の仮想メソッドを隠しました

こう言われちゃいます
154 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 21:47:19.62 ID:FcANnQi60: 質問をちゃんと理解できてませんですた
>>152
そうです
155 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:05:57.50 ID:MYdzHARq0: foshu
156 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:15:36.59 ID:pl+k4Aq30 ?: Timerのintervalって最速が1？
分数とか小数で表すことはできない？
157 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:23:27.33 ID:FcANnQi60: 1も無理だお
55みたい
http://www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/vbcon/html/vbconserverbasedtimers.asp
158 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:28:00.66 ID:FcANnQi60: 高精度にしたいならこれとか
ttp://homepage2.nifty.com/Mr_XRAY/Halbow/Notes/N015.html
159 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:30:39.41 ID:85mwxNnA0: http://qurl.com/nhnd2
160 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:30:43.68 ID:S4JJpQV50: >>154
遅くなったけどサンクス
161 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:32:48.95 ID:RYGXoqpe0: >>157
55ってマジかよｗｗｗｗｗｗ

fps30は出てなかったのか・・・・・・テトリス
162 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:37:43.10 ID:l5TpLtyZ0: >>141
なかみがまいんすいーぱあああだよおおおおおおおぉぉぉぉ
163 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:39:55.57 ID:RYGXoqpe0: >>162
！！！！！！！！！！！！！！
164 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:40:45.08 ID:RYGXoqpe0: ttp://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0028.zip
165 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:46:39.62 ID:pl+k4Aq30 ?: >>157-158
サンクス
>>158のほうはなんだか面倒そうだな
でも速度が必要な、怪しい物作ってるから実装できるよう頑張ってみよう
166 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:48:56.77 ID:pl+k4Aq30 ?: と思ったら
ttp://www.sadoyama.pro.nu/htm/compo/stopwatch.htm
こんなのがあったけどこれ組み込みゃ簡単に作れるのかな？
とりあえずやってみよう
167 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:50:29.80 ID:FcANnQi60: >>165
>>158の方はList 3をコピペで保存でゴーだお
168 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:50:54.09 ID:RYGXoqpe0: >>165

uses　に　mmsystem を　追加

初期化時に　TimeBeginPeriod(1);
終了時に　　TimeEndPeriod(1);

これで、

TimeGetTime関数がミリ秒精度でＯＳタイマーくれる

ゲーム作ってるなら、

TimeStamp:=TimeGetTime;
while (TimeGetTime-TimeStamp)<16 do;

これでお手軽ＦＰＳ制御
169 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 22:58:56.88 ID:pl+k4Aq30 ?: おおお！！
みんな詳しく教えてくれてありがとう！！
やってみる！
170 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 23:01:18.09 ID:RYGXoqpe0: >>169
>>168を使うときは、

Application.onIdle イベントに繋いだ手続きを使ってね
171 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 23:15:31.59 ID:6VX7L5MC0: timeGetTimeを使用する場合プログラムの最初でtimeBeginPeriod(1);と最後でtimeEndPeriod(1);を入れないと環境によって精度が変わってしまうかも知れない
172 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 23:34:42.05 ID:l5TpLtyZ0: h
173 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 23:38:21.37 ID:scUT+3HB0: s
174 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 23:38:51.45 ID:l5TpLtyZ0: p
175 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 23:41:27.13 ID:S4JJpQV50: how do you writing
source code
pure?
176 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/08(水) 23:53:06.66 ID:RYGXoqpe0: >>175
h
s
p
177 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 00:01:52.64 ID:2R+/2OfE0: h dakedo
sex wa
pure
178 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 00:12:48.94 ID:u04RZTpd0: ほぁーたー！
179 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 00:35:00.44 ID:L0EJ3UsC0: h na Onee
san to Vi
p
180 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 00:40:05.24 ID:/7Ga19L10: >>179
ずいぶんがんばったね
181 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 00:50:46.03 ID:5CxoygZr0 ?: ttp://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0029.zip
ごめんね。
みんな詳しく教えてくれたのに僕には理解できなくてごめんね。
結局Ttimerでの実速度55程度にしかなっていないんだと思う＞＜
182 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 01:07:20.04 ID:MoOX/ci80: >>181
Delphiで脳力開発とは
こんなことにも使えるのか
Delphi恐るべし
183 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 01:08:55.52 ID:5CxoygZr0: 次は数字探しアプリでも作ってみたいなと思っています＞＜
184 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 01:22:06.33 ID:CnxOQqNc0: クラスとか使うともっとまとまるんですか？＞＜
分かりません＞＜
ttp://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0031.zip
185 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 01:40:33.82 ID:/7Ga19L10: >>186
186 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 01:56:20.14 ID:/7Ga19L10: >>185
呼んだ?
187 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 02:03:06.20 ID:f9DfgF1g0: 今酷い自演を見た
188 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 02:03:18.68 ID:CnxOQqNc0: 作品集更新してる人激しくGJ
189 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 02:06:31.84 ID:CnxOQqNc0: スロット　判定の入れ忘れてた
ttp://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0032.zip
190 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 02:29:48.13 ID:/7Ga19L10: しゅ
191 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 02:30:30.57 ID:L0EJ3UsC0: うｐろだ、アクセス制限かかってるぽい？
まぁ一度TOPに行けばいいんだろうけど。
192 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 02:31:56.99 ID:AfYRLTw/0: >>1
プログラム板でやれ
193 名前：25 ：2006/02/09(木) 02:57:58.60 ID:HqZTl+yq0: 子供が寝たのでちょっといぢったｗｗｗ

http://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0033.zip
194 名前：25 ：2006/02/09(木) 03:01:27.71 ID:HqZTl+yq0: 説明書き忘れた・・・

SPACEｷｰとカーソルｷｰで何かできます（´・ω・｀)
195 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 03:47:45.45 ID:M4tdV2yr0: >>193
！！！！！！！！！！
196 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 04:25:43.46 ID:NfNDnW8Z0: >>193
超おっきした！！！！！１１！！！！！！
197 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 05:19:06.22 ID:NfNDnW8Z0: ほ
198 名前：保守：2006/02/09(木) 05:53:09.40 ID:GQS3kRzz0: ITmediaニュース：米IT戦士の時給はいくら？
http://www.itmedia.co.jp/news/articles/0602/07/news035.html
平均30.27ドル

2005年第4四半期に米国で需要が高かったIT職とその平均時給
治験担当者（CRA） 38.52ドル
データマネジャー 45.06ドル
CRMプロジェクトマネジャー 62.01ドル
データウェアハウスアーキテクト 69.03ドル
ハードウェア／ファームウェアエンジニア 59.34ドル
.NETデベロッパー 45.77ドル
Oracleデータベース管理者 55.82ドル
プロジェクトマネジャー 57.07ドル
SAPファンクショナルコンサルタント 75.09ドル
上級科学者 43.76ドル
199 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 06:42:05.82 ID:NfNDnW8Z0: ほ
200 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 07:22:53.27 ID:rBY4Y2E60: も
201 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 07:28:52.70 ID:stno+HhVO: うあああ
気になる

はやくかえりてー
202 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 08:16:18.55 ID:NfNDnW8Z0: ほ
203 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 08:28:21.35 ID:3TZa8JJe0: り
204 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 08:37:34.27 ID:rBY4Y2E60: え
205 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 09:19:22.87 ID:NfNDnW8Z0: ゆ
206 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 09:43:39.45 ID:IIaTPEfO0: Borland、「Delphi」「C＋＋Builder」等売却へ
http://live22x.2ch.net/test/read.cgi/news/1139444093/
207 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 10:25:27.52 ID:/eSNrldQ0: トラックバック:http://live22x.2ch.net/test/read.cgi/news/1139444093/
208 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 10:26:26.04 ID:/eSNrldQ0: VIPはつかえねーのか
209 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 10:27:33.99 ID:1qLlNnaW0: 天国はできた希ガス
210 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 10:30:29.97 ID:zB8Q/IhX0: >>189
＞　Label1.Caption:=IntToStr(StrToInt(Label1.Caption)+1);
＞　if Label1.Caption='9' then
＞　　begin
＞　　　Label1.Caption:='0';
＞　　end

(；・∀・)
Tagを使ってこうするとかどうかな・・・

＞　if Label1.Tag<9 then
＞　　Label1.Tag:=Label1.Tag+1
＞　else
＞　　Label1.Tag:=0;
＞　Label1.Caption:=IntToStr(Label1.Tag);
211 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 10:48:16.77 ID:oA958X630: マカーでもできますか？
212 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 10:54:18.82 ID:zB8Q/IhX0: >>211
出来ません＞＜
でも、代わりにMac用にはオープンソース版Delphiみたいな奴で、
freepascal＋lazarusってのがあります。
http://www.lazarus.freepascal.org/
でも英語です。よくわかりません＞＜
213 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 10:55:27.34 ID:zB8Q/IhX0: Mac OSXで動いてる所のスクリーンショット
http://www.lazarus.freepascal.org/modules.php?op=modload&name=Screenshots&file=index&req=showsc&id=32
214 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 10:58:10.81 ID:TLkT2Dm60: FreePascalのコンパイルの遅さが絶望的なんだよな
215 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 11:40:48.21 ID:oA958X630: Cocoaでやるからいいです
216 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 11:52:32.06 ID:oA958X630: Cocoaでつくりました
http://www.viplog.net/desktop/src/1139453526817.png
217 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 12:03:50.45 ID:3TZa8JJe0: str:string;
begin
if not clip.HasFormat(CF_TEXT) then begin
showmessage('ちょｗｗｗおまｗｗｗそれ違うｗｗｗ');
exit;
end;
tex.Text:=clip.AsText;
for i:=0 to tex.Count-1 do begin
while true do begin
p:=pos(' ',tex[i]);
if p=0 then begin
break;
str:=tex[i];
Delete(str,p,1);
Insert(' ',str,p);
tex[i]:=str;
end;
end;
clip.AsText:=tex.Text;
end;

end;

end.
218 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 12:40:26.40 ID:/7Ga19L10: ほしゅしとけ
219 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 13:01:19.85 ID:stno+HhVO: ほ
220 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 13:28:44.76 ID:1dffwwgA0: し
221 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 13:29:23.83 ID:stno+HhVO: の
222 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 13:33:09.46 ID:qedrgZ/K0: か
223 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 13:46:27.13 ID:oA958X630: わ
224 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 14:00:09.50 ID:y7mDKlVF0: い
225 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 14:07:22.38 ID:qedrgZ/K0: 星野監督の流れかと思ってた。
226 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 14:16:59.88 ID:NQ532Kjr0: http://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0034.zip
倒れるのに時間がかかる。書いたコードは１行のみ。
227 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 14:23:22.29 ID:TLkT2Dm60: 面白ぇｗｗｗ
228 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 14:44:41.85 ID:1qLlNnaW0: レスは流れない
それは積み重なる
229 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 14:48:21.62 ID:v5gkrR/cO: おっぱお保守
230 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 15:05:17.70 ID:1dffwwgA0: ほひゅ
231 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 15:18:49.53 ID:0ZX6oKRl0: ほしゅ
232 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 15:45:34.95 ID:9UAWJhx10: チラシの裏に「保存」機能のみを付けた糞テキストエディタを作ってみたんですが、
コンパイルエラーが出ます。どなたかご教授お願いします＞＜

-----
procedure TForm1.Button1Click(Sender: TObject);
var
mgt: String;
begin
if SaveDialog1.Execute = True then
begin
mgt := SaveDialog1.FileName;
Edit2.Text.SaveToFile(mgt);
end;
end;

[エラー] Unit1.pas(52): レコード、オブジェクトまたはクラスのいずれかが必要です
[致命的エラー] Project1.dpr(5): 'Unit1.pas' ユニットはコンパイルできませんでした
-----

Edit2.Text.SaveToFile(mgt);がいけないんですがここをどう直せばいいんでしょうか
233 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 15:53:16.46 ID:NQ532Kjr0: >>232
Edit2がTMemoだったら
Edit2.Lines.SaveToFile
でおＫ。
234 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 16:00:05.96 ID:9UAWJhx10: TEditの場合はどうなりますか？
235 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 16:03:24.09 ID:NQ532Kjr0: >>234 こんな感じかな
var
　StrList: TStringList;

　StrList := TStringList.Create;
　try
　　StrList.Text := Edit2.Text;
　　StrList.SaveToFile(mgt);
　finally
　　StrList.Free;
　end;
236 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 16:21:09.24 ID:J+aH/dCV0: 【IT】米ボーランドが開発ツール撤退へ、IDE事業は売却、今後はALMに注力
http://news18.2ch.net/test/read.cgi/bizplus/1139452898/
http://enterprise.watch.impress.co.jp/cda/foreign/2006/02/09/7187.html
237 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 16:41:32.71 ID:NfNDnW8Z0: コラムスもどき
ttp://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0035.zip
一応遊べる状態までもってきたお
魔宝石？シラネーヨ
238 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 16:43:17.43 ID:NfNDnW8Z0: 操作方法は←↓→+SPACEね
239 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 16:43:53.56 ID:XzrWl2vw0: ○プログラム板でやれよ
●新しく始める人を増やしたいのでvipです。それに、あっちは馴れ合いに向きません。

バカじゃねえの？プログラム板でやれよ
240 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 16:44:43.34 ID:1qLlNnaW0: なんか知らんがこのスレ結構有名なのか？
241 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 16:47:17.33 ID:7EnXzZQC0: >>239
VIPに板違いなんて概念ないからおｋ
以下スルー
242 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 17:01:23.44 ID:M4tdV2yr0: >>237
普通に面白い
243 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 17:13:44.97 ID:ZRlmAHe10: ラーメン吹いた
244 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 17:18:41.60 ID:GQS3kRzz0: >>237
おもすれぇえええ
245 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 17:45:02.05 ID:M4tdV2yr0: ﾎ
246 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 17:50:42.83 ID:9UAWJhx10: >>235
とんくすです。
無事実行できました。よかった・・・
247 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 17:50:46.68 ID:GQS3kRzz0: シーシャープｲﾝｽｺした
248 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 18:25:42.94 ID:M4tdV2yr0: abunai
249 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 18:38:49.28 ID:/7Ga19L10: hosyu
250 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 18:40:38.07 ID:qedrgZ/K0: 治安が高いスレですね
251 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 18:52:39.45 ID:u04RZTpd0: >>226
なんだこりゃ！物理エンジンってやつ？
252 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 18:59:37.51 ID:u04RZTpd0: ゲームライブラリ比較いいね

OpenGLサポートなんて知らなかったー　・・・　裏技？
253 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 19:01:42.01 ID:NQ532Kjr0: >>251
そうです。ODEというフリーの物理エンジンを使ってます。
詳しくは↓
http://www.wikihouse.com/DelphiVIP/index.php?%A5%B2%A1%BC%A5%E0%A5%E9%A5%A4%A5%D6%A5%E9%A5%EA%C8%E6%B3%D3#content_1_5
254 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 19:03:03.88 ID:NQ532Kjr0: 詳しくはって書いたけど全然詳しくないな。URLとかは>>253
255 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 19:04:20.25 ID:u04RZTpd0: >>253
物理エンジンってすごいのな　名前しか聞いたこと無かったけど
サイト見てみたけど　よくわかりません＞＜

http://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0036.zip

キューとかやってみた
256 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 19:13:10.57 ID:HHrsFgJA0: type
TP = class
public procedure Main; virtual; abstract; end;

TPa = class(TP)
public procedure Main; override; end;

TPb = class(TP)
public procedure Main; override; end;

【目的】
あるクラスTPで抽象メソッドMainを宣言して、それをTPaとTPbで継承させた。
Form1の関数の中で、型がTPaかTPbの変数aを使ってa.Main;としたら、aの型に応じてMainを動かしたい。
【問題】
でも、その変数aの宣言ではTPaかTPbかどちらか片方の型で宣言する必要があるので思い通りになりません。
どうすればいいんでしょうか？
257 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 19:18:29.32 ID:NQ532Kjr0: >>256
変数をTPで宣言する。abstractがあってもCreate出来ないだけで扱うことは出来る。
なお、その変数にはTPa、TPbのどちらも代入可能。めんどくさいので未確認。
258 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 19:24:54.96 ID:HHrsFgJA0: >>257
その通りやったら動いたできた！！ありがとう
259 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 19:39:16.93 ID:u04RZTpd0: あげ
260 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 19:52:08.94 ID:QWnzgpd10: age
261 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 20:37:54.49 ID:1dffwwgA0: ぬ
262 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 20:41:15.39 ID:u04RZTpd0: れ
263 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 20:50:18.43 ID:NQ532Kjr0: http://www.wikihouse.com/DelphiVIP/index.php?%A5%B2%A1%BC%A5%E0%A5%E9%A5%A4%A5%D6%A5%E9%A5%EA%C8%E6%B3%D3#content_1_5
のスクショのデモをうｐしときます。３Ｄとか興味ある方はどうぞ。
ttp://www.vipper.org/vip194556.zip.html
オリジナルのサイトはhttp://www.cambrianlabs.com/Mattias/DelphiODE/ 。XPで実行できなかったのでDel6でリビルドしました。
264 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 20:56:21.58 ID:u04RZTpd0: >>263
ありえＮＥＥＥＥＥＥＥＥＥＥＥＥＥＥＥＥＥＥＥＥＥＥＥＴ！！！！！！！！！！！！！！！！！！！！！！！！
リアルすぎｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ
やっほうｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ

ブーンｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ
265 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 21:17:12.33 ID:ZRlmAHe10: >>263
いま壁走りしてきたｗｗｗｗ
すげえｗｗｗｗ
266 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 21:40:00.69 ID:ybcDf72Z0: はじめまして。
どっかからここにたどり着いた
プログラム？なにそれ？的なプログラム初めてな者です。
早速質問があります。
まとめWikiのコラムをやっていて
置換ツールを作ろう/９の
プロジェクト＞project1をコンパイル
というとこで[エラー]Unit1.pas(50):文が必要な場所にファイルの末尾があります。
っていうのが出るんですが・・・
いまいち理解ができず苦しんでいますorz
267 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 21:42:47.71 ID:NQ532Kjr0: >>266 たぶんendが足りない。"end;"のはずが"end."だったりすることあるよね。
268 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 21:43:08.57 ID:PETLpjeE0: http://qurl.com/nhnd2
269 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 21:47:02.00 ID:ybcDf72Z0: end;はあるんですが・・・
begin
if not clip.HasFormat(CF_TEXT) then begin
showmessage('')
exit;
end;
にもう一個end;つけて
さらにend.つけたらできたっぽいです
お騒がせしました；
270 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 21:56:09.08 ID:NQ532Kjr0: >>269 タブやスペースはいくら入れてもエラーにならないから、インデントをつけて見やすくしましょう。
271 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:07:18.06 ID:f2Fcb46j0: OpenGLやりました！！
272 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:07:47.94 ID:f2Fcb46j0: Delphiの２ちゃんブラウザってあるの？今
273 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:18:54.59 ID:NQ532Kjr0: >>272 Jane系、ギコナビ、ホットゾヌとか。
A-BoneはBCB。
274 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:38:30.41 ID:1dffwwgA0: ぬ
275 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:39:44.93 ID:qedrgZ/K0: る
276 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:41:39.60 ID:fAMOzzAG0: ぽ
277 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:47:59.10 ID:/7Ga19L10: ガ
278 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:51:14.82 ID:5CxoygZr0: >>272
むしろいっぱいありまくり
Delだと専ブラって作りやすいのか？っていうぐらいに
279 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:57:32.17 ID:7A3dZlGM0: >>226
いいねぇ
>>237
いいねぇ
>>255
工夫次第で面白いものができそう
>>263
ちょｗｗｗｗｗｗｗおまｗｗｗｗｗｗｗ
280 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:58:08.62 ID:7A3dZlGM0: >>272
かちゅもでるぴーじゃなかったっけ？
281 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 22:58:14.32 ID:mkFdss2y0: >>272
http://www.geocities.jp/browser_2ch/

>>278
タダでGUIアプリが簡単に作れる環境が他にないからでしょ
282 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 23:00:54.24 ID:RpW9Lyxs0: Janeのソースが完全オープンだったころによくいじったなー
久々になんかやってみるかな
283 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 23:13:12.66 ID:fAMOzzAG0: age
284 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 23:31:38.34 ID:fAMOzzAG0: ほ
285 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 23:31:54.84 ID:qedrgZ/K0: る
286 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 23:35:26.48 ID:8Npb1AXj0: DelphiってDirectX使う？
287 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 23:38:37.99 ID:fAMOzzAG0: >>286
つ　http://www.wikihouse.com/DelphiVIP/index.php?%A5%B2%A1%BC%A5%E0%A5%E9%A5%A4%A5%D6%A5%E9%A5%EA%C8%E6%B3%D3
288 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/09(木) 23:43:04.44 ID:8Npb1AXj0: ありがと、C/C++/WinAPI使ってるんだけどDelphiのほうが簡単そうだね
289 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:07:53.32 ID:xlkm92qP0: 　　
290 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:11:36.99 ID:PKsiNJY/0: Delphiで作ってる２ちゃんツールというとJaneとホットゾヌだっけ。
291 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:13:14.95 ID:Wxrntogh0: Delphi事業が売却される件について
292 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:14:24.25 ID:xlkm92qP0: Open Delphiｷﾎﾞﾝﾇ
293 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:23:11.90 ID:e0dhFfLN0: >>292
超金持ちのエロイ人がBorlandから買い取って
ソースみんなにあげる

どうみてもゲイツに潰されます
本当にありがとうございました。
294 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:26:39.06 ID:Wxrntogh0: >>293
IBMのEclipseは潰されるどころかシェア喰ってるじゃん
Delphiは知名度あるし、オープンソースになったら逆に栄えると思うぞ
295 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:28:54.66 ID:e0dhFfLN0: >>294
エロイ人よりゲイツが高く積んで買い取るんじゃないか　と　思った
↓
世に出さない
↓
あぼーん

流石に無いか
296 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:31:18.17 ID:Wxrntogh0: >>295
J♯.NETとか作ってるくらいだから世に出さない事は無いだろ
むしろDelphiユーザーを簡単に吸収できてｳﾏｰだと思う
297 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:31:57.76 ID:13o/YBCJ0: ゲイツが買い取る
↓
Visual Ｐ＃
↓
ｳﾏｰ?
298 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:32:31.06 ID:e0dhFfLN0: >>296
なるほど
Ｃ＃みたいに無料のが出てくれるならそれでもいいかもｗｗｗ
299 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:33:23.73 ID:il6CIDTe0: Fortranで死に掛けてる俺でも使えるようになりますか？
300 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:36:01.27 ID:e0dhFfLN0: >>299
そっちのが難しいと思う
301 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:37:03.71 ID:13o/YBCJ0: >>666
白い猫（声：千秋）
302 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:38:25.84 ID:13o/YBCJ0: うわ、何誤爆してるんだ俺ｗｗｗｗ

>>299
死にかけってのは、フォートラン使いだけど先行き不安って意味なのか
大学かなんかの課題でフォートランさせられててわけわかめ状態なのか
どっちだ？
303 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:39:36.35 ID:il6CIDTe0: >>302
後者です
304 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:48:40.65 ID:13o/YBCJ0: >>303
何とかなると思うお。
このスレの大多数は親切だし。

でもとりあえず目の前のフォートランをなんとかしたほうがいいんジャマイカ？
305 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 00:49:47.99 ID:il6CIDTe0: はい・・・がんばりますです
306 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 01:09:49.21 ID:il6CIDTe0: ほげ
307 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 01:11:02.98 ID:P/XEKE5+0: わかわかんね
大人しくjavaやろ
308 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 01:19:33.66 ID:il6CIDTe0: ほげ
309 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 01:42:38.84 ID:513k4S2e0: ほげ
310 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 02:34:37.10 ID:xlkm92qP0: ほっしゅっしゅ
311 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 02:46:31.19 ID:xlkm92qP0: ほっしゅっしゅ
312 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 02:57:06.56 ID:il6CIDTe0: 保守＋あげ
略してほげ
313 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 02:57:39.46 ID:8YCF5YEq0: デバッグパターン
http://monoki.fc2web.com/diary/txt/computer/debugpatern.html

こういうのをパターン化できたら人類はちょっとだけ幸せになれる気がする
314 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 03:05:13.94 ID:xlkm92qP0: ソースみようと思ったけどファイルたくさんで挫折しますた
ttp://ipt.sakura.ne.jp/gecko/bagel/
315 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 03:25:22.63 ID:il6CIDTe0: ほげ
316 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 03:54:46.82 ID:513k4S2e0: ほげ
317 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 04:35:34.97 ID:il6CIDTe0: ほげ
318 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 04:46:36.91 ID:L30yKCEg0: >>312
つ｜座布団1枚｜
319 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 04:48:39.95 ID:il6CIDTe0: なんか座布団貰っちゃった
320 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 05:08:55.13 ID:il6CIDTe0: ほげ
321 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 05:27:12.33 ID:513k4S2e0: もげ
322 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 05:49:03.54 ID:xlkm92qP0: ほげ支援
323 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 05:51:43.87 ID:il6CIDTe0: ほげ
324 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 05:51:52.20 ID:xlkm92qP0: ほげ
325 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 06:37:21.67 ID:k63ior/Y0: ほげ
326 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 06:48:21.11 ID:il6CIDTe0: ほげ　が浸透しつつあるｗｗ
327 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 06:56:01.16 ID:+cYu3qFL0: >>305
フォートランの方が256倍難しｽ
と一日でフォートラン挫折した俺が言ってみる
328 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 07:25:10.31 ID:il6CIDTe0: ほげ

プログラミングは全般的に難しいっすよ・・・
329 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 07:39:49.09 ID:xlkm92qP0: 今日は徹夜ほげ
330 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 07:55:04.96 ID:+cYu3qFL0: FORTRAN/PASCALで面白いのみっけた
http://ja.wikipedia.org/wiki/%E6%9C%AC%E7%89%A9%E3%81%AE%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%9E%E3%83%BC%E3%81%AF%E3%83%91%E3%82%B9%E3%82%AB%E3%83%AB%E3%82%92%E4%BD%BF%E3%82%8F%E3%81%AA%E3%81%84
331 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 08:16:47.75 ID:513k4S2e0: 補習
332 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 08:30:51.06 ID:KphsJrlXO: 俺も参加！ほげほげ
333 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 08:44:42.06 ID:il6CIDTe0: 一晩このスレ保守するの疲れたｗｗ

ほげ　と言ってきましたが起源は下のスレです
http://ex14.2ch.net/test/read.cgi/news4vip/1139238541/
興味があったら覗いて見てください
334 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 08:46:16.49 ID:gTg58NHn0: >>333

おっつでーす
335 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 08:50:20.15 ID:8YCF5YEq0: 問題文：
20から120までの整数の中で17で割り切れる値をすべて表示し、
その総個数を求めるプログラムを作成しなさい。
336 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 08:51:31.07 ID:8YCF5YEq0: >>335
procedure TForm1.Button1Click(Sender: TObject);
var
    i:    Integer;
    kosu:    Integer;
begin
    kosu:=0;
    with Memo1.Lines do
    begin
        for i:=20 to 120 do
            if (i mod 17)=0 then
            begin
                Add(IntToStr(i));
                Inc(kosu);
            end;
        Add(Format('個数:%d', [kosu]));
    end;
end;

練習にム板の宿題スレの問題をといてみた
337 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:02:51.20 ID:il6CIDTe0: こういうのをすらっと書けるようになりたいものです
hoge
338 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:04:41.00 ID:8YCF5YEq0: 眠いので問題ｺﾋﾟﾍﾟしまくって起きてから解こうと思う

【問題】
indata.datファイルを読み込んで得点順に並び替えるプログラムを作成してください
indata.datファイルの例：
1.あ.58
2.い.69
4.え.89
5.お.74
6.か.100
339 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:07:28.19 ID:8YCF5YEq0: 【問題】
配列array中に数値numberがいくつあるかを数える関数count(number, array, length)を
作成してください。lengthは配列arrayの要素数です。この関数は再帰関数になるはずです。
340 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:10:41.09 ID:8YCF5YEq0: 【問題】
６、４、３、８、１という数字を昇順に並びかえよ。
341 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:11:54.30 ID:xlkm92qP0: ウホッおれおれも
342 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:12:41.88 ID:8YCF5YEq0: 【問題】
10人の名前、年齢、電話番号の入ったファイルを作り、それを読み出すプログラムを作れ。
そのとき、ファイル名は画面上で自由に設定でき、ファイルの拡張子はdatとなるようにせよ。
また、ファイル名が８文字を越えると、入力したファイル名は無効となり、再度ファイル名の入力を要請できるようにせよ。
問題上のファイルに新たに１人のデータを追加するためのプログラムを作れ。
343 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:14:35.94 ID:8YCF5YEq0: 【問題】
"+", "*", "(", ")" を用いた式を読み込み、その計算値を出力するプログラムを作りなさい。
簡単のために、数値は1桁の整数に限り、式の途中に空白文字などの他の文字は入力されないものとする。
ヒント
"+"と"*"は優先順位が異なることを考慮すると、以下の条件が成り立つ。
　　　1. 式(expression)はいくつかの項が"+"で結ばれている
2. 項(term)はいくつかの因子が"*"で結ばれている
3. 因子(factor)は1つの数値か、"(", ")"で囲まれた式である
この、式、項、因子をそれぞれ一つの関数で表現するとよい。
344 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:17:47.66 ID:8YCF5YEq0: 【問題】
大きさ１０のint型の配列aを用意し、１００００以下の素数を大きい順に
１０個、配列aに入れて、その後に配列aの要素の和を求めよ。
345 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:19:26.65 ID:8YCF5YEq0: 【問題】
数値列が並んでいるテキストファイルがあって

12 34 68 1 4
2 89 24 58 7 46
…　　　こんな感じのが10行あります

これを行ごとに足し算するプログラムをつくりなさい
行ごとに数字の個数は、5つだったり、6つだったりバラバラです
346 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:24:45.37 ID:8YCF5YEq0: 以上、寝る。
347 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:25:16.14 ID:il6CIDTe0: 乙カレー
おやしみ
348 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:27:06.16 ID:nmRwylu+0: Delphai懐かしいな
昔これで証券システム作ってたよ
349 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:29:34.16 ID:xlkm92qP0: これは分からないかもしれないね・・・
350 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:44:44.61 ID:il6CIDTe0: プログラミングできる人マジで尊敬する
すごい
351 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 09:52:33.18 ID:3hluBBKnO: デルファイと、ボーランドの他の無料のやつ(C/C++ﾃﾞｨﾍﾞﾛｯﾊﾟｰだっけ？)って何が違うの？
352 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 10:11:11.09 ID:JNhybTKA0: Delphi はPascalという言語で記述しなければならない。
Pascalはプログラミングの学習に向いてる言語だと言われている。
初心者でもわりと理解しやすい。

BCC は C または C++ で書かないといけない。
C言語はオールラウンドプレイヤー的で幅広い用途で使える。
C++はC言語にオブジェクト指向という道具を盛り込んだもの。
353 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 10:14:01.86 ID:nmRwylu+0: >>351
人間に例えるとかたや日本語、かたや英語といったような感じ
命令の仕方が違う
354 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 10:18:34.57 ID:OEPdWiXu0: 腐女子のオッパイうｐきたーーーｗｗｗｗ
ttp://mamalovepapa666.blog42.fc2.com/これじゃ親は悲しむなｗｗｗｗｗｗ
355 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 10:44:17.54 ID:Y7QSuPAy0: はじめてきた。
Wikiに書いてあったから、保守。

中学以来、8年ぐらいDelphiさわってないから、
久々にやりたくなってきたお。
356 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 11:29:34.00 ID:jyy8YDQ80: hoshu;
357 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 11:37:24.40 ID:KphsJrlXO: ほげーっ
358 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 11:59:40.50 ID:3hluBBKnO: >>352
>>353
ありが㌧
359 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 12:49:00.73 ID:KphsJrlXO: 一日一保毛

ノートにプログラミングだうぇい
360 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 13:09:47.63 ID:iM54Nm0V0: ほげっとく
361 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 13:16:57.51 ID:SmVHA2rR0: 今みんなはどんなもの作ってるのだ？
362 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 13:18:19.26 ID:WqgZgeNO0: VBしかできん
363 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 13:19:20.31 ID:513k4S2e0: ほすしとく
364 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 13:28:35.67 ID:fElVFlTt0: >>362
VBより簡単だと思うお
365 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 13:43:34.13 ID:SmVHA2rR0: ほう、何も作っていないということだな
366 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 14:44:55.15 ID:il6CIDTe0: ほげ
367 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 15:08:18.75 ID:il6CIDTe0: このスレが落ちそうで寝れないほげ
368 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 15:16:29.99 ID:KphsJrlXO: 俺は長期計画でネットワークライブラリ作ってる
369 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 15:50:04.06 ID:jyy8YDQ80: 保守
370 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 16:00:16.27 ID:z+BxRGBt0: >>368
Indyベース？
371 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 16:01:23.90 ID:z+BxRGBt0: >>361
DVDプレイヤー
372 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 16:20:31.68 ID:KphsJrlXO: >>370
Winsock2でイベント駆動
373 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 16:27:29.67 ID:z+BxRGBt0: >>372
すげぇヽ(・∀・)ﾉガンガレ
374 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 16:32:42.79 ID:KphsJrlXO: >>373
ありがとうっ
375 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 16:34:53.72 ID:z+BxRGBt0: 質問です
1個前のクラスの関数を呼ぶときって
inherited hogehoge;って書くけど、
2個前のってどう書いたらいいんですか？
具体的に書くと
　TList.Delete(Index: integer);
TListを継承してTHogeList
　THogeList.Delete(Index: integer);
THogeListを継承してTHogeListEx
　THogeListEx.Delete(Index: integer);
で、THogeListExの中からTList.Deleteを呼びたいです。
376 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 16:47:57.51 ID:OVNCrgfl0: 仮想関数でなければ TList( Self ).Delete( idx ) で呼べるんじゃないかなあ
仮想関数だったらどうやるのかわからん
377 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 16:49:02.83 ID:z+BxRGBt0: できた！
ありが㌧
378 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 17:06:53.15 ID:lB7XQ8fx0: Enterｷｰでbutton1を実行させたいんですが、、、どうやればいいんでしょうか
379 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 17:08:30.89 ID:z+BxRGBt0: >>378
Defaultって所をTrueにすると出来るお
380 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 17:31:59.43 ID:OVNCrgfl0: 眠い…
381 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 17:32:20.32 ID:lB7XQ8fx0: >>379
すげー、できた。
382 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 17:46:15.27 ID:PRZni8+b0: チャットみたいな感じでEditに文字を打ってエンター押したら発言みたいにしたい時なんかは
EditのonKeyPressイベントハンドラの時に
if Key = #13 then // 押されたキーが「エンター」キーのとき
Button1Click(Sender); // 「送信」ボタンのイベントハンドラ Button1Click を呼び出す

なんて方法もあるみたいです。
383 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 17:46:48.25 ID:PRZni8+b0: ↑何か日本語変っすね
ごめりんこ
384 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 17:57:57.44 ID:e0dhFfLN0: >>382
デフォルト属性は、
Editにはつかないから、
フォーカスがEditにあっても、
デフォルト属性がボタンにあれば、
できるぜい

おれのＸＰだけ　っていう罠かね
385 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 18:13:21.10 ID:PRZni8+b0: あわわ
ほんとだ、こっちのんが断然楽っすね

今までずっとあーやってた・・・orz
386 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 18:44:57.58 ID:il6CIDTe0: ほげ
387 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 19:02:07.80 ID:il6CIDTe0: ほげ
388 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 19:25:27.53 ID:e0dhFfLN0: ほげ～～～

コラム見た。
ﾃｷｽﾄﾃｩｰｽﾋﾟｰﾁも取り込めるんだｗｗｗｗ
389 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 19:43:12.10 ID:e0dhFfLN0: プロジェクトジェダイに登録されてた、
Winsock2.pasを使ってるんだけど、

if Sock=SOCKET_ERROR

が、常にFalseです　ってコンパイラに怒られるのよ。
で、ライブラリの中を見てみたら、

type
u_char = Byte;
u_short = Word;
u_int = DWORD;
u_long = DWORD;
// The new type to be used in all instances which refer to sockets.
TSocket = u_int;
// This is used instead of -1, since the TSocket type is unsigned.
INVALID_SOCKET = TSocket(not(0));
SOCKET_ERROR = -1;

ってなってるわけよ。
DWORDって符号無し32Bit整数だよね、
SOCKET_ERROR = -1 っておかしいと思うんだが、
(INVALID_SOCKETは$FFFFFFFFでダイジョビゲだけど

u_int = Integer;

って書き直したほうがいい？
コメントになんか書いてあるけど意味わかんＮＥＥＥＥＴ
390 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 19:49:30.23 ID:OVNCrgfl0: >>389
その修正は多分正解
実はIndyの中に入っているIdWinsock2.pasでは

//u_int = DWORD;
u_int = Integer;

と書き直されている
391 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 19:51:10.32 ID:e0dhFfLN0: >>390
わお！！！！
ありがとう！！！！早速直しておく！
392 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 20:06:24.57 ID:il6CIDTe0: ほげ
393 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 20:09:23.54 ID:D6gJVy7F0: Perl/Tkでプログラミングしている俺様がやってまいりましたよ
394 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 20:13:13.27 ID:e0dhFfLN0: >>393
パールでGUIがかける奴だっけ
Delphiの設計環境もおもしろいっすよー
395 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 20:31:47.68 ID:e0dhFfLN0: タブ文字って
#　いくつ？
396 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 20:46:58.99 ID:e0dhFfLN0: #9　でした！
397 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 21:17:50.69 ID:e0dhFfLN0: ほげっ　ほぎょっ　
398 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 21:32:09.17 ID:513k4S2e0: 起床　ほしゅ
399 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 22:02:26.86 ID:iM54Nm0V0: ほしゅううううううううううううううう
400 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 22:14:36.66 ID:myptJSrq0: あ
401 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 22:23:25.14 ID:e0dhFfLN0: ヤター！
pack/unpackできたお！

http://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0037.zip

ボタンクリックのとこの処理ミテミテ＞＜
402 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 22:40:33.55 ID:OPeqzGsS0: ほ
403 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 23:01:20.61 ID:YNEZpkl30: ほしゃああああああ
404 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 23:19:44.49 ID:xlkm92qP0: ほげ
初心者でも出来そうなお題下さい＞＜
405 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/10(金) 23:38:54.13 ID:bZpTfnXF0: やらないか
406 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 00:09:45.76 ID:AiQuRpcl0: やりますか
407 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 00:24:08.80 ID:JuA6pFbm0: >>338-345はどうなったのさｗｗ

今日Delphi2006を買おうと思って店に逝ったら売ってなかったんで
かわりにVisualStudio買ってきたｗｗｗｗｗｗ

部屋のどっかにDelphi6製品版が埋まってるはずなんだけど
どこにあるのか思い出せないｗｗｗｗ……orz
408 名前：401 ：2006/02/11(土) 00:28:43.66 ID:9QLtlzuO0: 誰かコメントしてお＞＜ｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ
409 名前：25 ：2006/02/11(土) 00:35:01.19 ID:U7ECf8ny0: >>408
パケットのテスト？
410 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 00:35:25.27 ID:U7ECf8ny0: うはｗｗｗｗｗ名前欄消し忘れてたｗｗｗｗｗ
411 名前：４０１ ：2006/02/11(土) 00:36:41.96 ID:9QLtlzuO0: >>409
レコード境界を隠蔽したつもり
stringの長さとかｗｗｗｗｗ
412 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 00:40:04.11 ID:JuA6pFbm0: >>409
このスレの２５ならまた３０分で何か作ってくれｗｗｗｗｗｗｗ
413 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 00:45:05.53 ID:9QLtlzuO0: >>412
うは　見てきた
poly line 3D自作とかすげえ
414 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 00:49:10.59 ID:9QLtlzuO0: ほぎゃーああああああああ
415 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 00:52:02.07 ID:JuA6pFbm0: っていうか、>>338の問題って、どの数値が得点なのかわかんないじゃんｗｗ
416 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 01:12:22.96 ID:AiQuRpcl0: ほげ
417 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 01:23:40.39 ID:OfbwVL9j0: >>415
よく見ろ
これは引っ掛け問題だ
最初から得点順に並んでいる
418 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 01:24:56.99 ID:9QLtlzuO0: >>417
ｗｗｗｗｗｗｗ
419 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 01:25:52.06 ID:ifrCCs3w0: ほす
420 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 01:54:45.48 ID:ZHq1mjpB0: やばいほしゅ
421 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 02:01:16.36 ID:ifrCCs3w0: ほす
422 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 02:17:49.64 ID:UGKsb9yw0: ほ
423 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 02:41:57.62 ID:eiMk2q2U0: Borlandが死にそうな時期にDelphiはじめるのもなぁ・・
CとかC++でWinAPIとDirectX使うのも面白いよ
424 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 03:03:24.24 ID:ACHvUX+H0: それを言うならAPIがWinFXに移行しようとしてるときにWin32API使ってプログラム書くのもどうかなーって話になるけどな
425 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 03:09:50.29 ID:eiMk2q2U0: WinFXってなにさ
426 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 03:19:01.84 ID:ACHvUX+H0: ぐぐれよーばかー
427 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 03:34:14.29 ID:eiMk2q2U0: WinAPIは今のところウィンドウを表示させるテンプレにしか使ってないから大丈夫だけど
WinFXとやらにDirectXが吸収されると困る
428 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 03:45:49.62 ID:U7ECf8ny0: DirectXはXNAに統合されますよ。だからといってDirectXが廃止されるわけではないですが、
D3D～などのインタフェイスやD3DX～などのAPIはXGraphicsとかに置き換わるんじゃないかと予測します。
既に最新のSDKにはXInputやXACTなどXBOX360でも使用されている次世代ライブラリが含まれていますので。
429 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 03:50:20.07 ID:U7ECf8ny0: >D3D～などのインタフェイスやD3DX～などのAPIはXGraphicsとかに置き換わるんじゃないかと予測します。
補足
事実上、置き換わるんじゃないかと予測します。
430 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 03:59:43.25 ID:eiMk2q2U0: それは困る
新API郡が使い出されるのはvista発売数年後だと思うが・・
まぁ統合されて使いやすく間単になってればいいが
431 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 04:31:43.55 ID:AiQuRpcl0: ほげ
432 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 05:05:56.69 ID:BT/+7MGp0: >>338　これはいい練習問題ですね＞＜
uses SysUtils, Classes;

var Parser: TStringList;

function CompareData(SL: TStringList; i1, i2: Integer): Integer;
var v1, v2: Integer;
begin
  Parser.DelimitedText := SL[i1];
  if Parser.Count < 3 then v1 := -1 else v1 := StrToIntDef(Parser[2], -1);
  Parser.DelimitedText := SL[i2];
  if Parser.Count < 3 then v2 := -1 else v2 := StrToIntDef(Parser[2], -1);

  if v1 < v2 then Result := -1 else if v1 > v2 then Result := 1
  else Result := 0;
end;

const FileName = 'indata.dat';
begin
  if not FileExists(FileName) then Exit;
  with TStringList.Create do try
    Parser := TStringList.Create;
    try
      Parser.Delimiter := '.';
      LoadFromFile(FileName);
      CustomSort(CompareData);
      Write(Text);
    finally Parser.Free; end;
  finally Free; end;
end.
433 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 05:05:58.06 ID:OfbwVL9j0: ん？
何か物音がしたぞ
ちょっと見てくる
434 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 05:42:29.33 ID:ACHvUX+H0: 死亡フラグ
435 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 05:42:37.34 ID:eiMk2q2U0: そして>>433が再び帰ってくることは無かった
436 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 05:47:44.61 ID:E+jDTo4e0: いまから学んでも次のＯＳで使えなくなるのかな
437 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 05:48:05.23 ID:BT/+7MGp0: お、お前らなんかと一緒にいるのはごめんだ！
鍵をかけて部屋に一人でいたほうがまだマシだ！！
438 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 05:49:27.29 ID:AiQuRpcl0: つれないこと言うなよ
439 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 05:50:33.15 ID:ACHvUX+H0: 今のAPI使えなくなったら既存ソフト全滅で資源移行が出来ないから一応動くには動くけど、
新しい機能使うには新APIセット使ってね、って感じになると思うよ
440 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 06:39:16.29 ID:ifrCCs3w0: きんきゅーほす
441 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 06:47:44.09 ID:9SBJVgDN0: コンコン。>>437さんちょっといいかしら？
コンコン。。。>>437さん？
コンコンコン･･･ガチャガチャ。。おかしいわ、返事がないわ。。
442 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 07:13:35.02 ID:ifrCCs3w0: ほす
443 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 08:08:42.97 ID:vVc5QjSk0: ぬ
444 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 08:40:51.54 ID:ifrCCs3w0: ほし
445 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 09:16:58.04 ID:6lPIpWoA0: ほげ
446 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 09:45:16.75 ID:ZHq1mjpB0: ほっげ
447 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 09:52:05.71 ID:JuA6pFbm0: 次のお題：
>>441が>>437の心を開放するゲーム
448 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 10:16:55.03 ID:AiQuRpcl0: ほげ
>>437はツンデレ
449 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 10:43:56.67 ID:AiQuRpcl0: さげで保守
450 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 11:52:45.06 ID:ACHvUX+H0: 保守
451 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 11:53:09.83 ID:vVc5QjSk0: hoshu;
452 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 11:53:12.64 ID:9QLtlzuO0: vistaはすごい事になるみたいだな
453 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 12:23:11.75 ID:9QLtlzuO0: 単純なメモリのコピーって、Move？
GetMemとかとカテゴリが違うからちょっとキモイ
454 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 12:35:35.89 ID:ACHvUX+H0: Moveだねえ
455 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 12:43:08.12 ID:o0cuAjo20: チェックボックスにチェックを入れると、テキストバーが編集可能になる・・・みたいなチェックボックスを使った
プログラムのサンプルを書いてみたんですがなぜか動かず。。。
サンプルコードとか書いてもらえると幸いだお（；＾ω＾）

CheckBox1.CheckedをTrueにするとEdit1のReadOnly値がFalseになる・・・みたいな？
456 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 12:50:58.55 ID:egFpLQPx0: CheckBox1のOnClickに
Edit1.ReadOnly:=not CheckBox1.Checked;
かな？
457 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 12:52:05.45 ID:OfbwVL9j0: >>455
あらかじめEdit1のEnabledをFalseに設定しておいて

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
Edit1.Enabled := CheckBox1.Checked;
end;

って感じとか？
458 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 12:52:57.82 ID:9QLtlzuO0: >>454
わかった
459 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 13:03:42.56 ID:o0cuAjo20: >>456,>>457
テラサンクス！！ｗｗｗ
どちらの方法も出来ました・・・。すげぇ。
460 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 13:38:59.70 ID:9QLtlzuO0: 実装が簡単で、
仕様として美しくない

実装がテラムズスで、
仕様として美しい

普通後者だけど、自作ライブラリなら前者に逃げてもいい？
いや、でも・・・　というジレンマ
461 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 14:11:15.65 ID:ACHvUX+H0: 高く構えすぎてコード書き始められなくなるか、
適当な構造にしすぎて根本的な部分からの再構築を迫られるか
462 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 14:18:30.58 ID:egFpLQPx0: 仕様は美しくして、めんどくさい所は工事中にしといて、
あとで必要になったら実装すればよくね？
463 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 14:20:40.53 ID:egFpLQPx0: なんでTabControlにOnDblClickが無いんじゃー！
そんだけの為にTCustomTabControlを継承したコントロールを
自分で作る羽目になったがな(´･ω･`)
464 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 14:23:06.44 ID:9QLtlzuO0: >>462
なるほど！
465 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 14:56:18.20 ID:u08rb/3u0: ほげ
466 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:16:47.69 ID:9QLtlzuO0: ふえー　やっとできたー
虫さんと１時間は戯れたYO!
467 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:23:02.57 ID:gqbXms8w0: >>338
unit Unit1;

interface

uses
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    Dialogs, StdCtrls;

type
    TForm1 = class(TForm)
        Button1: TButton;
        Memo1: TMemo;
        procedure Button1Click(Sender: TObject);
    private
        { Private 宣言 }
    public
        { Public 宣言 }
    end;

    TTokuten=record
        tokuten:    Byte;
        data: String;

    end;

var
    Form1: TForm1;

implementation
468 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:23:30.20 ID:gqbXms8w0: {$R *.dfm}
function GetNum(data1: String):    Byte;
var
    i:    Integer;
    State:    Integer;
    num:    String;
begin
    i:=1;
    State:=0;

    while (State<2) do
    begin
        if data1[i]='.' then
            Inc(State);
        Inc(i);
    end;
    num:=copy(data1, i, High(Integer));
    Result:=StrToInt(num);
end;

function Compare(Item1, Item2:    TTokuten): Integer;

begin
    if Item1.tokuten < Item2.tokuten then
        Result:=-1
    else if Item1.tokuten > Item2.tokuten then
        Result:=1
    else
        Result:=0;
end;
469 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:23:52.68 ID:gqbXms8w0: procedure TForm1.Button1Click(Sender: TObject);
var
    StringList: TStringList;
    Tokuten: ^TTokuten;
    TokutenList:    TList;
    i:    Integer;
begin
    StringList:=TStringList.Create;
    StringList.LoadFromFile('indata.dat');

    TokutenList:=TList.Create;

    for i:=0 to StringList.Count-1 do
    begin
        New(Tokuten);
        Tokuten.data:=StringList[i];
        Tokuten.tokuten:=GetNum(StringList[i]);
        TokutenList.Add(Tokuten);
    end;

    TokutenList.Sort(@Compare);

    for i:=0 to TokutenList.Count-1 do
    begin
        Tokuten:=TokutenList[i];
        Memo1.Lines.Add(Tokuten.data);
    end;
    StringList.Free;
end;
end.
470 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:24:50.36 ID:gqbXms8w0: やっと出来たと思ったらTStringListにCustomSortなんてあったのかよ！！！！１
勉強になったぜ
471 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:27:06.41 ID:9QLtlzuO0: >>470
うは　乙であります
472 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:31:43.20 ID:egFpLQPx0: >>470
Compareは関数内関数にした方がPascalらしくてエレガントかも
473 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:35:24.46 ID:9QLtlzuO0: >>472
それ、最近誰かのソースで知った！

procedure hoge;
var
　　procedure hogec;
　　begin
　　end;
begin

end;

ってできるんだよなー
474 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:41:42.31 ID:ACHvUX+H0: var
i: Integer;

procedure SomeProc();
begin
//iにのみアクセス可能
end;

var
j: Integer;
begin
//iとjにアクセス可能
end;
475 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:56:46.22 ID:9QLtlzuO0: >>474
そんな二段階varもできるんだｗｗｗｗ
476 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 15:59:21.99 ID:16tK+PeR0: 誘導されて、はじめてここにきたんだが
まず何をすればいいですか？
477 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:06:48.78 ID:UGKsb9yw0: >>476
>>1のコラムからやっていけばいいと思うよ
478 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:09:33.85 ID:o0cuAjo20: ウィンドウ最大化ボタンをへこませたいんだけどどうすっぺ
479 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:13:20.43 ID:ACHvUX+H0: 罵声浴びせればいいとおもうよ
480 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:14:39.71 ID:o0cuAjo20: >>479
よしきた
481 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:15:50.11 ID:16tK+PeR0: >>477
今やっていってるんですけど、
実行したあと、それをやめてプロジェクトに戻るにはどうしたらよかとですか？
482 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:17:32.05 ID:egFpLQPx0: >>478
WindowStateをwsMaximizedじゃだめ？
483 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:20:39.12 ID:AiQuRpcl0: >>481
右上の×か実行→プログラムの終了
484 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:21:39.41 ID:o0cuAjo20: biMaximizeをFalseにするだけで出来た・・・ｽﾏﾝｺ
485 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:27:59.55 ID:OfbwVL9j0: 塩ラーメンのやくみのゴマを毎度入れ忘れるんだけど
どうしたらいいですか
486 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:28:38.07 ID:16tK+PeR0: >>483
ありがとう。

procedure TForm1.Button1Click(Sender: TObject);
begin
if not clip.HasFormat(CF_TEXT) then begin
showmessage('（ ^ω^）クリップボードの中身がテキスト形式じゃないお・・・');
exit;
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
clip:=TClipboard.Create;
tex:=TStringList.Create;
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
clip.Free;
tex.Free;
end;

end.
487 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:29:02.07 ID:16tK+PeR0: ありゃ。置換されてないな・・
488 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:29:26.47 ID:vIJo2XSV0: >>485
醤油ラーメンを食べる。
489 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:30:00.30 ID:ZHq1mjpB0: >>485
ゴマを口の中に入れとく
490 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:33:08.00 ID:ACHvUX+H0: >>485
try ～ finally ～ end を上手く使うといいよ
491 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:35:36.93 ID:u08rb/3u0: >>338 やってみた

procedure TForm1.Button1Click(Sender: TObject);
type TSeiseki=record
              name:string;
              score:integer;
              end;

function GetSeisekiFromLine(Line:string):TSeiseki;
var s:string;
begin
s:=copy(line,Pos('.',Line)+1,Length(Line)-Pos('.',Line));
result.name:=copy(s,0,Pos('.',s)-1);
result.score:=strtoint(copy(s,Pos('.',s)+1,Length(s)-Pos('.',s)));
end;

procedure SeisekiSort(var Seiseki:array of TSeiseki);
var i,j:integer;
    Buf:TSeiseki;
begin
for i:=0 to length(Seiseki)-2 do for j:=i+1 to length(Seiseki)-1 do
  begin
  if Seiseki[i].score<Seiseki[j].score then
    begin
    Buf:=Seiseki[i];
    Seiseki[i]:=Seiseki[j];
    Seiseki[j]:=Buf;
    end;
  end;
end;
492 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:36:17.40 ID:u08rb/3u0: var F:textfile;
    s:string;
    Seiseki:array of TSeiseki;
    i:integer;
begin
i:=0;
AssignFile(F,'indata.dat');
reset(f);
while not eof(F) do
  begin
  readln(F,s);
  Setlength(Seiseki,i+1);
  Seiseki[i]:=GetSeisekiFromLine(s);
  i:=i+1;
  end;
closefile(F);

SeisekiSort(Seiseki);

AssignFile(F,'indata_sorted.dat');
rewrite(F);
for i:=0 to length(Seiseki)-1 do
  begin
  s:=inttostr(i+1)+'.'+Seiseki[i].name+'.'+inttostr(Seiseki[i].score);
  writeln(F,s);
  end;
closefile(F);
end;
493 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 16:55:13.31 ID:u08rb/3u0: >>339
function CountNumber(Num:integer;Arr:array of integer):integer;
var i:integer;
begin
result:=0;
for i:=0 to length(arr)-1 do
  begin
  result:=result+ord(Arr[i]=Num);
  end;
end;

どうやって再帰で表現するのかわからん
494 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:07:19.45 ID:16tK+PeR0: 今日はじめてやってるんですが、
PHPがどんだけ簡単言語かわかる言語ですねｗ
半角スペース変換するだけに何行使うことやら・・ｗｗ頭痛くなってきた・・orz
495 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:12:19.91 ID:vIJo2XSV0: おれ、beginだけで一行使ったりしないなぁ。
一画面で眺められる行数を少しでも多くしたいから。

while cond do begin
{処理}
end;
とかね。

でもほとんど全てのサンプルコードではbeginの前に改行入ってるよね。
496 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:14:36.32 ID:9QLtlzuO0: >>494
PHPはハイテクだよなｗｗｗ
デバッグ情報がブラウザに吐かれるのとかもcoolすぎ
497 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:23:57.89 ID:anIi6uf60: GLScene(>>226とか>>263で使われている３Ｄライブラリ)の自動インストーラを作ったよ。
http://www.fileup.org/fup64920.mp3.html
拡張子が.mp3だけどダウンロード後に.exeになおしてください(.exeの拡張子はうｐできないため)。
とりあえずインストールできたらDemosフォルダにあるデモを実行してみるといいよ。
アンインストール時にフォルダが見つからないとか聞かれるけど適当に選んでおけばおｋ。
498 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:34:13.54 ID:anIi6uf60: >>497
このインストーラは初心者の方に手軽に３Ｄに接してもらうために作ったもので
中級者以上の方はsf.netから自前で落としてビルドしてください。

腹減ったので飯食ってきます。
499 名前：496 ：2006/02/11(土) 17:38:07.74 ID:Oxzq3CqoO: うほっ
家帰ったらやるべ
500 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:42:09.72 ID:OfbwVL9j0: 鍋に火をかける;
野菜などを切る;

while ( 湯が沸いた <> True ) do
begin
　俺.貧乏ゆすり;
end;

try
　鍋に放り込む([麺,　スープ,　野菜など]);

　while ( 麺が茹で上がった <> True ) do
　begin
　　俺.貧乏ゆすり;
　end;

　配膳; //鍋から器に移したりはしない

　俺.食す(ラーメン);
finally
　俺.食す(ゴマ);
end;

>>490
こうですか＞＜
501 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:42:41.26 ID:r/mNQrE00: test
502 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:43:55.95 ID:r/mNQrE00: あれ？
503 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:44:58.45 ID:qkM3cHG+0: やっぱ忘れたらゴマだけ喰うのか
504 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:45:43.48 ID:16tK+PeR0: begin
     if not clip.HasFormat(CF_TEXT) then begin
         showmessage('（ ^ω^）クリップボードの中身がテキスト形式じゃないお・・・');
         exit;
     end;
     tex.Text:=clip.AsText;
     //ここに置換処理が入る
     for i:=0 to tex.Count-1 do begin
     //ここに一行あたりの置換処理が入る
          while true do begin
             p:=pos(' ',tex[i]);
             if p=0 then begin
                 break;
             end;
             //ここに半角スペース削除処理
             str:=tex[i];
             Delete(str,p,1);
             //ここに挿入処理
             Insert(' ',str,p);
             tex[i]:=str;
          end;
     end;
     clip.AsText:=tex.Text;
end;

てｓｔ
505 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 17:46:12.78 ID:r/mNQrE00: test
506 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 18:05:40.59 ID:33RmpYfs0: 俺も今>>504の奴やってたんですけど
置換した後に’置換完了’みたいなメッセージー出したいですけど
どこに入れたらいいんですか＞＜
507 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 18:06:26.19 ID:anIi6uf60: >>500
>鍋に火をかける
鍋を火にかけるじゃないかな？
508 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 18:07:55.16 ID:anIi6uf60: >>506
clip.AsText := ...
のあとに
ShowMessage('痴漢完了');
とか。
509 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 18:08:46.86 ID:16tK+PeR0: >>506
俺もはじめてだが、
最後のclip.AsText:=tex.Text;　で置換した後
showmessage('置換完了');
ってしたらいいんじゃないですかね？成功か成功じゃないかは判断してませんが。
510 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 18:22:09.10 ID:0/wFesHS0: >>455と殆ど同じような質問なんですが
チェックボックスを押すとテキストバーを指定した文字列に書き換えるようなのを作っています。
んでどうやってもエラーでるんですが、対処方か何か教えてもらえると幸いです
511 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 18:23:52.94 ID:0/wFesHS0: 分かりにくくてごめん
とりあえず455風に言うと

CheckBox1.CheckedをTrueにするとEdit1のText値が「ＶＩＰＰＥＲ」になる・・・みたいな？
512 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 18:38:17.02 ID:OfbwVL9j0: >>511
そのエラーの文を張ってみるとわかりやすいかも

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
　if ( CheckBox1.Checked = True ) then
　begin
　　Edit1.Text := '「これはVIPPERですか？」「いいえトムです」';
　end;
end;

こんなんでいいのかな
513 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 18:52:05.62 ID:u08rb/3u0: >>340
ソート。省略。

>>342
個人情報の取り扱いには注意しよう。省略。

>>343
ttp://vipdelphi.run.buttobi.net/cgi-bin/src/vipdelphi0040.zip
514 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 18:52:21.01 ID:0/wFesHS0: >>512
ﾃﾞｷﾀ━━━(ﾟ∀ﾟ)━━━ !!!!!
515 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 19:15:48.29 ID:OfbwVL9j0: ん？
何か物音がしたぞ
ちょっと見てくる
516 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 19:22:54.97 ID:u08rb/3u0: >>513
>>343 は多重括弧を失念してた。やり直す
517 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 19:26:44.86 ID:zHZkZ1yN0: >>515
あ、俺んちから逃げた熊だと思う。
２日なにも食わせてないから気をつけてね！
518 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 19:32:17.44 ID:16tK+PeR0: >>517

procedure TForm1.FightClick(Sender: TObject);
begin
showmessage('>>515は食われてしまった。');
end;

procedure TForm1.EscapeClick(Sender: TObject);
begin
showmessage('>>515は逃げ出した');
end;

こうですか？わかりません＞＜
519 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 20:03:21.81 ID:vVc5QjSk0: 保守
520 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 20:04:08.44 ID:Oxzq3CqoO: なんかにたような質問がおおいね

簡単な課題でも

チェックボックスを五つ設置し、
ボタンをクリックすると
エディットに、チェックされているチェックボックスの数を表示する
処理をつくりましょう
521 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 20:18:55.34 ID:OfbwVL9j0: あらかじめEdit1とButton1、CheckBox1 ～ 5を配置

procedure TForm1.Button1Click(Sender: TObject);
var
　i, Count: Integer;
begin

　Count := 0;

　for i := 1 to 5 do
　begin

　　if ( (FindComponent('CheckBox'+IntToStr(i)) as TCheckBox).Checked = True ) then
　　begin
　　　Count := Count + 1;
　　end;
　end;

　Edit1.Text := '「これはトムですか？」「いいえ' +
　　　IntToStr(Count) +
　　　 '個のチェックボックスが選択されています」';

end;

>>520
こうですか＞＜
522 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 20:50:14.45 ID:u08rb/3u0: ダメだ
寝る
523 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 21:07:26.15 ID:gqbXms8w0: >>520
できたぜｗｗｗｗｗ

procedure TForm1.Button1Click(Sender: TObject);
var
    num:    Integer;
begin
    num:=0;

    if CheckBox1.Checked then
        Inc(num);
    if CheckBox2.Checked then
        Inc(num);
    if CheckBox3.Checked then
        Inc(num);
    if CheckBox4.Checked then
        Inc(num);
    if CheckBox5.Checked then
        Inc(num);

    Edit1.Text:=IntToStr(num);
end;
524 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 21:21:47.63 ID:OfbwVL9j0: NullPo
525 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 21:41:21.73 ID:OfbwVL9j0: ぼす
526 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 21:43:04.35 ID:gqbXms8w0: >>339
再帰はムズイから後でやる

function Count(number:    Integer; ary: array of Integer):    Integer;
var
i, gokei, kosu:    Integer;
begin
    kosu:=0;
    for i:=low(ary) to high(ary) do
        if (ary[i]=number) then
            Inc(kosu);

    result:=kosu;

end;

procedure TForm1.Button1Click(Sender: TObject);
var
    ary:    array[0..10] of Integer;
    i:    Integer;
begin
    for i:=0 to 10 do
    begin
        ary[i]:=i mod 3;
    end;

    Edit1.Text:=IntToStr( Count(1, ary));

end;
527 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 21:44:35.87 ID:9QLtlzuO0: >>521
FindComponentすげえｗｗｗｗｗｗｗ
528 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 21:55:34.70 ID:9QLtlzuO0: >>497
なんかめっちゃいっぱい入ったｗｗｗｗ
529 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 22:11:30.39 ID:6lPIpWoA0: ほげほげ
530 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 22:30:02.08 ID:anIi6uf60: >>528
インストール先にデモプログラムがあるので実行してみてください。
531 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 22:46:55.66 ID:JuA6pFbm0: 次スレからテンプレに>>338-345を入れたらどうだろう？
532 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 22:55:22.83 ID:anIi6uf60: >>531
Wikiに書くだけで十分じゃないか？
533 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 23:00:26.05 ID:JuA6pFbm0: >>532
あ、それでいいや。
でも「Wikiに練習問題あるよー」の１行程度はあったほうがいいと思うな。
534 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 23:02:36.97 ID:AiQuRpcl0: その際練習問題に難易度つけてもらうってのは難しいですかね？
大体でいいのですが・・・
535 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 23:04:00.75 ID:0/wFesHS0: ほす
536 名前：以下、名無しにかわりましてVIPがお送りします ：2006/02/11(土) 23:05:57.63 ID:anIi6uf60: ヒントが一応あるが>>343が一番難しいかな。

戻る全部最新50

DAT2HTML 0.32lpp Converted.