Delphiマンセー
1 ：デフォルトの名無しさん：
Delphiマンセー
|
|
|
2 ：デフォルトの名無しさん：02/08/12 11:55
3 ：デフォルトの名無しさん：02/08/12 11:56
「VBはバカ」論議で言い負かされたVB厨、必死です。
4 ：デフォルトの名無しさん：02/08/12 11:56
Del厨必死だな(w
5 ：デフォルトの名無しさん：02/08/12 11:58
でも、ホント Delphiは使い易い道具だね
コンパイルも早いし、インラインアセンブラ使って細かい所まで書ける
実際、In/Out使ってプリンタポートをパラレルポート代わりに叩くなんてとても簡単だしさ
コンパイルも早いし、インラインアセンブラ使って細かい所まで書ける
実際、In/Out使ってプリンタポートをパラレルポート代わりに叩くなんてとても簡単だしさ
6 ：デフォルトの名無しさん：02/08/12 11:59
7 ：デフォルトの名無しさん：02/08/12 11:59
>>5
改めてこんなスレで書かなくても良いんだよ。
改めてこんなスレで書かなくても良いんだよ。
8 ：デフォルトの名無しさん：02/08/12 12:00
>>5
バージョン7までの命だけどね。
バージョン7までの命だけどね。
9 ：デフォルトの名無しさん：02/08/12 12:01
>>8
ソースきぼん
ソースきぼん
11 ：デフォルトの名無しさん：02/08/12 12:01
Delphiマンセー
12 ：デフォルトの名無しさん：02/08/12 12:02
いままでたいしてじつむでつかわれてないでしゅみのつーるで
もうやくめをおわろうとしているけど
Delphiマンセー
もうやくめをおわろうとしているけど
Delphiマンセー
13 ：デフォルトの名無しさん：02/08/12 12:03
Delphi夢をありがとう
Delphiマンセー
Delphiマンセー
14 ：デフォルトの名無しさん：02/08/12 12:04
なあんだどちらも偽装厨か。
15 ：デフォルトの名無しさん：02/08/12 12:04
史上最強の趣味専用開発ツール！
>>8
はやくソースきぼん
はやくソースきぼん
17 ：デフォルトの名無しさん：02/08/12 12:05
VB厨を追い越したぞ。
Delphiマンセー
Delphiマンセー
18 ：デフォルトの名無しさん：02/08/12 12:05
>>15
仕事で使ってるんだけど……
仕事で使ってるんだけど……
19 ：デフォルトの名無しさん：02/08/12 12:06
お前等何の競争やってんだ・・・
20 ：デフォルトの名無しさん：02/08/12 12:06
VBは負けない！
クラスはちょっとスタイル古いかなと思うし インターフェース型もCOM専用みたいに感じるけど
でも、バランスがいいよね。
特に動的配列はGOOD これがあれば TList要らなかったんじゃない？ と思うほど便利
でも、バランスがいいよね。
特に動的配列はGOOD これがあれば TList要らなかったんじゃない？ と思うほど便利
22 ：デフォルトの名無しさん：02/08/12 12:07
VBには負けない！
23 ：デフォルトの名無しさん：02/08/12 12:07
クラスはちょっとスタイル古いかなと思うし インターフェース型もCOM専用みたいに感じるけど
Delphiマンセー
Delphiマンセー
24 ：デフォルトの名無しさん：02/08/12 12:08
VBは負けない！
25 ：デフォルトの名無しさん：02/08/12 12:08
Delマガジンはあるけど、VBマガジンはない。
よってDelの勝利！
よってDelの勝利！
26 ：デフォルトの名無しさん：02/08/12 12:09
あほらし
27 ：デフォルトの名無しさん：02/08/12 12:09
誰だよ、俺の書き込み真似してんの！！
28 ：デフォルトの名無しさん：02/08/12 12:09
そろそろ強烈なコピペきぼんぬ
29 ：デフォルトの名無しさん：02/08/12 12:09
VBをライバル視する時点で終わってる気がする。
どうせならVCやC#と競い合わんと伸びないと思うが？
どうせならVCやC#と競い合わんと伸びないと思うが？
30 ：デフォルトの名無しさん：02/08/12 12:11
あきたから昼飯行ってくるわ。
32 ：デフォルトの名無しさん：02/08/12 12:13
>>31
あるよ
あるよ
33 ：デフォルトの名無しさん：02/08/12 12:14
あきたからちょっくら独Hするわ
34 ：デフォルトの名無しさん：02/08/12 12:14
Delマガ、立ち読みしたけど1000円は高いなと思った
35 ：デフォルトの名無しさん：02/08/12 12:14
終わったものの悲しみが満ち溢れてますね：）
36 ：デフォルトの名無しさん：02/08/12 12:14
同じ奴が上げてたのか・・・
>>32 ビジュアルなコンポーネントのソースも？ じゃもう一度調べてみようかな
38 ：デフォルトの名無しさん：02/08/12 12:15
>>34
あんなに薄っぺらでは確かに高い。
あんなに薄っぺらでは確かに高い。
39 ：デフォルトの名無しさん：02/08/12 12:16
40 ：デフォルトの名無しさん：02/08/12 12:17
Delマガの唯一の価値は抜ける表紙だった。
それも今はないから価値はゼロ！
それも今はないから価値はゼロ！
41 ：デフォルトの名無しさん：02/08/12 12:27
Delphiの資産はCOBOLのそれと比べると品質があまりに
低いので直ぐに切り捨てられて終わりです。>>shoeisha
低いので直ぐに切り捨てられて終わりです。>>shoeisha
マンセー スレなんだからマンセーしようよ
43 ：デフォルトの名無しさん：02/08/12 12:36
Delphiマンセー
ﾌﾟ
ﾌﾟ
そうそう２チャンネル発のコンポーネントも 楽しいのがあるんだよ
たとえばギコBASIC
http://www.geocities.co.jp/SiliconValley-Oakland/8522/data/ugikoscr.txt
C/C++もあるけど機能はピカ１さ
これは矢印や直線も描ける、しかも設計時にCADみたいにイメージを動かせるコンポ
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1004530597&rm=100
ソース読むと結構勉強になるし、楽しいよ
たとえばギコBASIC
http://www.geocities.co.jp/SiliconValley-Oakland/8522/data/ugikoscr.txt
C/C++もあるけど機能はピカ１さ
これは矢印や直線も描ける、しかも設計時にCADみたいにイメージを動かせるコンポ
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1004530597&rm=100
ソース読むと結構勉強になるし、楽しいよ
45 ：デフォルトの名無しさん：02/08/12 12:45
既存のスレでやれよ。
46 ：名無しさん＠Ｅｍａｃｓ：02/08/12 13:32
Delphiマンせー
47 ：デフォルトの名無しさん：02/08/12 14:07
何かあったのか？
48 ：デフォルトの名無しさん：02/08/12 14:21
>>47
『VBばかリやってると馬鹿になる』ってスレがあって ヒートアップした結果
VB厨が切れて暴れ 片端からDelphiスレに Delphiマンセーと書いてあげ
あげくにこのスレともう一つ作りましたです。
『VBばかリやってると馬鹿になる』ってスレがあって ヒートアップした結果
VB厨が切れて暴れ 片端からDelphiスレに Delphiマンセーと書いてあげ
あげくにこのスレともう一つ作りましたです。
49 ：デフォルトの名無しさん：02/08/12 14:28
>>47
昼くらいまでマンセースレの上げ合戦がありました。
昼くらいまでマンセースレの上げ合戦がありました。
50 ：デフォルトの名無しさん：02/08/12 17:08
>>48
Del厨なに言い訳してますか？
Del厨なに言い訳してますか？
function FourNum(s:string):double ;
var num:double;
var sym:char;
procedure addsub;forward;
procedure next;
var i,j:integer;
const sep='^+-/*()<>';
begin
if s='' then begin sym:=#0;exit;end;
for j:=1 to length(sep) do
if s[1]=sep[j] then begin sym:=s[1]; delete(s,1,1);s:=trim(s); exit;end ;
sym:=#1;
for i:=2 to length(s) do
for j:=1 to length(sep) do
if s[i]=sep[j] then begin
num:=StrToFloat(copy(s,1,i-1)); delete(s,1,i-1); exit;end;
num:=StrToFloat(s);s:='';
end;
procedure factor;
begin
if(sym = #1) then next
else if(sym = '(') then
begin next; addsub;
if(sym <> ')') then raise Exception.Create(' )がない');
next;
end
else raise Exception.Create('数があるべき');
end;
procedure muldiv;
var savenum:double; var oldsym:char;
begin
factor;
while (sym in ['*','/','^'] ) do begin
savenum:=num;oldsym:=sym; next;
factor;
case oldsym of
'*': num:=savenum*num;
'/': num:=savenum/num;
'^': num:=power(savenum,num);
end;
end;
end;
procedure addsub;
var savenum:double; var oldsym:char;
begin
case sym of
'+': begin next; muldiv; end;
'-': begin next; muldiv; num:=-num; end;
else muldiv;
end;
while (sym in [ '+','-'] ) do
begin savenum:=num;oldsym:=sym; next; muldiv;
case oldsym of
'+': num:=savenum+num;
'-': num:=savenum-num;
end;
end;
end;
begin next; addsub; Result:=num;
end;
var num:double;
var sym:char;
procedure addsub;forward;
procedure next;
var i,j:integer;
const sep='^+-/*()<>';
begin
if s='' then begin sym:=#0;exit;end;
for j:=1 to length(sep) do
if s[1]=sep[j] then begin sym:=s[1]; delete(s,1,1);s:=trim(s); exit;end ;
sym:=#1;
for i:=2 to length(s) do
for j:=1 to length(sep) do
if s[i]=sep[j] then begin
num:=StrToFloat(copy(s,1,i-1)); delete(s,1,i-1); exit;end;
num:=StrToFloat(s);s:='';
end;
procedure factor;
begin
if(sym = #1) then next
else if(sym = '(') then
begin next; addsub;
if(sym <> ')') then raise Exception.Create(' )がない');
next;
end
else raise Exception.Create('数があるべき');
end;
procedure muldiv;
var savenum:double; var oldsym:char;
begin
factor;
while (sym in ['*','/','^'] ) do begin
savenum:=num;oldsym:=sym; next;
factor;
case oldsym of
'*': num:=savenum*num;
'/': num:=savenum/num;
'^': num:=power(savenum,num);
end;
end;
end;
procedure addsub;
var savenum:double; var oldsym:char;
begin
case sym of
'+': begin next; muldiv; end;
'-': begin next; muldiv; num:=-num; end;
else muldiv;
end;
while (sym in [ '+','-'] ) do
begin savenum:=num;oldsym:=sym; next; muldiv;
case oldsym of
'+': num:=savenum+num;
'-': num:=savenum-num;
end;
end;
end;
begin next; addsub; Result:=num;
end;
52 ：デフォルトの名無しさん：02/08/13 14:20
【内容】指定した obj の publishedメソッドを 名前で呼び出せす
function CallNotify(obj,caller:TObject;name:string):boolean;
var func:TNotifyEvent;
var method:TMethod absolute func;
begin
method.Code:= obj.MethodAddress(name);
Result:=method.Code<>nil;
if Result then
begin
method.Data:=obj;
func(caller);
end ;
end;
【使い方】
TForm1 = class(TForm)
略
published
procedure Func(Sender: TObject);
end;
var Form1:TForm1;
とある場合に
CallNotify( Form1 , nil , 'Func'); として 呼び出す
function CallNotify(obj,caller:TObject;name:string):boolean;
var func:TNotifyEvent;
var method:TMethod absolute func;
begin
method.Code:= obj.MethodAddress(name);
Result:=method.Code<>nil;
if Result then
begin
method.Data:=obj;
func(caller);
end ;
end;
【使い方】
TForm1 = class(TForm)
略
published
procedure Func(Sender: TObject);
end;
var Form1:TForm1;
とある場合に
CallNotify( Form1 , nil , 'Func'); として 呼び出す
53 ：デフォルトの名無しさん：02/08/13 14:48
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
54 ：デフォルトの名無しさん：02/08/13 14:52
16進表記の文字列に変換したときに何桁になるか
function HexLength(a:Cardinal):Integer;
begin
a := a or 1;
a := a or (a shr 16);
a := a or (a shr 8);
a := a or (a shr 4);
a := a or (a shr 2);
a := (a or (a shr 1)) and $11111111;
a := a+(a shr 16);
a := a+(a shr 8);
a := a+(a shr 4);
Result:=( a and $f);
end;
function HexLength(a:Cardinal):Integer;
begin
a := a or 1;
a := a or (a shr 16);
a := a or (a shr 8);
a := a or (a shr 4);
a := a or (a shr 2);
a := (a or (a shr 1)) and $11111111;
a := a+(a shr 16);
a := a+(a shr 8);
a := a+(a shr 4);
Result:=( a and $f);
end;
55 ：デフォルトの名無しさん：02/08/13 23:47
56 ：デフォルトの名無しさん：02/08/14 06:45
57 ：デフォルトの名無しさん：02/08/14 07:23
たとえば、時間のかかる手続きを書いて、その進行状況を表示させたい時
その手続きから フォームにメッセージを送りたいのだけど、それを直接
埋め込んでしまうとその手続きの再利用性が落ちてしまうでしょ？
その手続きから フォームにメッセージを送りたいのだけど、それを直接
埋め込んでしまうとその手続きの再利用性が落ちてしまうでしょ？
58 ：デフォルトの名無しさん：02/08/14 09:05
>>56
>>57
回答ありがとう、手続き名を変数にできるってことですね。
なるほど。でも、たんにメソッド型（上の例では TNotifyEvent）の
フィールドがひとつあればいいんでは。実装時には未定でも
実行時に動的に変更でききさえすれば同じでは？
>>57
回答ありがとう、手続き名を変数にできるってことですね。
なるほど。でも、たんにメソッド型（上の例では TNotifyEvent）の
フィールドがひとつあればいいんでは。実装時には未定でも
実行時に動的に変更でききさえすれば同じでは？
59 ：デフォルトの名無しさん：02/08/14 09:24
>>58
たしかに、実行時に動的にやる方法としては他に 手続きに引数としてメソッドポインタを
渡すとかメソッドポインタのフィールド型を渡す手法もあるし、実際そうする方が効率がいいと思うよ
でも、結構それってメンドクサイじゃない。 普段は別に進行状況表示したくないのに、
使う時にこれはnilを入れてとか思い出さないといけないし
あと、スクリプトって程じゃないようなスクリプト中で 特定の処理を実行させたいとき
例えば 'Func'って文字のメソッドを呼び出したいなんて時に、この方式で呼び出せば
手間いらなくていいと思うけど
ボタンを押した時の処理とかは大抵 フォームのpublishedになってるから
簡単なマクロを作ろうと思った時とかは便利だよ
たしかに、実行時に動的にやる方法としては他に 手続きに引数としてメソッドポインタを
渡すとかメソッドポインタのフィールド型を渡す手法もあるし、実際そうする方が効率がいいと思うよ
でも、結構それってメンドクサイじゃない。 普段は別に進行状況表示したくないのに、
使う時にこれはnilを入れてとか思い出さないといけないし
あと、スクリプトって程じゃないようなスクリプト中で 特定の処理を実行させたいとき
例えば 'Func'って文字のメソッドを呼び出したいなんて時に、この方式で呼び出せば
手間いらなくていいと思うけど
ボタンを押した時の処理とかは大抵 フォームのpublishedになってるから
簡単なマクロを作ろうと思った時とかは便利だよ
60 ：デフォルトの名無しさん：02/08/14 17:18
61 ：デフォルトの名無しさん：02/08/15 09:21
厨房除のおまじないコピペ
// a*b/2^32
function Int32x32SHR32(X, Y: Integer): Integer; register;
asm
IMUL Y
MOV EAX,EDX
end;
// sum += X*Y
procedure Int32x32Sum(X, Y: Integer;var sum:int64);
asm
IMUL Y
add eax,sum[0]
adc edx,sum[4]
add sum[0],eax
adc sum[4],edx
end;
// a*b/2^32
function Int32x32SHR32(X, Y: Integer): Integer; register;
asm
IMUL Y
MOV EAX,EDX
end;
// sum += X*Y
procedure Int32x32Sum(X, Y: Integer;var sum:int64);
asm
IMUL Y
add eax,sum[0]
adc edx,sum[4]
add sum[0],eax
adc sum[4],edx
end;
62 ：デフォルトの名無しさん：02/08/15 19:29
DirectXのヘッダを探してるなら ココ
http://www.crazyentertainment.net/
http://www.crazyentertainment.net/
63 ：デフォルトの名無しさん：02/08/15 20:13
>厨房除のおまじないコピペ
君自身が厨だったりして
君自身が厨だったりして
64 ：デフォルトの名無しさん：02/08/17 12:21
VC++マンコー
65 ：デフォルトの名無しさん：02/08/18 05:25
> 『VBばかリやってると馬鹿になる』ってスレがあって
前提が間違っています。本当は
『馬鹿だからVBばかりやる』
が正すいのだぁ
前提が間違っています。本当は
『馬鹿だからVBばかりやる』
が正すいのだぁ
66 ：デフォルトの名無しさん：02/08/29 14:10
ああホント、Delphiで夏休みも楽しかったです。
67 ：デフォルトの名無しさん：02/08/29 14:50
Delphi…（･∀･）ｲｲ!!
68 ：デフォルトの名無しさん：02/08/29 15:02
とにかく凄い効き目です。
初めて１週間でホントに引き締まりました。
これが自分のコードかと驚く程です。
恥ずかしい話だけど排泄物も驚く大きさです。
でも、これが効果の元なのでしょう。
これからもリバウンドを抑える為に週に一度は欠かさないつもりです
教えて下さった皆さんにホントにお礼を言いたい。ありがとう！
初めて１週間でホントに引き締まりました。
これが自分のコードかと驚く程です。
恥ずかしい話だけど排泄物も驚く大きさです。
でも、これが効果の元なのでしょう。
これからもリバウンドを抑える為に週に一度は欠かさないつもりです
教えて下さった皆さんにホントにお礼を言いたい。ありがとう！
69 ：デフォルトの名無しさん：02/08/29 15:11
アーキテクト評価版のDLが始まりますた。どなたかレポートおながいします。
http://www.borland.com/products/downloads/download_delphi.html
http://www.borland.com/products/downloads/download_delphi.html
70 ：デフォルトの名無しさん：02/08/29 17:38
日本語のEnterprise版は英語のArchitect版と同等だったんだね
71 ：デフォルトの名無しさん：02/08/29 18:17
そなの？もっと詳しくおながいします。
72 ：デフォルトの名無しさん：02/08/29 21:12
>>71
↓メリケン
ttp://www.borland.com/delphi/pdf/del7_datasheet.pdf
↓ニポーン
ttp://www.borland.co.jp/delphi/del7/feamatrix/
MDAやUMLは
メリケンのArcにはあってメリケンのEntにはないけど
ニポーンのEntにはあるよん
↓メリケン
ttp://www.borland.com/delphi/pdf/del7_datasheet.pdf
↓ニポーン
ttp://www.borland.co.jp/delphi/del7/feamatrix/
MDAやUMLは
メリケンのArcにはあってメリケンのEntにはないけど
ニポーンのEntにはあるよん
73 ：デフォルトの名無しさん：02/08/30 19:00
買うわけじゃないけど日本のユーザーはちょっと得してますね。
為替レートからみても少し日本のが安い。
為替レートからみても少し日本のが安い。
74 ：デフォルトの名無しさん：02/08/31 02:05
9 ：通りすがりのマルチ ◆CHii/cVw ：02/08/30 02:32 ID:o6nfHHaL
>>2
あんまり言いたくないが、人の二番煎じのネタでゲッターやって楽しいか？
舞みたいにオリジナリティ出したら。
http://news2.2ch.net/test/read.cgi/newsplus/1030642180/
>>2
あんまり言いたくないが、人の二番煎じのネタでゲッターやって楽しいか？
舞みたいにオリジナリティ出したら。
http://news2.2ch.net/test/read.cgi/newsplus/1030642180/
75 ：デフォルトの名無しさん：02/09/01 17:31
ｷﾓ..
76 ：デフォルトの名無しさん：02/09/08 21:19
> あんまり言いたくないが、人の二番煎じのネタでゲッターやって楽しいか？
あほらしい。二番煎じじゃなくてもゲッターなんかまともなやつのやる
ことじゃないだろ
あほらしい。二番煎じじゃなくてもゲッターなんかまともなやつのやる
ことじゃないだろ
77 ：デフォルトの名無しさん：02/09/20 09:28
このスレを TIPSスレとして再利用したいと思います。
TIPS 不要ファイルの削除
Delphiの binフォルダに
---- DelDel.bat ----
CD /D %1
del %2 *.tds
del %2 *.~*
del %2 *.dsk
del %2 *.dof
del %2 *.dsm
del %2 *.dcu
-----
とファイルを作っておきます。 SendToにｼｮｰﾄカットを作っておけば便利
また DelphiIDEのツールの設定で 登録しておくのも手です
TIPS 不要ファイルの削除
Delphiの binフォルダに
---- DelDel.bat ----
CD /D %1
del %2 *.tds
del %2 *.~*
del %2 *.dsk
del %2 *.dof
del %2 *.dsm
del %2 *.dcu
-----
とファイルを作っておきます。 SendToにｼｮｰﾄカットを作っておけば便利
また DelphiIDEのツールの設定で 登録しておくのも手です
78 ：デフォルトの名無しさん：02/09/24 00:09
Delphiマンセー
79 ：デフォルトの名無しさん：02/09/24 00:17
おまい、でるでる言いたいだけちゃうんかと
80 ：デフォルトの名無しさん：02/09/24 07:50
昔から疑問に思っていたんだけど「マンセー」ってどういう意味？
81 ：デフォルトの名無しさん：02/09/24 09:41
>>77
dcuって、うざいからオプションで別のディレクトリに放り込んでおけよ。
dcuって、うざいからオプションで別のディレクトリに放り込んでおけよ。
82 ：デフォルトの名無しさん：02/09/25 23:16
万歳
83 ：デフォルトの名無しさん：02/09/28 13:31
外の比較的マイナーな文学作品を翻訳出版する
小さな出版社がある。そして文学ファンはこういった出版社を
潰さないため、今後も翻訳を続けてもらうために
１人で同じ本を２・３冊買うことが良くある｡
我々もこういう時だからこそDelphi7を買って
ボーランドを支えるべきなんじゃないだろうか。
Delphi7の売り上げはDelphi8以降の開発資金となるし、
ボーランドジャパンの今後に大きな影響をもたらすだろう。
Delphi7の出来のみを云々するのは
あまりにも近視眼的ではないだろうか？
小さな出版社がある。そして文学ファンはこういった出版社を
潰さないため、今後も翻訳を続けてもらうために
１人で同じ本を２・３冊買うことが良くある｡
我々もこういう時だからこそDelphi7を買って
ボーランドを支えるべきなんじゃないだろうか。
Delphi7の売り上げはDelphi8以降の開発資金となるし、
ボーランドジャパンの今後に大きな影響をもたらすだろう。
Delphi7の出来のみを云々するのは
あまりにも近視眼的ではないだろうか？
84 ：デフォルトの名無しさん：02/09/28 13:39
なぜ 83 はこんなスレをつけるのか.
その謎は以下のスレに..
http://pc3.2ch.net/test/read.cgi/tech/1031668744/536-538
ここにかかれている内容を信じるかどうかはあなた次第。
Delphi7 を注文してしまった人は、すぐに答えが出るでしょう。
その謎は以下のスレに..
http://pc3.2ch.net/test/read.cgi/tech/1031668744/536-538
ここにかかれている内容を信じるかどうかはあなた次第。
Delphi7 を注文してしまった人は、すぐに答えが出るでしょう。
85 ：デフォルトの名無しさん：02/09/28 13:46
Delphi7.NETはプレビュー版だもんね。
.NETは開発は終わったがユーザの要求を見るって言ってたもんね。
.NET1.0は無視した方が良さそうだし。
☆★☆★☆ アンチに朗報！ ☆★☆★☆
VS.NET 7.0と.NET 1.1は連携できません！
.NET 1.1を導入すると、VS.NET 2003を買わされる羽目になります！
.NETは開発は終わったがユーザの要求を見るって言ってたもんね。
.NET1.0は無視した方が良さそうだし。
☆★☆★☆ アンチに朗報！ ☆★☆★☆
VS.NET 7.0と.NET 1.1は連携できません！
.NET 1.1を導入すると、VS.NET 2003を買わされる羽目になります！
86 ：デフォルトの名無しさん：02/09/28 13:52
Del phi ha utareru ttu-kotode
87 ：デフォルトの名無しさん：02/10/01 10:49
D7 Helpの日本語化が不足してる方の為のTIPS
1) ...Delphi7\Help に 以下のファイルをコピー
CompanionToolsDisk3 のborland\apijp\*.*
// borland\del6help\pro\ の (Indy.* と del6vcl.*)
以後もこの...Delphi7\Help\ディレクトリで作業します
2)d7.ohiを変更します(コピーして保存しておきましょう)
先頭に
;OLD HELP
:Index D6VCL Reference=del6vcl.hlp
:Index D6Indy=indy.hlp
:Index APIJapan=API32WH.HLP
と４行追加するだけです。
Win95/98/Meの人はこれだとヘルプ制限にかかりますから
他の不要な ヘルプをコメントアウトして下さい。
3)d7.ohcを変更します(同じく保存しておきましょう)
先頭に
:Include indy.toc
:Include del6vcl.toc
:Include api32wh.toc
と入れます
4)d7.GIDを削除します(後で自動的に作られます)
5)d7.hlpをダブルクリックかDelphi7を走らせてヘルプを見ましょう
1) ...Delphi7\Help に 以下のファイルをコピー
CompanionToolsDisk3 のborland\apijp\*.*
// borland\del6help\pro\ の (Indy.* と del6vcl.*)
以後もこの...Delphi7\Help\ディレクトリで作業します
2)d7.ohiを変更します(コピーして保存しておきましょう)
先頭に
;OLD HELP
:Index D6VCL Reference=del6vcl.hlp
:Index D6Indy=indy.hlp
:Index APIJapan=API32WH.HLP
と４行追加するだけです。
Win95/98/Meの人はこれだとヘルプ制限にかかりますから
他の不要な ヘルプをコメントアウトして下さい。
3)d7.ohcを変更します(同じく保存しておきましょう)
先頭に
:Include indy.toc
:Include del6vcl.toc
:Include api32wh.toc
と入れます
4)d7.GIDを削除します(後で自動的に作られます)
5)d7.hlpをダブルクリックかDelphi7を走らせてヘルプを見ましょう
88 ：デフォルトの名無しさん：02/10/01 12:21
だれも見てねぇよ。こんなところ。
こんな tipx 、作って悲しくないか？某社員さんよ。
やること、他にあるだろう？
こんな tipx 、作って悲しくないか？某社員さんよ。
やること、他にあるだろう？
89 ：デフォルトの名無しさん：02/10/01 12:28
tipx?
90 ：名無し王：02/10/01 13:27
Idhttp.Post()
の記述を使って、ファイルをサーバーに送りたいんだけど、どうしるの？
の記述を使って、ファイルをサーバーに送りたいんだけど、どうしるの？
91 ：デフォルトの名無しさん：02/10/01 15:21
92 ：デフォルトの名無しさん：02/10/04 04:48
Delphiマンセー
93 ：デフォルトの名無しさん：02/10/09 22:13
でるぽいまんせー
94 ：デフォルトの名無しさん：02/10/09 23:06
まんせーすれにあえて
Delphi7のバグはたくさんありそうですか？
Delphi6から乗り換える価値は有りますか？
Delphi7のバグはたくさんありそうですか？
Delphi6から乗り換える価値は有りますか？
95 ：デフォルトの名無しさん：02/10/09 23:55
マンセー
96 ：デフォルトの名無しさん：02/10/10 11:49
>>94
D5->D7組だから参考にならないかもしれないけど
必要なかったら乗換えなくていいのでは？
ただ、Webアプリの仕事もする可能性があるならいいかも
.IntraWebはなんか便利
Webアプリの仕事はやった事ないけどこれならポトペタだけで簡単に出来そう
D5->D7組だから参考にならないかもしれないけど
必要なかったら乗換えなくていいのでは？
ただ、Webアプリの仕事もする可能性があるならいいかも
.IntraWebはなんか便利
Webアプリの仕事はやった事ないけどこれならポトペタだけで簡単に出来そう
97 ：デフォルトの名無しさん：02/10/10 12:21
>>1
そうですね
そうですね
98 ：デフォルトの名無しさん：02/10/10 12:31
IntraWeb これの製品版欲しいけど $499だしなあ
せめて 127.0.0.1 の制限だけ外す制限解除パスを1パス$10とかさあ
それとこのマニュアルは日本語化しないかなあ
せめて 127.0.0.1 の制限だけ外す制限解除パスを1パス$10とかさあ
それとこのマニュアルは日本語化しないかなあ
99 ：デフォルトの名無しさん：02/10/10 12:39
IntraWeb マニュアル翻訳プロジェクトでもやるか？
100 ：Delフサギコ ◆A6VzDeLphI ：02/10/10 13:12
∧,,∧ ／IntraWebって
ミ,,ﾟДﾟ彡 ＜ やっぱ使うのに、英語ひつようなの？
U U ＼
IntraWeb日本語化コミコミで
Enﾌﾟﾗ版同様の機能なら7・8ﾏｿでも
欲しい所だったんだけどなー。
D6Pro→D7Proは2.5ﾏｿだけど
D6Pro→D7Entで27ﾏｿはいくらなんでも、
費用対効果が感じなさ杉ﾀﾝ...
ミ,,ﾟДﾟ彡 ＜ やっぱ使うのに、英語ひつようなの？
U U ＼
IntraWeb日本語化コミコミで
Enﾌﾟﾗ版同様の機能なら7・8ﾏｿでも
欲しい所だったんだけどなー。
D6Pro→D7Proは2.5ﾏｿだけど
D6Pro→D7Entで27ﾏｿはいくらなんでも、
費用対効果が感じなさ杉ﾀﾝ...
101 ：デフォルトの名無しさん：02/10/10 13:18
>>100
いや>>98の願望は、出来れば最高なのにという事で
そんなに英語は必要ない。
使い方なんて 新規作成その他でIntraWebのスタンドアロンを選んで
そこの IWの付いてるコンポをポトペタするだけ。
後は実行すりゃ ほんとに鯖の設定も何もなし、スタンドアロンでデバック出来る。
たとえば 画面に円を描きたいなら IWImage と IWButton貼り付けて
procedure TformMain.IWButton1Click(Sender: TObject);
var v:TBitmap;
begin
v:=TBitmap.Create;
with IWImage1 do begin
v.Width :=Width ;
v.Height:=Height;
v.Canvas.Ellipse(10,10,90,90);
Picture.Bitmap:=v;
end;
v.free;
end;
とやればいい。ほんとに、ネイテブアプリと同じだろ？
いや>>98の願望は、出来れば最高なのにという事で
そんなに英語は必要ない。
使い方なんて 新規作成その他でIntraWebのスタンドアロンを選んで
そこの IWの付いてるコンポをポトペタするだけ。
後は実行すりゃ ほんとに鯖の設定も何もなし、スタンドアロンでデバック出来る。
たとえば 画面に円を描きたいなら IWImage と IWButton貼り付けて
procedure TformMain.IWButton1Click(Sender: TObject);
var v:TBitmap;
begin
v:=TBitmap.Create;
with IWImage1 do begin
v.Width :=Width ;
v.Height:=Height;
v.Canvas.Ellipse(10,10,90,90);
Picture.Bitmap:=v;
end;
v.free;
end;
とやればいい。ほんとに、ネイテブアプリと同じだろ？
102 ：Delフサギコ ◆A6VzDeLphI ：02/10/10 13:41
＿＿＿＿＿＿＿＿＿＿＿＿＿
∧,,∧∩ ／激しくIntraWebの
ミ*ﾟДﾟ*ﾐ ＜ 紹介きぼんです！
(ﾐ ミ ＼＿＿(いつもどおりAcidFloorに気体)
～ﾐ ,,, ﾐ
し' `Ｊ 100ｹﾞﾄ ｷｶﾞﾂｶﾝｶﾀ
>>101さん
まぢですか！、
C#でも、画像は動的生成して、ファイルに保存しる
必要があったはずです。
なんか本にはそう書いていたですが。
ああ、これでPro版でLAN内運用可ならよかったのに
,,惜しまれる
∧,,∧∩ ／激しくIntraWebの
ミ*ﾟДﾟ*ﾐ ＜ 紹介きぼんです！
(ﾐ ミ ＼＿＿(いつもどおりAcidFloorに気体)
～ﾐ ,,, ﾐ
し' `Ｊ 100ｹﾞﾄ ｷｶﾞﾂｶﾝｶﾀ
>>101さん
まぢですか！、
C#でも、画像は動的生成して、ファイルに保存しる
必要があったはずです。
なんか本にはそう書いていたですが。
ああ、これでPro版でLAN内運用可ならよかったのに
,,惜しまれる
103 ：デフォルトの名無しさん：02/10/10 14:37
>>102
いや 請負っての仕事でWebアプリはやってないので、その手の仕事で使えるかどうかは判りません。
社内で使うDB周りのフロントエンドには十分かと感じています
このコードで画像はたぶん動的作成されています。
Exe/DLLのディレクトリに Cache フォルダが作られて
そこにJPEGxxというファイルがボタンを押す都度作られてますから。
Pro版でもIISと組み合わせればLAN内運用可能のようです
実験的にWin2000ProでパーソナルIISをたて
スタンドアロンでデバックした後、同じフォームを流用して ISAPIアプリケーションとし
作成したDLLを C:\Inetpub\Scripts にコピー
URL を http://localhost/Scripts/IWHogeHoge.dll
とすれば同じ動作をしました。
・・・・といってもサーバなんて触った事ないんで、結構時間はかかったんですが・・・
いや 請負っての仕事でWebアプリはやってないので、その手の仕事で使えるかどうかは判りません。
社内で使うDB周りのフロントエンドには十分かと感じています
このコードで画像はたぶん動的作成されています。
Exe/DLLのディレクトリに Cache フォルダが作られて
そこにJPEGxxというファイルがボタンを押す都度作られてますから。
Pro版でもIISと組み合わせればLAN内運用可能のようです
実験的にWin2000ProでパーソナルIISをたて
スタンドアロンでデバックした後、同じフォームを流用して ISAPIアプリケーションとし
作成したDLLを C:\Inetpub\Scripts にコピー
URL を http://localhost/Scripts/IWHogeHoge.dll
とすれば同じ動作をしました。
・・・・といってもサーバなんて触った事ないんで、結構時間はかかったんですが・・・
104 ：デフォルトの名無しさん：02/10/10 14:55
http://www.atozedsoftware.com/intraweb/Borland/Delphi7QNA.html
今月中なら $299で VerUp可能だそうだ
今月中なら $299で VerUp可能だそうだ
105 ：Delフサギコ ◆A6VzDeLphI ：02/10/10 19:05
∫,,,,,,,,,∧,,∧ その辺り、
⊂,,,,,,,,,つ,,ﾟДﾟﾐつ 夏休みから、土曜日全つぶしでやってたので
わかったのですが
>作成したDLLを C:\Inetpub\Scripts にコピー
はしなくても
管理ツールのIISの
IIS
└自マシン
└既定のWebサイト<<
ここで、右クリックしてカソウディレクトリで
Projectのフォルダを設定すれば
動くと思います…
が、しかーしーそれ以上に
DLLコピーだけで動くというのが驚き桃のキ....
>>今年中
それは日本版も、、、なのでしょうか？
某日がVerUp窓口になってくれないかしら。
これとかみると、Webｱﾌﾟﾘのために、
.NET使わなくてもいい気がしてきました。
http://www.atozedsoftware.com/intraweb/tutorials/index.html
⊂,,,,,,,,,つ,,ﾟДﾟﾐつ 夏休みから、土曜日全つぶしでやってたので
わかったのですが
>作成したDLLを C:\Inetpub\Scripts にコピー
はしなくても
管理ツールのIISの
IIS
└自マシン
└既定のWebサイト<<
ここで、右クリックしてカソウディレクトリで
Projectのフォルダを設定すれば
動くと思います…
が、しかーしーそれ以上に
DLLコピーだけで動くというのが驚き桃のキ....
>>今年中
それは日本版も、、、なのでしょうか？
某日がVerUp窓口になってくれないかしら。
これとかみると、Webｱﾌﾟﾘのために、
.NET使わなくてもいい気がしてきました。
http://www.atozedsoftware.com/intraweb/tutorials/index.html
106 ：デフォルトの名無しさん：02/10/11 00:05
IntraWebで作成したページはIE以外でも表示できるのですか？
Cookieもコンポーネント貼り付けとかで使えるのですか？
Cookieもコンポーネント貼り付けとかで使えるのですか？
107 ：デフォルトの名無しさん：02/10/11 07:38
>>106
http://www.atozedsoftware.com/iwintro.html
IntraWeb supports
Internet Explorer, Netscape 4, and Netscape 6.
Cookieについては
SessionTrackingMethod で tmURL と tmCookie が選べるようです
http://www.atozedsoftware.com/iwintro.html
IntraWeb supports
Internet Explorer, Netscape 4, and Netscape 6.
Cookieについては
SessionTrackingMethod で tmURL と tmCookie が選べるようです
108 ：デフォルトの名無しさん：02/10/11 09:44
ランタイムが JavaScript だから...
とんでもなく古い IE/Netscape だと動かないかもしれない。
とんでもなく古い IE/Netscape だと動かないかもしれない。
ScreenShotがIEばかりなんでIEしか使えないのかとおもってました
処理はサーバーで処理して
frmをhtmlで出力してくれるようなものですかね？
処理はサーバーで処理して
frmをhtmlで出力してくれるようなものですかね？
110 ：デフォルトの名無しさん：02/10/13 21:36
自宅のパソコンでルータのポートマッピングでポート80だけを公開して
ロキシ越しに IntraWebの動作確認をしようとしたら・・・・ログに
GET /Scripts/FeaturesDLL.dll 200 に続いて
GET /scripts/root.exe 404
GET /MSADC/root.exe 404
GET /c/winnt/system32/cmd.exe 404
GET /d/winnt/system32/cmd.exe 404
GET /scripts/..%5c../winnt/system32/cmd.exe 500
油断もすきもないなあ
ロキシ越しに IntraWebの動作確認をしようとしたら・・・・ログに
GET /Scripts/FeaturesDLL.dll 200 に続いて
GET /scripts/root.exe 404
GET /MSADC/root.exe 404
GET /c/winnt/system32/cmd.exe 404
GET /d/winnt/system32/cmd.exe 404
GET /scripts/..%5c../winnt/system32/cmd.exe 500
油断もすきもないなあ
111 ：デフォルトの名無しさん：02/10/14 10:58
ﾏﾝｾｰ
112 ：デフォルトの名無しさん：02/10/15 01:10
Delphi英語版がUnicode対応で日本語処理が可能なら、日本語版は要らないんだけどねえ。。。
#それってAP版?
#それってAP版?
113 ：デフォルトの名無しさん：02/10/15 05:26
ん？Windowsのロケールに準拠するはずだから、日本語Windowsで使えば日本語処理も可能では？
(IDEやヘルプ、エラーメッセージ、リソース等が英語なのを除けば)
(IDEやヘルプ、エラーメッセージ、リソース等が英語なのを除けば)
114 ：デフォルトの名無しさん：02/10/18 02:35
>>113
マルチバイト系(UniCodeだけでﾖｼ)の処理をサポートしてるのかなあ？
マルチバイト系(UniCodeだけでﾖｼ)の処理をサポートしてるのかなあ？
115 ：デフォルトの名無しさん：02/10/19 11:06
していませんか？
116 ：デフォルトの名無しさん：02/10/19 11:39
つか、VBマガジンってあったきがするが
廃刊になったんか
廃刊になったんか
117 ：Delﾌｻｷﾞｺ ◆A6VzDeLphI ：02/10/19 13:12
＿＿＿＿＿＿＿＿＿＿＿＿＿
∧,,∧ ／
ミ,,ﾟДﾟ彡 ＜ ﾄﾞﾄﾈﾄまがじそになったそうです
,;ﾞ ﾐ ＼
＠ﾐ,,,UUﾐ ￣￣￣￣￣￣￣￣￣￣￣￣￣
∧,,∧ ／
ミ,,ﾟДﾟ彡 ＜ ﾄﾞﾄﾈﾄまがじそになったそうです
,;ﾞ ﾐ ＼
＠ﾐ,,,UUﾐ ￣￣￣￣￣￣￣￣￣￣￣￣￣
118 ：デフォルトの名無しさん：02/10/25 22:59
Delphiマガジンっていつ出るの？
119 ：デフォルトの名無しさん：02/10/25 23:02
120 ：デフォルトの名無しさん：02/10/25 23:05
>>119
ﾜﾗﾀ
ﾜﾗﾀ
121 ：デフォルトの名無しさん：02/10/26 07:32
ＦＴＰのソフトは、Ｄｅｌｐｈｉを買うと サンプルについてるからそれ使えば、便利だぞ。
無理に ＶＢを使う必要なしっ！
無理に ＶＢを使う必要なしっ！
122 ：デフォルトの名無しさん：02/10/29 22:53
史上最強の趣味専用開発ツール!
123 ：デフォルトの名無しさん：02/10/29 23:00
趣味と実益を兼ねとります
124 ：デフォルトの名無しさん：02/10/31 01:27
趣味でしかつかっていません。
125 ：デフォルトの名無しさん：02/10/31 01:30
Delphiって自作アプリ作るのには便利だけど、業務に使ってる会社って少ないよなぁ・・・・
ゲーム系だと皆無？それともオレが知らないだけ？
ゲーム系だと皆無？それともオレが知らないだけ？
126 ：デフォルトの名無しさん：02/10/31 01:31
>>124
私もそうです。
私もそうです。
127 ：デフォルトの名無しさん：02/10/31 01:42
128 ：デフォルトの名無しさん：02/10/31 01:48
自社内と関係した会社でって事でしょう。
うちもVBで作られたシステムを半ばあきらめモードで使用してます。
必要に迫られた時しか起動しませんけど。
うちもVBで作られたシステムを半ばあきらめモードで使用してます。
必要に迫られた時しか起動しませんけど。
129 ：デフォルトの名無しさん：02/11/06 09:07
VBを気にするとDel厨がVBにコンプレックスがあると思われる。
VBコンプレックスだと思われずにVBを叩く方法はないだろうか？
VBコンプレックスだと思われずにVBを叩く方法はないだろうか？
130 ：デフォルトの名無しさん：02/11/06 09:28
131 ：デフォルトの名無しさん：02/11/06 11:31
そうそう。既にVB6は単体での発売中止、来年には完全に入手出来ない状態になる。
VB.NETは今までのVBとは別物なんだし Delphi.NETがDelphiと別物のようにね。
VB.NETは今までのVBとは別物なんだし Delphi.NETがDelphiと別物のようにね。
132 ：デフォルトの名無しさん：02/11/12 14:50
サザエボンまんせー
133 ：デフォルトの名無しさん：02/11/12 15:03
DelphiってActiveXDLLを作成できますか？
134 ：デフォルトの名無しさん：02/11/12 15:09
作成出来ますよ。
ただ、パーソナルだとCで組むより苦労するでしょうから
素直にproを買う事。
VB6程手軽じゃないけどC++よりも楽です。
ただ、パーソナルだとCで組むより苦労するでしょうから
素直にproを買う事。
VB6程手軽じゃないけどC++よりも楽です。
135 ：デフォルトの名無しさん：02/11/12 15:11
136 ：デフォルトの名無しさん：02/11/12 15:13
>>135
買えよ。これだからDel厨はダメだと言われるんだ。
買えよ。これだからDel厨はダメだと言われるんだ。
137 ：デフォルトの名無しさん：02/11/12 15:15
作ってみたいだけなのに6万も出せないよ
138 ：デフォルトの名無しさん：02/11/12 15:21
金ぐらいヌスめよ
139 ：デフォルトの名無しさん：02/11/12 15:25
>>137
評価版使えよ
評価版使えよ
140 ：bloom：02/11/12 15:30
141 ：デフォルトの名無しさん：02/11/12 17:01
↑ﾌﾟﾗｸﾗ
142 ：デフォルトの名無しさん：02/11/23 01:10
Del phi ha utareru ttu-kotode
143 ：デフォルトの名無しさん：02/11/24 18:08
VBは負けない!
144 ：デフォルトの名無しさん：02/11/29 16:30
なんであげるかなぁ
145 ：りゅう：02/11/29 19:25
漏れも、Delphi(・∀・)マンセー
誰かhttp://kakinotane.s7.xrea.com/の
もぐらたたきゲームを作った人はいまつか？
もしいたらもぐら叩きを作ってみよう その３内の
図形の重なりのプログラム。
var
x1, y1, x2, y2: Integer;
begin
if (x1 < x2+10) and (x1+10 > x2) and
(y1 < y2+10) and (y1+10 > y2) then
end;
をどこに書くか教えて( ﾟДﾟ)ﾎｽｨ
よろしく。
誰かhttp://kakinotane.s7.xrea.com/の
もぐらたたきゲームを作った人はいまつか？
もしいたらもぐら叩きを作ってみよう その３内の
図形の重なりのプログラム。
var
x1, y1, x2, y2: Integer;
begin
if (x1 < x2+10) and (x1+10 > x2) and
(y1 < y2+10) and (y1+10 > y2) then
end;
をどこに書くか教えて( ﾟДﾟ)ﾎｽｨ
よろしく。
146 ：デフォルトの名無しさん：02/11/29 20:25
さうだね。
147 ：デフォルトの名無しさん：02/11/29 20:37
148 ：デフォルトの名無しさん：02/11/29 22:05
ところでDelphiって何て読む？
149 ：デフォルトの名無しさん：02/11/29 23:01
兄者
150 ：デフォルトの名無しさん：02/11/30 01:14
™
151 ：デフォルトの名無しさん：02/11/30 02:09
152 ：デフォルトの名無しさん：02/11/30 02:51
でるポイッ
153 ：デフォルトの名無しさん ：02/12/03 06:21
ボーランドのＨＰでアカウントの作成ができないのですが、どうすればよいのでしょうか？
昨日から何回かトライしているんですが・・・
昨日から何回かトライしているんですが・・・
154 ：デフォルトの名無しさん：02/12/03 07:04
割れ厨→VB（VSｴﾝﾀ）
罪の意識がある割れ厨→DEL（ﾊﾟｿﾅﾙ）
貧乏人→VC#（雑誌付録期限付き）
手段が目的→BCC（無料）
罪の意識がある割れ厨→DEL（ﾊﾟｿﾅﾙ）
貧乏人→VC#（雑誌付録期限付き）
手段が目的→BCC（無料）
155 ：デフォルトの名無しさん：02/12/03 08:04
>>153
日本？アメリカ？
日本？アメリカ？
156 ：デフォルトの名無しさん：02/12/03 09:41
>>148
デカパイ
デカパイ
157 ：153：02/12/03 21:37
158 ：デフォルトの名無しさん：02/12/05 11:35
159 ：デフォルトの名無しさん：02/12/08 12:34
でるぽいにらぶらぶなひとてーあげて。
160 ：デフォルトの名無しさん：02/12/08 13:56
>>159
わしもでるふぁいすきじゃぁ。
わしもでるふぁいすきじゃぁ。
161 ：デフォルトの名無しさん：02/12/08 21:58
Delphiは嫌いだがPascalマンセーです。
WinでまともなPascalは他に選択肢がありません。
WinでまともなPascalは他に選択肢がありません。
162 ：デフォルトの名無しさん：02/12/09 10:31
FreePascalは駄目？
GUIライブラリが…なんていう理由でDelphi使ってるなら、それはもうDelphi嫌いとは言わせん。
GUIライブラリが…なんていう理由でDelphi使ってるなら、それはもうDelphi嫌いとは言わせん。
163 ：デフォルトの名無しさん：03/01/08 17:47
Delphi は屑
164 ：デフォルトの名無しさん：03/01/08 21:02
Delphiは眉
IP記録実験
http://qb.2ch.net/test/read.cgi/accuse/1042013605/
1 名前：ひろゆき ◆3SHRUNYAXA ＠どうやら管理人 ★ 投稿日：03/01/08 17:13 ID:???
そんなわけで、qbサーバでIPの記録実験をはじめましたー。
27 名前：心得をよく読みましょう 投稿日：03/01/08 17:20 ID:yL/kYdMc
SETTING.TXT管轄でないということは全鯖導入を視野に、か？
38 名前：ひろゆき ◆3SHRUNYAXA 投稿日：03/01/08 17:22 ID:rLfxQ17l
>>27
鋭いです。
73 名前：ひろゆき ◆3SHRUNYAXA 投稿日：03/01/08 17:27 ID:rLfxQ17l
＞ところで、IPが抜かれて何か今までと変わることってあるのでしょうか？
・今までより、サーバが重くなる。
・裁判所や警察からの照会があった場合にはIPを提出することがある。
http://qb.2ch.net/test/read.cgi/accuse/1042013605/
1 名前：ひろゆき ◆3SHRUNYAXA ＠どうやら管理人 ★ 投稿日：03/01/08 17:13 ID:???
そんなわけで、qbサーバでIPの記録実験をはじめましたー。
27 名前：心得をよく読みましょう 投稿日：03/01/08 17:20 ID:yL/kYdMc
SETTING.TXT管轄でないということは全鯖導入を視野に、か？
38 名前：ひろゆき ◆3SHRUNYAXA 投稿日：03/01/08 17:22 ID:rLfxQ17l
>>27
鋭いです。
73 名前：ひろゆき ◆3SHRUNYAXA 投稿日：03/01/08 17:27 ID:rLfxQ17l
＞ところで、IPが抜かれて何か今までと変わることってあるのでしょうか？
・今までより、サーバが重くなる。
・裁判所や警察からの照会があった場合にはIPを提出することがある。
166 ：デフォルトの名無しさん：03/01/09 02:41
>>594
ザラキ
ザラキ
167 ：デフォルトの名無しさん：03/01/09 03:22
168 ：デフォルトの名無しさん：03/01/09 04:05
泣くなよｗ＞ID:ZBsKvw39
169 ：デフォルトの名無しさん：03/01/09 18:47
======2==C==H======================================================
２ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数： 138720人 発行日：2003/1/9
年末年始ボケがそろそろ収まり始めた今日このごろのひろゆきです。
そんなわけで、年末に予告したIP記録ですが実験を開始しています。
「２ちゃんねる20030107」
こんな感じで各掲示板の最下部に日付が入ってるんですが、
20030107以降になってるところはログ記録実験中ですー。
んじゃ！
────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
２ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数： 138720人 発行日：2003/1/9
年末年始ボケがそろそろ収まり始めた今日このごろのひろゆきです。
そんなわけで、年末に予告したIP記録ですが実験を開始しています。
「２ちゃんねる20030107」
こんな感じで各掲示板の最下部に日付が入ってるんですが、
20030107以降になってるところはログ記録実験中ですー。
んじゃ！
────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
170 ：デフォルトの名無しさん：03/01/09 18:48
あきたからちょっくら独Hするわ
171 ：デフォルトの名無しさん：03/01/09 23:05
172 ：デフォルトの名無しさん：03/01/10 10:16
こんな時間に俺たちは何をやっているのだろう
173 ：デフォルトの名無しさん：03/01/10 10:49
で、ひろゆきが負けたら２ｃｈは潰れますか？
174 ：デフォルトの名無しさん：03/01/10 11:31
175 ：デフォルトの名無しさん：03/01/10 12:00
test
176 ：デフォルトの名無しさん：03/01/10 12:51
177 ：デフォルトの名無しさん：03/01/10 16:41
音無響子さん？
178 ：デフォルトの名無しさん：03/01/10 23:03
179 ：デフォルトの名無しさん：03/01/10 23:08
>>724-725
それより、そこでもよは何やってんだ・・
それより、そこでもよは何やってんだ・・
180 ：デフォルトの名無しさん：03/01/11 00:26
( ´db｀)ﾉ＜ 地味に→地味な
181 ：デフォルトの名無しさん：03/01/11 00:35
じゃあ本当の意味言ってみろよ（･∀･）ﾆﾔﾆﾔ
182 ：デフォルトの名無しさん：03/01/11 10:31
======2==C==H======================================================
２ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数： 139038人 発行日：2003/1/10
なにやら、連日メルマガだしてるひろゆきです。
そんなわけで、ログ記録実験ですが、いちいちサーバ指定するのが面倒なので、
全部のサーバに入れてみました。
重くなって落ちたりしてもご愛嬌ってことで。。。
んじゃ！
────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
２ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数： 139038人 発行日：2003/1/10
なにやら、連日メルマガだしてるひろゆきです。
そんなわけで、ログ記録実験ですが、いちいちサーバ指定するのが面倒なので、
全部のサーバに入れてみました。
重くなって落ちたりしてもご愛嬌ってことで。。。
んじゃ！
────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
183 ：デフォルトの名無しさん：03/01/11 11:23
184 ：デフォルトの名無しさん：03/01/11 11:54
ログの提供を求めてきた個人や団体を，
２ちゃんねるで公開したらいいと思うんだけど，
そういうのは法的に無理だったりするの？
２ちゃんねるで公開したらいいと思うんだけど，
そういうのは法的に無理だったりするの？
185 ：デフォルトの名無しさん：03/01/11 12:57
政治家はともかく、中央官庁の役人は利用してないだろう…
186 ：デフォルトの名無しさん：03/01/11 13:28
それ以前に「窃盗罪」だな
187 ：デフォルトの名無しさん：03/01/11 16:13
＞1 ：ひろゆき ◆3SHRUNYAXA ＠どうやら管理人 ★ ：03/01/08 17:13 ID:???
＞そんなわけで、qbサーバでIPの記録実験をはじめましたー。
IP記録実験
http://qb.2ch.net/test/read.cgi/accuse/1042013605/l20
ＩＰ記録実験ＰＡＲＴ２
http://qb.2ch.net/test/read.cgi/accuse/1042020193/l20
IP記録実験Part4
http://qb.2ch.net/test/read.cgi/accuse/1042203275/l50
これまでのあらすじは あたりに誰かお願い。
＞そんなわけで、qbサーバでIPの記録実験をはじめましたー。
IP記録実験
http://qb.2ch.net/test/read.cgi/accuse/1042013605/l20
ＩＰ記録実験ＰＡＲＴ２
http://qb.2ch.net/test/read.cgi/accuse/1042020193/l20
IP記録実験Part4
http://qb.2ch.net/test/read.cgi/accuse/1042203275/l50
これまでのあらすじは あたりに誰かお願い。
188 ：デフォルトの名無しさん：03/01/11 16:20
隊長！誤爆しましたっ！
すまん！
すまん！
189 ：デフォルトの名無しさん：03/01/12 00:21
半角板がおもしろい
190 ：デフォルトの名無しさん：03/01/12 00:31
２ｃｈで告知するかどうかを知ることで？(^_^;)なんでそうなるんだ？
そりゃそうだ(^_^;)まあハッキングと強盗は区別するってことで
２０レス分くらい読めよ(^_^;)
どこまでＯＫなのかわかってたら訴訟で負けたりしません(^_^;)
なるほど(^_^;)
そりゃそうだ(^_^;)まあハッキングと強盗は区別するってことで
２０レス分くらい読めよ(^_^;)
どこまでＯＫなのかわかってたら訴訟で負けたりしません(^_^;)
なるほど(^_^;)
191 ：デフォルトの名無しさん：03/01/12 03:09
白白白 発発発 厨厨厨 東東東 ７７
待ち盃７
リーチ
待ち盃７
リーチ
192 ：デフォルトの名無しさん：03/01/12 03:12
もう施行されてんの？
193 ：デフォルトの名無しさん：03/01/12 10:41
なな晒しあげ
194 ：デフォルトの名無しさん：03/01/12 10:44
メルマガきたけど、IPを保存したとことで何もかわないよ。
IPを保存することで書き込んだ人に
責任を擦り付けられるとでも思ってんのか？
関係無いぜ。
警察の捜査はしやすくなるかもしれんが、公開責任は依然ひろゆき。
いい加減理解しろや。
日本生命の時から言われてるぜ。
判決もこれに沿ったものだったしな。
日本生命
http://www.geocities.co.jp/Technopolis-Mars/6820/hoken/
IPを保存することで書き込んだ人に
責任を擦り付けられるとでも思ってんのか？
関係無いぜ。
警察の捜査はしやすくなるかもしれんが、公開責任は依然ひろゆき。
いい加減理解しろや。
日本生命の時から言われてるぜ。
判決もこれに沿ったものだったしな。
日本生命
http://www.geocities.co.jp/Technopolis-Mars/6820/hoken/
195 ：デフォルトの名無しさん：03/01/12 21:17
アホことしない限りは
強制IP表示されるわけじゃないから自作自演もやり放題だし。
IP記録なんかより荒らし対策をやれよ
強制IP表示されるわけじゃないから自作自演もやり放題だし。
IP記録なんかより荒らし対策をやれよ
196 ：デフォルトの名無しさん：03/01/12 21:32
ぉぃぉぃ(^_^;)
ってもしかして笑い取ろうとしてるのだったらごめん。
ってもしかして笑い取ろうとしてるのだったらごめん。
（＾＾）
198 ：デフォルトの名無しさん：03/01/13 23:21
一月だろ。
（＾＾）
（＾＾）
201 ：デフォルトの名無しさん：03/01/24 12:55
マンｺｸセー
202 ：デフォルトの名無しさん：03/01/28 21:06
猿
203 ：デフォルトの名無しさん：03/02/09 04:03
でも、ホント Delphiは使い易い道具だね
コンパイルも早いし、インラインアセンブラ使って細かい所まで書ける
実際、In/Out使ってプリンタポートをパラレルポート代わりに叩くなんてとても簡単だしさ
コンパイルも早いし、インラインアセンブラ使って細かい所まで書ける
実際、In/Out使ってプリンタポートをパラレルポート代わりに叩くなんてとても簡単だしさ
204 ：デフォルトの名無しさん：03/02/09 10:10
Delphiは私、好きだな。でも最近はC++やJAVAで指定されてくることが多いのも事実。
私の周りのお得意様のほとんどはDelphi指定してくれないんだょぅ(´・ω・`)。
だから何の指定も無いときはすかさずDelphiだねｗ
いや、もちろん内容で変えるけど。。。
私の周りのお得意様のほとんどはDelphi指定してくれないんだょぅ(´・ω・`)。
だから何の指定も無いときはすかさずDelphiだねｗ
いや、もちろん内容で変えるけど。。。
205 ：デフォルトの名無しさん：03/02/15 20:57
206 ：デフォルトの名無しさん：03/02/20 01:11
Delphi７の延長バージョンアップ申し込みますた。
今日、LAOXで見てきたら、ボーランドの商品みんな定価売りなんだね・・・
７Proが68000円・・・
バージョンアップ申し込めてよかたよ。それでももうちょい安いといいが。
早く届かないかな。
今日、LAOXで見てきたら、ボーランドの商品みんな定価売りなんだね・・・
７Proが68000円・・・
バージョンアップ申し込めてよかたよ。それでももうちょい安いといいが。
早く届かないかな。
207 ：このスレって何書けばいいの？：03/02/20 01:43
>>206
ラオックスって、みんな高いって感じがする。
と、長年思ってたのだがCD-Rとかは割と安かったりするのでよく分からんな。
でもソフトは思いっきり、みんな定価（に近い？）売りだと思ったが…。
あんなんで売れるのかな？
秋葉のラオックスの話じゃないけどね。
ラオックスって、みんな高いって感じがする。
と、長年思ってたのだがCD-Rとかは割と安かったりするのでよく分からんな。
でもソフトは思いっきり、みんな定価（に近い？）売りだと思ったが…。
あんなんで売れるのかな？
秋葉のラオックスの話じゃないけどね。
208 ：デフォルトの名無しさん：03/02/20 01:46
209 ：デフォルトの名無しさん：03/02/20 13:00
>>207
そうだね。他メーカーのは定価じゃなかったけど、全体的にたしかに高めだったかも。
>>208
おお、少し安いけど、バージョンアップに比べると高いよね。
おれの場合Del５ラーニングからのバージョンアップで税込み36750円だから。
これって、どこかで旧バージョンの売れ残りの安いの買ってバージョンアップ
したほうが安上がりになりそうだね。
そうだね。他メーカーのは定価じゃなかったけど、全体的にたしかに高めだったかも。
>>208
おお、少し安いけど、バージョンアップに比べると高いよね。
おれの場合Del５ラーニングからのバージョンアップで税込み36750円だから。
これって、どこかで旧バージョンの売れ残りの安いの買ってバージョンアップ
したほうが安上がりになりそうだね。
210 ：Delﾌｻｷﾞｺ ◆A6VzDeLphI ：03/03/01 22:01
∧,,∧
ミ,,ﾟДﾟ彡
ミつ日(ﾐ
とりあえず、会社で買う時
秋葉に行って帰ってくるだけで
時間の激しく無駄なので
品揃え豊富なラオのコンピ館で
買うことにしてますよ。
高くても。。。。
でも、ビクカメラのカードポイントを
ためつつ、会社の金で備品を
買うのが本当は一番いいんだけどね。
ミ,,ﾟДﾟ彡
ミつ日(ﾐ
とりあえず、会社で買う時
秋葉に行って帰ってくるだけで
時間の激しく無駄なので
品揃え豊富なラオのコンピ館で
買うことにしてますよ。
高くても。。。。
でも、ビクカメラのカードポイントを
ためつつ、会社の金で備品を
買うのが本当は一番いいんだけどね。
211 ：デフォルトの名無しさん：03/03/05 13:42
Delphi サイキョー
212 ：デフォルトの名無しさん：03/03/05 14:28
Delphi Professionalってどこで落とせるんですか？
213 ：デフォルトの名無しさん：03/03/05 14:45
VBスレにもかいてやがる。とんだ暇人だな。
214 ：デフォルトの名無しさん：03/03/05 15:03
両方とも同じぐらいの時間にあがってるな。
よっぼどDelphiとVBを戦わせたいのか？
たいしてレスつかないんだから両方ともdat落ちさせろよ。
よっぼどDelphiとVBを戦わせたいのか？
たいしてレスつかないんだから両方ともdat落ちさせろよ。
215 ：デフォルトの名無しさん：03/03/05 16:32
Delphi6のライセンス取得を申し込んだけど、音沙汰がありません。
会社に電話しても、つながりません。つぶれたんですか？
会社に電話しても、つながりません。つぶれたんですか？
216 ：デフォルトの名無しさん：03/03/05 17:21
>>215
３点
３点
217 ：デフォルトの名無しさん：03/03/06 00:08
>>215
あなたの電話が止められただけでしょう。
あなたの電話が止められただけでしょう。
218 ：デフォルトの名無しさん：03/03/08 18:47
>>217
電話止められたら発信音もしないよ。
電話止められたら発信音もしないよ。
219 ：デフォルトの名無しさん：03/03/08 19:01
220 ：デフォルトの名無しさん：03/03/09 15:12
>>219
そしたらライセンス違反じゃん。
そしたらライセンス違反じゃん。
221 ：デフォルトの名無しさん：03/03/12 11:30
VBよりDelの方が楽しくプログラミングできるから使ってる
222 ：デフォルトの名無しさん：03/03/12 15:20
ネイティブなのが良い
223 ：デフォルトの名無しさん：03/03/13 07:29
肉の万世
224 ：デフォルトの名無しさん：03/03/13 07:30
225 ：デフォルトの名無しさん：03/03/19 00:23
肉マンセー
226 ：デフォルトの名無しさん：03/03/22 11:23
ん？
227 ：Delﾌｻｷﾞｺ ◆A6VzDeLphI ：03/03/23 12:39
∧,,∧ 秋葉にいくたび、
ミ,,ﾟДﾟ彡 2chを思い出しまつ
ﾐ つ旦)~~
～と,,,~),,~)
ミ,,ﾟДﾟ彡 2chを思い出しまつ
ﾐ つ旦)~~
～と,,,~),,~)
228 ：デフォルトの名無しさん：03/03/24 12:01
宿題：
Delphiで下記のようなセーブデータ変更プログラムを作り
ここへうｐしなさい。
http://www.geocities.co.jp/Playtown-Queen/5355/save_tools/ps2_ff10_2/ffx2_tool10.zip
Delphiで下記のようなセーブデータ変更プログラムを作り
ここへうｐしなさい。
http://www.geocities.co.jp/Playtown-Queen/5355/save_tools/ps2_ff10_2/ffx2_tool10.zip
229 ：デフォルトの名無しさん：03/03/24 15:32
まずはFFX-2をうｐするところからだな。
230 ：デフォルトの名無しさん：03/03/25 03:27
なんかわからんけど、それ使えばいいだろ
231 ：デフォルトの名無しさん：03/03/25 15:26
232 ：デフォルトの名無しさん：03/03/25 15:45
231には無理
233 ：デフォルトの名無しさん：03/03/25 16:02
>>231
無理だと思う理由を上げてみろ。
無理だと思う理由を上げてみろ。
234 ：デフォルトの名無しさん：03/03/25 17:58
235 ：デフォルトの名無しさん：03/03/25 22:13
236 ：デフォルトの名無しさん：03/03/26 11:52
大漁ですた！
237 ：デフォルトの名無しさん：03/03/26 18:56
さぞかし難しい物だと想像していたんだろうなあ…。
238 ：デフォルトの名無しさん：03/03/28 16:43
面倒なのはプリンタポートを直接叩く事くらいだけど、GWIOPM 使えば インラインアセンブラで in out もつかえる
239 ：デフォルトの名無しさん：03/03/31 19:31
Delphi過小評価されすぎ。VBよりもいいぞ。
240 ：デフォルトの名無しさん：03/03/31 19:40
VCよりもいいぞ。
241 ：デフォルトの名無しさん：03/03/31 22:34
エディタは糞
242 ：デフォルトの名無しさん：03/03/31 22:41
C#を生み出すための反面教師としてDelphiの果たした役割は計り知れない｡
ありがとうDelphi｡さようならDelphi｡
ありがとうDelphi｡さようならDelphi｡
243 ：デフォルトの名無しさん：03/03/31 22:42
そうでもないよ
244 ：デフォルトの名無しさん：03/04/01 00:53
C#ってDelphiのパクリでしょ？
245 ：デフォルトの名無しさん：03/04/01 05:00
デルフォイの神託
246 ：デフォルトの名無しさん：03/04/01 06:37
>>241 エディタも楽しいよ。 特に矩形置換なんて独断場だな
247 ：デフォルトの名無しさん：03/04/01 07:03
たしかにあの一文字右にずれる矩形選択は独擅場だ。
248 ：デフォルトの名無しさん：03/04/01 13:05
一文字右にずれる？
よくわからん
バージョンによって違うのかな
よくわからん
バージョンによって違うのかな
249 ：デフォルトの名無しさん：03/04/01 14:01
矩形選択時に、キャレットのある文字を含めるか含めないかの動作のことでしょ。
キーボード一発でトグルで切り替わるんだが。マニュアル読んだ？>>247
キーボード一発でトグルで切り替わるんだが。マニュアル読んだ？>>247
250 ：248：03/04/01 17:13
ところでShift+Alt+矢印キーで矩形選択したあと、矩形選択モードを解除するのに
わざわざマウスで複数行選択してるんですが、キーボードでやる方法ないですか？
わざわざマウスで複数行選択してるんですが、キーボードでやる方法ないですか？
251 ：デフォルトの名無しさん：03/04/01 18:09
[Ctrl]+O+K
ありがたう
253 ：デフォルトの名無しさん：03/04/01 19:53
>>249
そんな切り替え機能なんて存在しないが馬鹿？
そんな切り替え機能なんて存在しないが馬鹿？
254 ：デフォルトの名無しさん：03/04/01 21:24
存在するYO!
255 ：デフォルトの名無しさん：03/04/02 00:50
矩形選択では常にキャレットも含まれるみたいだ。
普通の選択モードでは[Ctrl]+OK, [Ctrl]+OIで切り替えられる。
普通の選択モードでは[Ctrl]+OK, [Ctrl]+OIで切り替えられる。
256 ：デフォルトの名無しさん：03/04/02 07:06
{--} if xx='hoge' then yy
else if xx='hage' then zz
みたいな処理を書く時に、
矩形選択で空白1文字を縦に選択しておいて 空白1文字を else if xx=' に置換とか
else if xx='hage' then zz
みたいな処理を書く時に、
矩形選択で空白1文字を縦に選択しておいて 空白1文字を else if xx=' に置換とか
257 ：デフォルトの名無しさん：03/04/04 18:51
Delphiエディタマンセー
258 ：デフォルトの名無しさん：03/04/05 11:12
NT系OS (Win2K) ってmulti processing (MP) をサポートしてますよね。
んでもって、DelphiでMP対応のアプリとか作れるもんなんでしょうか？
どなたか作ったことある人いますか？
んでもって、DelphiでMP対応のアプリとか作れるもんなんでしょうか？
どなたか作ったことある人いますか？
259 ：デフォルトの名無しさん：03/04/05 11:15
スレッドに対応させればいいと思うんだが違うのか？
260 ：デフォルトの名無しさん：03/04/05 11:27
MPってMP3ですか～？
261 ：デフォルトの名無しさん：03/04/05 18:18
お前ら、マリエ様はDelphianだ。
糞VBデブ女ブスユーザーとは大違い！！！！！！！！！！！
写真アップ
http://www.msnusers.com/mypicture?user=4263~4AAAAAAuACE!C6qS3!e1vvEbqxeKMqTjtZOxchhA2TIL9pSJpaPM1HEg$$~4AAAAAAvAEGdKk2h36cXklVE6labgm*kKhR09xVBNrUq4$
本人ぷろふぃーろ
http://members.msn.com/?mpp=2260~4AAKAAAAACI86084TJI9Lqst61Uk*4I0KwxDKU!DGLXMa977hxbWhCyg$$~4AALAAAAAEXcSPlLP!UGFxDmuEdPVrGMxwn0xnvDYI*pA$&mid=2260#MORE
糞VBデブ女ブスユーザーとは大違い！！！！！！！！！！！
写真アップ
http://www.msnusers.com/mypicture?user=4263~4AAAAAAuACE!C6qS3!e1vvEbqxeKMqTjtZOxchhA2TIL9pSJpaPM1HEg$$~4AAAAAAvAEGdKk2h36cXklVE6labgm*kKhR09xVBNrUq4$
本人ぷろふぃーろ
http://members.msn.com/?mpp=2260~4AAKAAAAACI86084TJI9Lqst61Uk*4I0KwxDKU!DGLXMa977hxbWhCyg$$~4AALAAAAAEXcSPlLP!UGFxDmuEdPVrGMxwn0xnvDYI*pA$&mid=2260#MORE
262 ：デフォルトの名無しさん：03/04/05 21:27
まりえさま萌えー
(´д｀;)ﾊｧﾊｧ
(´д｀;)ﾊｧﾊｧ
263 ：デフォルトの名無しさん：03/04/05 23:34
幼女プログラマき、き、きぼん、きぼぼ、キボンヌーッ！
264 ：デフォルトの名無しさん：03/04/07 17:40
Win95 (OSR2.1) を使ってた時、
「このUSBマウスはWin95対応って書いてないけど、ドライバ組み込んで
OSR2.1にしたから何とか使えるべ」
と思ったらやっぱりダメなんスよね。
そんで一念発起して、評判が良かったソフトウェア開発ツールのDelphiを
買って、Win95対応のマウス・ドライバでも作ってやると意気込み、本屋で
参考書を見たらがっかり。Delphiじゃデバイス・ドライバなんて作れない
のね。(ﾜﾗﾃ ｸﾀﾞｻｲ)
で、DDKを手に入れてもVisual C++が必須。デバイス・ドライバ製作という
点から見ればDelphiは使えない。
「このUSBマウスはWin95対応って書いてないけど、ドライバ組み込んで
OSR2.1にしたから何とか使えるべ」
と思ったらやっぱりダメなんスよね。
そんで一念発起して、評判が良かったソフトウェア開発ツールのDelphiを
買って、Win95対応のマウス・ドライバでも作ってやると意気込み、本屋で
参考書を見たらがっかり。Delphiじゃデバイス・ドライバなんて作れない
のね。(ﾜﾗﾃ ｸﾀﾞｻｲ)
で、DDKを手に入れてもVisual C++が必須。デバイス・ドライバ製作という
点から見ればDelphiは使えない。
265 ：デフォルトの名無しさん：03/04/07 17:47
漏れならハードがらみのプログラムは迷わずCだな。
Delが一番向いていそうなプログラムは、データベースアプリケーションだと言ってみる。
Delが一番向いていそうなプログラムは、データベースアプリケーションだと言ってみる。
266 ：デフォルトの名無しさん：03/04/07 17:48
そこでDelphiを選ぶような頭では、どうせドライバなんて作れないよ
267 ：デフォルトの名無しさん：03/04/07 18:20
煽りしか能がない奴は、ろくでもないソフトしかつくれないよ
268 ：デフォルトの名無しさん：03/04/07 19:19
>265
> Delが一番向いていそうなプログラムは、データベースアプリケーションだと言ってみる。
ソリは言い得てますね。ＤＢアプリが作りやすくなったのはBorlandの功績 (?) かと。
> Delが一番向いていそうなプログラムは、データベースアプリケーションだと言ってみる。
ソリは言い得てますね。ＤＢアプリが作りやすくなったのはBorlandの功績 (?) かと。
269 ：デフォルトの名無しさん：03/04/07 19:57
>漏れならハードがらみのプログラムは迷わずCだな。
>Delが一番向いていそうなプログラムは、データベースアプリケーションだと言ってみる。
Pascalでもできるかも。昔DOSの頃はそういうの結構あったはず。
俺的にはCの次にDelphi。Win32API回りはC並に書ける。
VBなど比較するなど到底及ばない。
>Delが一番向いていそうなプログラムは、データベースアプリケーションだと言ってみる。
Pascalでもできるかも。昔DOSの頃はそういうの結構あったはず。
俺的にはCの次にDelphi。Win32API回りはC並に書ける。
VBなど比較するなど到底及ばない。
270 ：デフォルトの名無しさん：03/04/08 09:11
271 ：デフォルトの名無しさん：03/04/08 09:16
あ、もちろん、C/C++のコードが読め、逆アセ解析が出来る人限定ね
272 ：デフォルトの名無しさん：03/04/08 09:20
漏れは「Borland信者必死だな（藁」と言われてまで
Delでドライバつくる気にはなれん。
極論から言えば全部アセで書けばいいわけだし。
Delでドライバつくる気にはなれん。
極論から言えば全部アセで書けばいいわけだし。
273 ：デフォルトの名無しさん：03/04/08 10:41
確か、Windowsドライバは基本的にはDLLだけど、どっかにドライバである事を示すフィールドが必要で
単純に DLLが作れれば作れる訳では無いと聞いたけど・・・・・
まあ、それが判ってれば、それを付け足せばいいんだとは思うけどね
単純に DLLが作れれば作れる訳では無いと聞いたけど・・・・・
まあ、それが判ってれば、それを付け足せばいいんだとは思うけどね
274 ：デフォルトの名無しさん：03/04/08 18:41
FreeBSDに手を出そうと思ってるんですが、Linuxエミュ＋Kylixの話題はボツですか？
275 ：デフォルトの名無しさん：03/04/09 00:07
>>264
＞Delphiじゃデバイス・ドライバなんて作れない
＞のね。(ﾜﾗﾃ ｸﾀﾞｻｲ)
詳細な理由ｷﾎﾞﾝﾇ
根本的に不可能な理由があるのか、ＭＳ製品でないと作ってはいけないという
制約があるのか、単にお前が無能なだけなのか、264だけでは判断できない
＞Delphiじゃデバイス・ドライバなんて作れない
＞のね。(ﾜﾗﾃ ｸﾀﾞｻｲ)
詳細な理由ｷﾎﾞﾝﾇ
根本的に不可能な理由があるのか、ＭＳ製品でないと作ってはいけないという
制約があるのか、単にお前が無能なだけなのか、264だけでは判断できない
276 ：デフォルトの名無しさん：03/04/12 19:16
アトムの誕生日も終ったけど、天馬博士はあらわれずか・・・・
でも、人間の脳細胞数と比べてもパソコンのリソースが、この５年で追いつく時代だ。
出来れば、その最初の道具として Delphiが役立ってくれますように・・・・ナムナム
でも、人間の脳細胞数と比べてもパソコンのリソースが、この５年で追いつく時代だ。
出来れば、その最初の道具として Delphiが役立ってくれますように・・・・ナムナム
277 ：デフォルトの名無しさん：03/04/12 19:50
C++Builderでもドライバは無理なんだっけ？
もしilink32でドライバがリンクできるなら(/adのようなオプションはあるみたいだけど)、
Delphiでもdcc32 -Jでilink32用の.objが吐けるのでドライバが作れる理屈にはなりますが…。
>>274
むしろ稀少なのでOK
もしilink32でドライバがリンクできるなら(/adのようなオプションはあるみたいだけど)、
Delphiでもdcc32 -Jでilink32用の.objが吐けるのでドライバが作れる理屈にはなりますが…。
>>274
むしろ稀少なのでOK
278 ：274：03/04/14 19:33
>274
> FreeBSDに手を出そうと思ってるんですが、
と思いつつなかなかWinのバックアップができないんで手を出しかねてる
ワケですが、KylixをLinux以外で動かした人はいますか？ 簡単な設定で
動くんならBSDでやろうと思ってるんでつが…。
> FreeBSDに手を出そうと思ってるんですが、
と思いつつなかなかWinのバックアップができないんで手を出しかねてる
ワケですが、KylixをLinux以外で動かした人はいますか？ 簡単な設定で
動くんならBSDでやろうと思ってるんでつが…。
スレ違い。
280 ：デフォルトの名無しさん：03/04/15 10:37
281 ：ミ ◆CSXfsgOKpA ：03/04/15 23:35
話題の少ない所にまでしゃしゃりでてきて
不必要なルールを押し付ける頭の弱い人の
言うことなんて無視すれ。
不必要なルールを押し付ける頭の弱い人の
言うことなんて無視すれ。
282 ：ミ；ﾟДﾟ彡 ◆A6VzDeLphI ：03/04/15 23:36
顔文字に#入れたら、えらいことになった。・・・
（＾＾）
284 ：デフォルトの名無しさん：03/04/17 18:13
age
285 ：デフォルトの名無しさん：03/04/18 11:12
VxDとか特殊なのを除けばDelphiでもデバイスドライバ作れるよ。
面倒臭いけどな
面倒臭いけどな
∧＿∧
（ ＾＾ ）＜ ぬるぽ（＾＾）
（ ＾＾ ）＜ ぬるぽ（＾＾）
287 ：デフォルトの名無しさん：03/04/20 23:15
Personal版は無料じゃないよ。
個人情報を登録しないと落とせないし、その情報は転売されてるという話。
捨てアドレスで落としてみな。
そのアドレスに突然スパムがいっぱい来るから。
それはすべてBorlandのせい。
個人情報を登録しないと落とせないし、その情報は転売されてるという話。
捨てアドレスで落としてみな。
そのアドレスに突然スパムがいっぱい来るから。
それはすべてBorlandのせい。
288 ：デフォルトの名無しさん：03/04/20 23:19
289 ：デフォルトの名無しさん：03/04/21 11:54
>>288
ようするにDLLを作って
ttp://www5e.biglobe.ne.jp/~randy/wps/backnumber/wps0008.txt
の ubsystem / DllCharacteristics の設定が必要って事では？
ようするにDLLを作って
ttp://www5e.biglobe.ne.jp/~randy/wps/backnumber/wps0008.txt
の ubsystem / DllCharacteristics の設定が必要って事では？
290 ：デフォルトの名無しさん：03/04/27 08:02
まだdelphi初めて一月だが、簡単なゲーム作ってvectorに置いたら
この6日間でDL数が1700だった。おれのソフトのなかでは最高。
VBだとランタイムが必要なんで、そんなに落としてくれない。
この6日間でDL数が1700だった。おれのソフトのなかでは最高。
VBだとランタイムが必要なんで、そんなに落としてくれない。
291 ：デフォルトの名無しさん：03/04/27 08:05
初心者は容量のムダ使いに気がつかないからな。
30KBですむものが600KB。
これが100本あったら・・・
30KBですむものが600KB。
これが100本あったら・・・
292 ：デフォルトの名無しさん：03/04/27 08:11
293 ：デフォルトの名無しさん：03/04/27 08:23
>>291は初心者
294 ：bloom：03/04/27 08:26
295 ：デフォルトの名無しさん：03/04/27 08:36
>>290
おまえの喜ぶ顔見たさに俺が1700回もダウンロードしたからな
おまえの喜ぶ顔見たさに俺が1700回もダウンロードしたからな
296 ：デフォルトの名無しさん：03/04/27 09:17
>>295
DoS攻撃とみなし、vectorに通報しました。
DoS攻撃とみなし、vectorに通報しました。
297 ：デフォルトの名無しさん：03/04/27 09:18
>>296
(´‐｀ ;)ｿ･･ｿﾝﾅｧ
(´‐｀ ;)ｿ･･ｿﾝﾅｧ
>291
圧縮ファイルでアップするだろうから、
無駄な部分はすべて圧縮されてます
圧縮ファイルでアップするだろうから、
無駄な部分はすべて圧縮されてます
299 ：デフォルトの名無しさん：03/04/27 11:13
わけわからん。
300 ：デフォルトの名無しさん：03/04/27 16:51
7のパーソナル、無料にしる。
301 ：デフォルトの名無しさん：03/04/27 17:04
7のプロフェッショナルは無料でしょ？
302 ：デフォルトの名無しさん：03/04/27 17:14
実行時パッケージ使えと言う意味だろ。
303 ：デフォルトの名無しさん：03/04/27 18:45
Dｅl７も無料にしやがれ（核爆
304 ：デフォルトの名無しさん：03/04/28 00:04
Delphiでもテラリウムに参加できますか？
305 ：デフォルトの名無しさん：03/04/28 07:54
306 ：デフォルトの名無しさん：03/04/28 18:18
Delphiでメモ帳作ってるけどRichEditの検索、置き換えがうまくいかねぇーっ。
誰か教えてくれ。
厨でｽﾏｿ。
誰か教えてくれ。
厨でｽﾏｿ。
307 ：デフォルトの名無しさん：03/04/28 18:57
そんな君にはひまわりをお勧めします。
八丈島のキョンっ！
309 ：デフォルトの名無しさん：03/04/29 01:22
310 ：デフォルトの名無しさん：03/04/29 01:53
>>308
それはこまわりだろーが！
それはこまわりだろーが！
311 ：デフォルトの名無しさん：03/04/30 06:17
８がでたら７Perを無料にするとかいう風にしていってほしいな
312 ：デフォルトの名無しさん：03/05/02 21:43
それじゃ売れないじゃん。慈善事業かよ。
313 ：デフォルトの名無しさん：03/05/02 23:03
もとから売れてねーし
314 ：デフォルトの名無しさん：03/05/02 23:45
なおさらじゃん。
315 ：デフォルトの名無しさん：03/05/03 14:11
MSに会社ごと売ってしまえばいい
316 ：デフォルトの名無しさん：03/05/03 14:16
既に一度資金提供受けたときに売ったも同じになってるような・・・・
317 ：デフォルトの名無しさん：03/05/06 21:38
昔BCBとかJBuliderとか買うとおまけで付いてきた。
318 ：デフォルトの名無しさん：03/05/07 23:34
age
319 ：デフォルトの名無しさん：03/05/11 12:03
>>290
＞まだdelphi初めて一月だが、簡単なゲーム作ってvectorに置いたら
＞この6日間でDL数が1700だった。おれのソフトのなかでは最高。
＞VBだとランタイムが必要なんで、そんなに落としてくれない。
そのゲームって「敦煌」？
＞まだdelphi初めて一月だが、簡単なゲーム作ってvectorに置いたら
＞この6日間でDL数が1700だった。おれのソフトのなかでは最高。
＞VBだとランタイムが必要なんで、そんなに落としてくれない。
そのゲームって「敦煌」？
320 ：デフォルトの名無しさん：03/05/11 12:31
とんほあん
321 ：デフォルトの名無しさん：03/05/13 01:02
ホアンホアンとカンカンが結婚すれば
ホアンホアンとカンカンが結婚すれば
生まれる子供は保安官
ホアンホアンとカンカンが結婚すれば
生まれる子供は保安官
322 ：デフォルトの名無しさん：03/05/17 15:42
323 ：デフォルトの名無しさん：03/05/17 15:44
Delphi使えば誰でも出来る。
324 ：デフォルトの名無しさん：03/05/17 15:47
>>魚住
おまえには無理だ。
おまえには無理だ。
325 ：デフォルトの名無しさん：03/05/17 16:02
デルファイって名前ダサい
326 ：デフォルトの名無しさん：03/05/17 16:14
それはお前のセンスがおかしいのだよ。
327 ：デフォルトの名無しさん：03/05/17 16:44
デルファイって名前エロい
328 ：デフォルトの名無しさん：03/05/17 17:33
んじゃ正しくギリシア語で「デルフォイ」と呼べばいいのか？
329 ：デフォルトの名無しさん：03/05/17 18:17
どうも巨乳を連想してしまうんだよね
何故かは分からないが
何故かは分からないが
330 ：デフォルトの名無しさん：03/05/17 23:55
>>329
おお、その感性は正しい。なぜならDelphi神殿は
アポロに倒されたイルカの怪物を祀ってある神殿であり、
古来ギリシャではイルカは母親の胎内のシンボルとされた。
Delphi3までパッケージのイメージで使われていたアテナも母性を
イメージしており、ソフトウェアを生み出す力、
母親のような厳しさと寛容さをイメージしている。
おお、その感性は正しい。なぜならDelphi神殿は
アポロに倒されたイルカの怪物を祀ってある神殿であり、
古来ギリシャではイルカは母親の胎内のシンボルとされた。
Delphi3までパッケージのイメージで使われていたアテナも母性を
イメージしており、ソフトウェアを生み出す力、
母親のような厳しさと寛容さをイメージしている。
331 ：デフォルトの名無しさん：03/05/19 09:02
Del5のスプラッシュは死ぬほどダサイ
Del4のはｶｺﾖｶﾀﾉﾆ
Del4のはｶｺﾖｶﾀﾉﾆ
332 ：デフォルトの名無しさん：03/05/19 13:02
プログラム初心者にデルファイを勧めても大丈夫なんでしょうかね？
マイナーであることは問題ないとして、
ボーランド社がいきなり「デルファイなんてやーめた」とかいって
折角覚えたデルファイが無くなってしまうということはないでしょうかね？
マイナーであることは問題ないとして、
ボーランド社がいきなり「デルファイなんてやーめた」とかいって
折角覚えたデルファイが無くなってしまうということはないでしょうかね？
333 ：デフォルトの名無しさん：03/05/19 13:27
>>332
問題ないでしょう。
そもそもDelphi程度も習得できない人間はプログラマーに向いてません。
業界主流のC++の方が遙かに難しいので。
むしろプログラマーには、言語の仕様やツールの特徴よりなんかよりも、
基本的なアルゴリズム、デザインパターンの考え方、
効率の良いプログラミングのセオリーを身につけて欲しいですね。
問題ないでしょう。
そもそもDelphi程度も習得できない人間はプログラマーに向いてません。
業界主流のC++の方が遙かに難しいので。
むしろプログラマーには、言語の仕様やツールの特徴よりなんかよりも、
基本的なアルゴリズム、デザインパターンの考え方、
効率の良いプログラミングのセオリーを身につけて欲しいですね。
334 ：デフォルトの名無しさん：03/05/19 13:35
なにがいいって、 Sender が、いいよね。
VBだと別クラス用意しなきゃいけなくて、めんどい。
VBだと別クラス用意しなきゃいけなくて、めんどい。
335 ：ななしへたぐらま ◆XcB18Bks.Y ：03/05/21 15:41
>>331
確かにD5のはアレですね．
D5のスプラッシュはJPEGのイメージがそのままリソースになっているので
『リソースハッカー』で好きな絵に差し替えるといいかも．
（『リソースハッカー』でぐぐれば見つかるはず）
>>332
大丈夫でしょう．
仮にDelphiが消滅したとしてDelphi固有の知識は役に立たなくなっても
プログラムを作る技術や能力は大いに役に立つものです．
ボーランドもターボパスカルで名をあげた会社なので
その直系の子孫であるDelphiはそう簡単にはやめないと思いますが．
確かにD5のはアレですね．
D5のスプラッシュはJPEGのイメージがそのままリソースになっているので
『リソースハッカー』で好きな絵に差し替えるといいかも．
（『リソースハッカー』でぐぐれば見つかるはず）
>>332
大丈夫でしょう．
仮にDelphiが消滅したとしてDelphi固有の知識は役に立たなくなっても
プログラムを作る技術や能力は大いに役に立つものです．
ボーランドもターボパスカルで名をあげた会社なので
その直系の子孫であるDelphiはそう簡単にはやめないと思いますが．
336 ：Delﾌｻｷﾞｺ ◆A6VzDeLphI ：03/05/21 23:35
YT's page
http://hp.vector.co.jp/authors/VA028375/
∧,,∧ ｽﾌﾟﾗｯｼｭはこちらのページで
ミ,,ﾟДﾟ彡 懐かしむましょう。
ﾐ,,, uu ﾐ
BCBのｽﾌﾟﾗｯｼｭｺﾚｸｼｮﾝされてるページはないかしら？
誰か、持ってませんか？DelWikiネタなどに・・
http://hp.vector.co.jp/authors/VA028375/
∧,,∧ ｽﾌﾟﾗｯｼｭはこちらのページで
ミ,,ﾟДﾟ彡 懐かしむましょう。
ﾐ,,, uu ﾐ
BCBのｽﾌﾟﾗｯｼｭｺﾚｸｼｮﾝされてるページはないかしら？
誰か、持ってませんか？DelWikiネタなどに・・
ふーん、D2までがTurboPascalの後継だったのか、、、
∧＿∧
ﾋﾟｭ.ｰ ( ＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
＝〔~∪￣￣〕
＝ ◎――◎ 山崎渉
ﾋﾟｭ.ｰ ( ＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
＝〔~∪￣￣〕
＝ ◎――◎ 山崎渉
339 ：デフォルトの名無しさん：03/06/02 00:30
>>336
面白いなあ。
http://homepages.borland.com/aohlsson/index.html
俺的にはDelphi4RC2が一番ｶｺｲｲかな。
こうしてみるとDelphi5が何故ああなったのかすごい謎だ。
面白いなあ。
http://homepages.borland.com/aohlsson/index.html
俺的にはDelphi4RC2が一番ｶｺｲｲかな。
こうしてみるとDelphi5が何故ああなったのかすごい謎だ。
340 ：デフォルトの名無しさん：03/06/07 13:17
341 ：Dale Fuller：03/06/07 13:30
>>339
そう。Delphi5 で変わったんだったか。アプリケーションアイコンとかも全部。
慣れ親しんだ神殿アイコンが、丸に稲妻に置き換わってしまった。ほとんど全員反対したんだが、
マーケ、デザイナ側の決定事項ということで確定。
そう。Delphi5 で変わったんだったか。アプリケーションアイコンとかも全部。
慣れ親しんだ神殿アイコンが、丸に稲妻に置き換わってしまった。ほとんど全員反対したんだが、
マーケ、デザイナ側の決定事項ということで確定。
342 ：Delﾌｻｷﾞｺ ◆A6VzDeLphI ：03/06/09 03:00
∧,,∧ ／ しゃっちょさんが
ミ；ﾟДﾟ彡＜ 反対しても、確定されたうんですか？
ﾐ つ旦)~~ ＼
ミ；ﾟДﾟ彡＜ 反対しても、確定されたうんですか？
ﾐ つ旦)~~ ＼
343 ： ：03/06/09 03:17
社長が「イナズマンＦ」が好きだった説。
デザイナーが（藁
345 ：デフォルトの名無しさん：03/06/09 09:50
Demoのリソースアイコンが旧バージョンのままなのは開発チームのささやかな抵抗でつか？
346 ：Dale Fuller：03/06/09 11:50
347 ：デフォルトの名無しさん：03/06/13 00:10
?|尚
348 ：デフォルトの名無しさん：03/06/14 18:04
イナズママフラー はためかせ
悪の軍団 デスパーを
倒すぞ正義の イナズマン
飛べ行け 電光移動
イナズマン念力 光切り
強力招来 超力招来
逆転パンチ
悪の軍団 デスパーを
倒すぞ正義の イナズマン
飛べ行け 電光移動
イナズマン念力 光切り
強力招来 超力招来
逆転パンチ
ただいまサナギマンとして、我慢してる最中ですので、
あまりイジメないでください。
あまりイジメないでください。
350 ：デフォルトの名無しさん：03/06/15 13:42
HSPスレから誘導されてきましたけど。
以後ここが『ＨＳＰの質問はここで白！！！part２』でいいですか？
以後ここが『ＨＳＰの質問はここで白！！！part２』でいいですか？
351 ：デフォルトの名無しさん：03/06/15 21:43
一人でやってろ。
352 ： ：03/06/16 23:36
>>351
「けんもほろろ」素敵♥
「けんもほろろ」素敵♥
353 ：デフォルトの名無しさん：03/06/22 10:53
今日は published についてのお勉強だ。
まず、 published は コンパイラ指令 {$TYPEINFO ON} か
TComponentのような{$TYPEINFO ON}からの継承でなければ 「単なる publicと同じ」だから注意する事。
例題：
{$TYPEINFO ON}
type TTray=class
private
FHoge
public
procedure SetParam(s: string);
published
property Hoge :Integer read FHoge write FHoge;
end;
procedure TBmpData.SetParam(s:string);
var name,data:string ;
var n:Integer;
begin
n:=AnsiPos('=',s);
if n<=0 then raise Exception.Create(s+'に"="がない');
name := trim(copy(s,1,n-1));
data := copy(s,n+1,High(Integer));
SetPropValue(Self,name,data);
end;
まず、 published は コンパイラ指令 {$TYPEINFO ON} か
TComponentのような{$TYPEINFO ON}からの継承でなければ 「単なる publicと同じ」だから注意する事。
例題：
{$TYPEINFO ON}
type TTray=class
private
FHoge
public
procedure SetParam(s: string);
published
property Hoge :Integer read FHoge write FHoge;
end;
procedure TBmpData.SetParam(s:string);
var name,data:string ;
var n:Integer;
begin
n:=AnsiPos('=',s);
if n<=0 then raise Exception.Create(s+'に"="がない');
name := trim(copy(s,1,n-1));
data := copy(s,n+1,High(Integer));
SetPropValue(Self,name,data);
end;
354 ：デフォルトの名無しさん：03/06/22 11:02
>>353
ちょっと間違えた。
× FHoge
○ FHoge:Integer;
× procedure TBmpData.SetParam(s:string);
○ procedure TTray.SetParam(s:string);
こうして SetParam( 'Hoge=123'); を呼び出せば Hogeに123が代入出来る
SetPropValueのdataはVariantなので文字列で渡しても数字に直してくれるわけだ。
設定ファイルを用意する為にいちいち変数名と設定ファイルでの名前をいちいち定義しなくてもいい。
TTray クラスを継承してプロパティを増やしさえすればいい。
ちょっと間違えた。
× FHoge
○ FHoge:Integer;
× procedure TBmpData.SetParam(s:string);
○ procedure TTray.SetParam(s:string);
こうして SetParam( 'Hoge=123'); を呼び出せば Hogeに123が代入出来る
SetPropValueのdataはVariantなので文字列で渡しても数字に直してくれるわけだ。
設定ファイルを用意する為にいちいち変数名と設定ファイルでの名前をいちいち定義しなくてもいい。
TTray クラスを継承してプロパティを増やしさえすればいい。
355 ：デフォルトの名無しさん：03/06/22 11:29
設定ファイルから読み出すような仕掛けはこれでいい。
逆に保存したい場合、pulished なプロパティ一覧が無ければ魅力は半減だ。
また、自作のスクリプトで利用したいような場合、 SetPropValueは遅い。
事前に全プロパティのアドレスやアクセスメソッドを列挙しておく必要がある。
こういう時は TypInfo を眺めてみよう。 探し物はすぐに見つかるだろう。
function GetPropList(AObject: TObject; out PropList: PPropList): Integer;
説明の必要もないだろうが利用する時はこんな感じだ
var PropList: PPropList;
var i,siz:Integer;
begin
siz:=GetPropList(Self, PropList);
for i:=0 to siz-1 do
Memo1.Lines.Add( (PropList^)[i]^.name );
どういう型であるかを知るには
PropList^)[i]^.PropType^^.Kind
これで型を知った後、例えばIntegeの値を得るには
GetOrdProp(object , (PropList^)[i]^ )
を呼び出すだけだ。
逆に保存したい場合、pulished なプロパティ一覧が無ければ魅力は半減だ。
また、自作のスクリプトで利用したいような場合、 SetPropValueは遅い。
事前に全プロパティのアドレスやアクセスメソッドを列挙しておく必要がある。
こういう時は TypInfo を眺めてみよう。 探し物はすぐに見つかるだろう。
function GetPropList(AObject: TObject; out PropList: PPropList): Integer;
説明の必要もないだろうが利用する時はこんな感じだ
var PropList: PPropList;
var i,siz:Integer;
begin
siz:=GetPropList(Self, PropList);
for i:=0 to siz-1 do
Memo1.Lines.Add( (PropList^)[i]^.name );
どういう型であるかを知るには
PropList^)[i]^.PropType^^.Kind
これで型を知った後、例えばIntegeの値を得るには
GetOrdProp(object , (PropList^)[i]^ )
を呼び出すだけだ。
356 ：デフォルトの名無しさん：03/06/22 23:06
>>353-355
どうしました？急に。
どうしました？急に。
357 ：デフォルトの名無しさん：03/06/23 20:55
PropType^^
なんだろこれ、ニコニコしてんの？
なんだろこれ、ニコニコしてんの？
358 ：デフォルトの名無しさん：03/06/23 22:18
>>357
PropType: PPTypeInfo;
PPTypeInfo = ^PTypeInfo;
PTypeInfo = ^TTypeInfo;
TTypeInfo = record Kind: TTypeKind; ・・
という事で、ポインタポインタの参照の参照
PropType: PPTypeInfo;
PPTypeInfo = ^PTypeInfo;
PTypeInfo = ^TTypeInfo;
TTypeInfo = record Kind: TTypeKind; ・・
という事で、ポインタポインタの参照の参照
359 ： ：03/06/23 23:11
>>353-355
これがわかればCを使ってるんだが、、、
これがわかればCを使ってるんだが、、、
361 ：デフォルトの名無しさん：03/06/24 06:24
362 ：●使ってみたかったんだ。。。：03/06/24 08:11
>>361
いや、だからポインタ理解しきれてないんだよん。
頭悪いのでぱっと見て理解しづらいのは生理的にいやなだけ。
なので>>360は
これが「ぱっと見ただけで」わかればCを使ってるんだが、、、
に訂正すまつ。
いや、だからポインタ理解しきれてないんだよん。
頭悪いのでぱっと見て理解しづらいのは生理的にいやなだけ。
なので>>360は
これが「ぱっと見ただけで」わかればCを使ってるんだが、、、
に訂正すまつ。
363 ：デフォルトの名無しさん：03/06/24 08:15
>>360
残念だけどC では published は無い C# なら可能。
しかも名前がウニコードだから日本語でも使えてとても美味しい。
・・・筈だけど・・・あれは中間言語方式だからこの手のテクニック使うと
移植先で重いかもしれんし、どうも躊躇してしまうな。
残念だけどC では published は無い C# なら可能。
しかも名前がウニコードだから日本語でも使えてとても美味しい。
・・・筈だけど・・・あれは中間言語方式だからこの手のテクニック使うと
移植先で重いかもしれんし、どうも躊躇してしまうな。
364 ：デフォルトの名無しさん：03/06/24 08:18
366 ：デフォルトの名無しさん：03/06/24 10:54
367 ：デフォルトの名無しさん：03/06/24 11:14
368 ：デフォルトの名無しさん：03/06/24 16:53
> 日本語の識別子
プログラマ以外がいじる個所
英語があたりまえだと思っているのは、プログラマぐらいだ
プログラマ以外がいじる個所
英語があたりまえだと思っているのは、プログラマぐらいだ
369 ：デフォルトの名無しさん：03/06/25 09:56
370 ：デフォルトの名無しさん：03/06/25 10:32
XMLのタグ名とか
371 ：デフォルトの名無しさん：03/06/26 09:07
わからん。
テキスト状態の XML をプログラマ以外が目にする状況が想像できない。
それに、そんなところを固有の言語の文字列にしたらローカライズどうするの？
テキスト状態の XML をプログラマ以外が目にする状況が想像できない。
それに、そんなところを固有の言語の文字列にしたらローカライズどうするの？
372 ：デフォルトの名無しさん：03/06/26 09:25
Delphiのポインタ規則は比較的簡単だと思うんだけどなあ
TTypeInfo = record Kind: //TTypeKind; TTypeInfo 型には Kind というメンバーがある
PTypeInfo = ^TTypeInfo; //PTypeInfo型は TTypeInfo 型の場所を覚える型
PPTypeInfo = ^PTypeInfo; //PPTypeInfo型は PTypeInfo 型の場所を覚える型
だから PPTypeInfo 型の PropType メンバから Kind メンバを求める為には
PropType^^.Kind とやれば良い。
使う分にはこの規則さえ知っていれば使えるわけで、使って覚えるって感じでいいんじゃないの？
TTypeInfo = record Kind: //TTypeKind; TTypeInfo 型には Kind というメンバーがある
PTypeInfo = ^TTypeInfo; //PTypeInfo型は TTypeInfo 型の場所を覚える型
PPTypeInfo = ^PTypeInfo; //PPTypeInfo型は PTypeInfo 型の場所を覚える型
だから PPTypeInfo 型の PropType メンバから Kind メンバを求める為には
PropType^^.Kind とやれば良い。
使う分にはこの規則さえ知っていれば使えるわけで、使って覚えるって感じでいいんじゃないの？
373 ：デフォルトの名無しさん：03/06/26 10:09
Cやっていると逆に混乱すると思われる。
374 ：デフォルトの名無しさん：03/06/26 10:33
>>371
プログラマ以外がかかわる類のものを想像できないのですか？
プログラマ以外がかかわる類のものを想像できないのですか？
375 ：デフォルトの名無しさん：03/06/26 21:49
>>374
想像力が欠如してるのは認めるから、具体例を挙げてもらえないかな？
想像力が欠如してるのは認めるから、具体例を挙げてもらえないかな？
376 ：デフォルトの名無しさん：03/06/26 23:58
（＾＾．
377 ：デフォルトの名無しさん：03/06/27 06:12
アホはほっとけ。
378 ：デフォルトの名無しさん：03/06/27 18:36
（Type^^.Kind）
379 ： ：03/06/27 23:20
（＾＾；
380 ：デフォルトの名無しさん：03/06/28 05:29
だからアホはほっとけって
381 ：デフォルトの名無しさん：03/07/05 22:09
Delphi.NETはもうだめだろ。
382 ：デフォルトの名無しさん：03/07/07 00:57
C++Builder.NETはないんかい？
383 ：デフォルトの名無しさん：03/07/07 02:49
つーかボーランド自体がもうだめ。
384 ：デフォルトの名無しさん：03/07/07 02:58
385 ：デフォルトの名無しさん：03/07/08 22:15
C#Builder導入支援キャンペーン
http://store.borland.co.jp/upgrade/csharpbuilder_cmp.html
http://store.borland.co.jp/upgrade/csharpbuilder_cmp.html
386 ：デフォルトの名無しさん：03/07/09 19:49
（Type^^.Kind）
387 ：デフォルトの名無しさん：03/07/09 23:28
（＾＾；
388 ：デフォルトの名無しさん：03/07/09 23:33
Delphi-MLで見かけたからJanevaのガイドををみてみたんだが、
Borlandには手に余るデザインのプロダクトだな。
なんで J2EE、.NET、CORBAの下にランタイムを敷かなきゃならんのだ。
Borlandには手に余るデザインのプロダクトだな。
なんで J2EE、.NET、CORBAの下にランタイムを敷かなきゃならんのだ。
389 ：デフォルトの名無しさん：03/07/10 02:55
しったかぶりちゃん
391 ：デフォルトの名無しさん：03/07/11 02:29
☆ ﾁﾝ ﾏﾁｸﾀﾋﾞｰﾚﾀ
ﾏﾁｸﾀﾋﾞｰﾚﾀ
☆ ﾁﾝ 〃 Λ＿Λ ／￣￣￣￣￣￣￣￣￣￣￣￣￣
ヽ ＿＿_＼（＼・∀・）＜ 暴乱堂の倒産まだ～？
＼＿／⊂ ⊂＿ ) ＼＿＿＿＿＿＿＿＿＿＿＿＿＿
／￣￣￣￣￣￣ ／|
|￣￣￣￣￣￣￣| |
| .NETみかん .|／
ﾏﾁｸﾀﾋﾞｰﾚﾀ
☆ ﾁﾝ 〃 Λ＿Λ ／￣￣￣￣￣￣￣￣￣￣￣￣￣
ヽ ＿＿_＼（＼・∀・）＜ 暴乱堂の倒産まだ～？
＼＿／⊂ ⊂＿ ) ＼＿＿＿＿＿＿＿＿＿＿＿＿＿
／￣￣￣￣￣￣ ／|
|￣￣￣￣￣￣￣| |
| .NETみかん .|／
392 ：デフォルトの名無しさん：03/07/11 02:56
>>391
倒産するはずないの。
現金だけで数億円、無借金。MS と喧嘩できるほどのパテントを所有。
株価が $1 切って、丸ごと買収されることはあったとしても倒産だけは無い。
そこらの .com 企業とは違うのだよ
倒産するはずないの。
現金だけで数億円、無借金。MS と喧嘩できるほどのパテントを所有。
株価が $1 切って、丸ごと買収されることはあったとしても倒産だけは無い。
そこらの .com 企業とは違うのだよ
393 ：デフォルトの名無しさん：03/07/11 03:20
風説の流布で株価を操作する事は犯罪です
394 ：デフォルトの名無しさん：03/07/11 03:31
現金数億円では一月の給金にもならない気がするが。
395 ：デフォルトの名無しさん：03/07/11 04:07
>>392
通報しました
通報しました
396 ：デフォルトの名無しさん：03/07/11 07:31
397 ：デフォルトの名無しさん：03/07/11 07:58
>>396
「意味」は「自由に使える資金」を表す言葉なの？
「意味」は「自由に使える資金」を表す言葉なの？
398 ：デフォルトの名無しさん：03/07/11 19:10
彼のお友達の間ではね
399 ：デフォルトの名無しさん：03/07/12 09:29
今日はクラスをクラス名の文字列から作るお勉強だ。
その為にはまず、クラス名を登録しなければいけない。
登録するのはこうだ。
RegisterClass(TForm1);
そして、クラス名からコンポーネントを作成するには、
with TComponentClass(FindClass('TForm1')).Create(Application) as TForm do
begin
Left:=Left+5;
Show;
end;
つまり、FindClass すると、クラス参照型を返してくれるので、そのクラスをコンポーネント参照型に代入してとやる
with TForm(FindClass('TForm1')).Create(Application) do ・・・
とやっても良さそうに思うかな？ これはTFormはクラス型なのでダメだ。
もしやるなら、
with TFormClass(FindClass('TForm1')).Create(Application) do ・・・
こうだけど、TForm1がTFormじゃない場合に困ったことになる事も考えておこう。
さて、FindClass の他に GetClass というのもある。
GetClassはそのクラスが無い時にnilを返す
FindClassはクラスが無ければ例外を出してくれる。
その為にはまず、クラス名を登録しなければいけない。
登録するのはこうだ。
RegisterClass(TForm1);
そして、クラス名からコンポーネントを作成するには、
with TComponentClass(FindClass('TForm1')).Create(Application) as TForm do
begin
Left:=Left+5;
Show;
end;
つまり、FindClass すると、クラス参照型を返してくれるので、そのクラスをコンポーネント参照型に代入してとやる
with TForm(FindClass('TForm1')).Create(Application) do ・・・
とやっても良さそうに思うかな？ これはTFormはクラス型なのでダメだ。
もしやるなら、
with TFormClass(FindClass('TForm1')).Create(Application) do ・・・
こうだけど、TForm1がTFormじゃない場合に困ったことになる事も考えておこう。
さて、FindClass の他に GetClass というのもある。
GetClassはそのクラスが無い時にnilを返す
FindClassはクラスが無ければ例外を出してくれる。
400 ：デフォルトの名無しさん：03/07/12 15:20
>>399
某厨は今C#Builderやっててそれどころじゃないよ。
某厨は今C#Builderやっててそれどころじゃないよ。
401 ：デフォルトの名無しさん：03/07/14 11:44
TForm1がTFormじゃ無い場合があるなんて厨房でもありえない。
相当なクズだ。
相当なクズだ。
402 ：デフォルトの名無しさん：03/07/14 16:45
（Type^^.Kind）
403 ：デフォルトの名無しさん：03/07/14 23:07
（＾＾；
__∧＿∧_
|（ ＾＾ ）| ＜寝るぽ（＾＾）
|＼⌒⌒⌒＼
＼ |⌒⌒⌒~| 山崎渉
~￣￣￣￣
405 ：デフォルトの名無しさん：03/07/15 16:35
>>774
残念だけどDelphiは１パスの高速コンパイラがウリなんで、
2パスになるような事はやりません。 つまり、アセンブラソースは吐けません。
ただ、DCU32INTを使うと DCUから逆アセファイルが・・・・
残念だけどDelphiは１パスの高速コンパイラがウリなんで、
2パスになるような事はやりません。 つまり、アセンブラソースは吐けません。
ただ、DCU32INTを使うと DCUから逆アセファイルが・・・・
>>775
ありがとうございました
ありがとうございました
407 ：775：03/07/17 01:28
人
（＿_） うんこ食え
（＿＿）
(・ω・)つ（ ）
￣￣￣
（＿_） うんこ食え
（＿＿）
(・ω・)つ（ ）
￣￣￣
408 ：デフォルトの名無しさん：03/07/17 04:11
>>407
ﾜﾛﾀ
ﾜﾛﾀ
409 ：デフォルトの名無しさん：03/07/18 23:36
>>408
ﾜﾛﾜﾅｲ
ﾜﾛﾜﾅｲ
（＾＾）
411 ：デフォルトの名無しさん：03/08/14 08:00
保守
412 ：マリーナの夏：03/08/14 10:03
413 ：デフォルトの名無しさん：03/08/14 11:49
お前はもう氏んでいる
414 ： ：03/08/14 23:12
415 ：デフォルトの名無しさん：03/08/14 23:14
まともな開発者の大半はC#に移行してしまって
残ったDel厨は真性のカスばっかだな。
残ったDel厨は真性のカスばっかだな。
416 ：デフォルトの名無しさん：03/08/15 00:00
>まともな開発者の大半はC#に移行してしまって
真性デムパ
真性デムパ
417 ：↑：03/08/15 09:35
オマエガナー
418 ：デフォルトの名無しさん：03/08/15 15:06
C#で何書くんだ？
(⌒V⌒)
│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
⊂| |つ
（＿）（＿） 山崎パン
│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
⊂| |つ
（＿）（＿） 山崎パン
420 ：デフォルトの名無しさん：03/08/15 17:56
421 ：デフォルトの名無しさん：03/08/15 19:13
agegdfdsfsf
422 ：デフォルトの名無しさん：03/08/15 22:14
ところでDelphi6にRTLアップデートかましたら
dfmファイルがShiftJISで保存されなくなってしまった。
レジストリのFileFormat->DFMFormatの値はちゃんと0なのに！
ダウンデートするしかないのでしょうか？
dfmファイルがShiftJISで保存されなくなってしまった。
レジストリのFileFormat->DFMFormatの値はちゃんと0なのに！
ダウンデートするしかないのでしょうか？
423 ：|Д・彡 ◆A6VzDeLphI ：03/08/15 23:05
>>422、ある意味Yes.
こんなんを、DelphiIDEのツールから呼び出すと
http://homepage1.nifty.com/wizman/app/bt5/index.html
不幸の中にも少しのよかったが見つかります。
[Delphi:73074] dfm の保存形式について
このスレにもそういうツールが載ってるよ。
こんなんを、DelphiIDEのツールから呼び出すと
http://homepage1.nifty.com/wizman/app/bt5/index.html
不幸の中にも少しのよかったが見つかります。
[Delphi:73074] dfm の保存形式について
このスレにもそういうツールが載ってるよ。
424 ：デフォルトの名無しさん：03/08/15 23:23
めでたしめでたし
427 ：デフォルトの名無しさん：03/08/25 22:33
めでたくねーよ
428 ：デフォルトの名無しさん：03/09/02 20:28
（Type^^.Kind）
429 ：デフォルトの名無しさん：03/09/03 23:16
（＾＾；
430 ：デフォルトの名無しさん：03/09/07 10:11
今日は absolute のお勉強だ。
procedure TForm1.Button1Click(Sender: TObject);
procedure t1(x:Integer);
var h1:smallint absolute x ;
var h2:Cardinal absolute x ;
begin
Caption:=Format('%8x %8x %8x',[h1,h2,x]);
end;
begin
t1($12345678);
end;
absolute を使うと、変数に別名を与えられる。 別の型でも良い。
C言語でいうunionのような効果があるわけだ。
この absoluteはこういう計算ではあまり意味がないが、 ポインタ演算では非常に強力だ
ポインタ演算はC言語が柔軟なように思われているが、Delphiでは absoluteを使いこなせば
C言語並に柔軟な表現が出来る。
procedure TForm1.Button1Click(Sender: TObject);
procedure t1(x:Integer);
var h1:smallint absolute x ;
var h2:Cardinal absolute x ;
begin
Caption:=Format('%8x %8x %8x',[h1,h2,x]);
end;
begin
t1($12345678);
end;
absolute を使うと、変数に別名を与えられる。 別の型でも良い。
C言語でいうunionのような効果があるわけだ。
この absoluteはこういう計算ではあまり意味がないが、 ポインタ演算では非常に強力だ
ポインタ演算はC言語が柔軟なように思われているが、Delphiでは absoluteを使いこなせば
C言語並に柔軟な表現が出来る。
431 ：デフォルトの名無しさん：03/09/07 10:26
C言語のようにポインタを渡して配列のようにアクセスする事はDelphiでは出来ない。
そういう場合はこうする。
procedure TForm1.Button1Click(Sender: TObject);
procedure t2(var x:Char);
type TLRRec = record
L,R:SmallInt;
end;
type TWavRec = array[word] of TLRRec;
var Data:TWavRec absolute x;
begin
Caption:=Format('%8x %8x',[data[0].L,data[0].R]);
end;
begin
t2(PCHAR('test')^);
end;
ここでポイントは、
１、var x:Char と引数を定義する事 これで参照渡しとなる
２、abosolute で 参照渡の引数の別名を指定する事
そういう場合はこうする。
procedure TForm1.Button1Click(Sender: TObject);
procedure t2(var x:Char);
type TLRRec = record
L,R:SmallInt;
end;
type TWavRec = array[word] of TLRRec;
var Data:TWavRec absolute x;
begin
Caption:=Format('%8x %8x',[data[0].L,data[0].R]);
end;
begin
t2(PCHAR('test')^);
end;
ここでポイントは、
１、var x:Char と引数を定義する事 これで参照渡しとなる
２、abosolute で 参照渡の引数の別名を指定する事
432 ：デフォルトの名無しさん：03/09/07 23:43
>C言語のようにポインタを渡して配列のようにアクセスする事はDelphiでは出来ない。
そなの？ 配列の型へのポインタにキャストするだけでいいんじゃ？
そなの？ 配列の型へのポインタにキャストするだけでいいんじゃ？
433 ：デフォルトの名無しさん：03/09/08 00:06
マンセー マンセー マンセー マンセー ｗ
434 ：デフォルトの名無しさん：03/09/08 07:10
435 ：デフォルトの名無しさん：03/09/08 09:09
>>434
だから、配列の型へのポインタにキャストするだけでいいんじゃないの？
だから、配列の型へのポインタにキャストするだけでいいんじゃないの？
436 ：デフォルトの名無しさん：03/09/08 09:13
>>435
それは
type AByte= array[WORD] of byte;
var P:AByte;
として P^[1] ってアクセスするって事でしょ？ ^ を使えば可能という意味じゃ可能だけどね。
それは
type AByte= array[WORD] of byte;
var P:AByte;
として P^[1] ってアクセスするって事でしょ？ ^ を使えば可能という意味じゃ可能だけどね。
437 ：デフォルトの名無しさん：03/09/08 10:37
>^ を使えば可能という意味じゃ可能だけどね。
逆参照を使っちゃいけない理由でもあるの？
逆参照を使っちゃいけない理由でもあるの？
438 ：デフォルトの名無しさん：03/09/08 10:43
>>437
誰もいってないでしょ。
>>432単独なら正しい話だけど、 レスしてるのが>>431だと思ったから
>>431の言ってるC言語のようにとは >>431のリストのような事を言ってるんだろという事さ
普通はあんなややこしい書き方はしないでポインタをそのまま配列ポインタで扱えばいいといいたいなら同意だけどね。
誰もいってないでしょ。
>>432単独なら正しい話だけど、 レスしてるのが>>431だと思ったから
>>431の言ってるC言語のようにとは >>431のリストのような事を言ってるんだろという事さ
普通はあんなややこしい書き方はしないでポインタをそのまま配列ポインタで扱えばいいといいたいなら同意だけどね。
439 ：デフォルトの名無しさん：03/09/08 11:15
> ポインタをそのまま配列ポインタで扱えばいいといいたいなら同意だけどね。
御意。
>C言語のようにポインタを渡して配列のようにアクセスする事はDelphiでは出来ない。
この前提が間違い
御意。
>C言語のようにポインタを渡して配列のようにアクセスする事はDelphiでは出来ない。
この前提が間違い
俺もそうおもうよ
441 ：デフォルトの名無しさん：03/09/09 19:46
× マンセー
○ マンセぃー
○ マンセぃー
442 ： ：03/09/09 23:04
× マンセぃー
○ 万世
○ 万世
443 ：デフォルトの名無しさん：03/09/09 23:05
万歳だろ
444 ：デフォルトの名無しさん：03/09/10 00:24
>>443
ちっ…ちまたで噂の「空気の読めない方」ですか！？
ちっ…ちまたで噂の「空気の読めない方」ですか！？
445 ：デフォルトの名無しさん：03/09/10 00:25
>>444
ちっ…ちまたで噂の「糞スレageちゃう方」ですか！？
ちっ…ちまたで噂の「糞スレageちゃう方」ですか！？
謎の急浮上！
448 ：デフォルトの名無しさん：03/09/25 21:31
BOF問題でマンセー度もさがったか。
謎の急浮上！
450 ：デフォルトの名無しさん：03/09/26 11:25
（Type^^.Kind）
451 ：デフォルトの名無しさん：03/09/26 22:07
http://memo.st.ryukoku.ac.jp/archive/200309.month/6508.html
Delphiにはとんでもないセキュリティホールが隠されていたそうです。
Del厨はこんなものをマンセーしていたのかよｗ
やはりネイティブコードは駆逐されるべきだな。
Delphiにはとんでもないセキュリティホールが隠されていたそうです。
Del厨はこんなものをマンセーしていたのかよｗ
やはりネイティブコードは駆逐されるべきだな。
452 ：デフォルトの名無しさん：03/09/26 23:43
453 ：デフォルトの名無しさん：03/09/26 23:55
危険だなこれ。
Delphi は Borland の提供する Windows アプリケーションの統合開発環境です。
Delphi に付属するクラスライブラリ VCL に含まれる
TComboBox (コンボボックスを抽象化したクラス)
TListBox (リストボックスを抽象化したクラス)
TToolBar (ツールバーを抽象化したクラス)
TListView (リストビューを抽象化したクラス)
の各クラスにはバッファオーバーフローを引き起こすバグがあることがわかり
ました。
このバッファオーバーフローにより Delphi によって作成されたアプリケーシ
ョンには、任意のコードが実行可能なセキュリティホールが存在し得ます。
Delphi は Borland の提供する Windows アプリケーションの統合開発環境です。
Delphi に付属するクラスライブラリ VCL に含まれる
TComboBox (コンボボックスを抽象化したクラス)
TListBox (リストボックスを抽象化したクラス)
TToolBar (ツールバーを抽象化したクラス)
TListView (リストビューを抽象化したクラス)
の各クラスにはバッファオーバーフローを引き起こすバグがあることがわかり
ました。
このバッファオーバーフローにより Delphi によって作成されたアプリケーシ
ョンには、任意のコードが実行可能なセキュリティホールが存在し得ます。
454 ：デフォルトの名無しさん：03/09/27 00:20
ヘジたんが書いたコードかこれ？
じゃC#や.NETもやばいかも。
じゃC#や.NETもやばいかも。
455 ：デフォルトの名無しさん：03/09/27 00:24
456 ：デフォルトの名無しさん：03/09/27 00:31
ネットワークから取得したデータを直にリストボックスの文字列に流し込んでる
奴とかかな？
サーバーのサービスプロセスとかじゃリストボックス使うなんてありえねえし。
奴とかかな？
サーバーのサービスプロセスとかじゃリストボックス使うなんてありえねえし。
457 ：デフォルトの名無しさん：03/09/27 00:35
WindowsAPIで今回のCB_GETLBTEXTメッセージみたいに
バッファサイズの指定が無いのはヤバイっつー事だな。
バッファサイズの指定が無いのはヤバイっつー事だな。
458 ：デフォルトの名無しさん：03/09/27 10:12
しかし、今回の件で色々勉強したよ。 これはC#じゃ経験出来ない勉強だね。 Delphiマンセー
459 ：デフォルトの名無しさん：03/09/27 10:15
C# にもあるんだが。
460 ：デフォルトの名無しさん：03/09/27 10:17
461 ：デフォルトの名無しさん：03/09/27 13:15
462 ：デフォルトの名無しさん：03/09/27 13:43
なんでパッチが必要なの？
Personal だから？
Personal だから？
謎の急浮上！
464 ：デフォルトの名無しさん：03/09/28 07:38
パッチは要らないだろう。
ようするにコントロールのItemには行数制限をしてから設定するようにすればいいだけ。
ようするにコントロールのItemには行数制限をしてから設定するようにすればいいだけ。
465 ：デフォルトの名無しさん：03/09/28 10:13
今日は バッファオーバーフロー のお勉強だ。
Delphiでこういうスタイルのコードを書く人はあまりいないだろうがCでは 文字列ではなく
ポインタを使って文字をやりとりする事が多い。
procedure hoge(p:PChar);
var buf:array [0..3] of char;
var i:Integer;
begin
i:=0;
while p^<>#0 do begin buf[i]:=p^;inc(p);inc(i);end;
end;
良くないコードだが、必ず４文字以下の文字しか渡さないという条件ならでなら悪くはない。
シンプルだし、高速に動く。さて、このコードがどうコンパイルされるか見てみよう。
1: PUSH ECX ;これで buf の4byteの領域を確保している
2: XOR EDX,EDX
3: JMP +5; (7行目に分岐)
4: MOV BYTE PTR [ESP+EDX{i}],CL ;buf[i]:=p^
5: INC EAX{p}
6: INC EDX{i}
7: MOV CL,BYTE PTR [EAX{p}] p^
8: TEST CL,CL p^<>#0
9: JNE -11; (4行目に分岐)
10: POP EDX ;これで buf の4byteの領域を開放
11: RET NEAR ;呼び出し元へ帰る
Delphiでこういうスタイルのコードを書く人はあまりいないだろうがCでは 文字列ではなく
ポインタを使って文字をやりとりする事が多い。
procedure hoge(p:PChar);
var buf:array [0..3] of char;
var i:Integer;
begin
i:=0;
while p^<>#0 do begin buf[i]:=p^;inc(p);inc(i);end;
end;
良くないコードだが、必ず４文字以下の文字しか渡さないという条件ならでなら悪くはない。
シンプルだし、高速に動く。さて、このコードがどうコンパイルされるか見てみよう。
1: PUSH ECX ;これで buf の4byteの領域を確保している
2: XOR EDX,EDX
3: JMP +5; (7行目に分岐)
4: MOV BYTE PTR [ESP+EDX{i}],CL ;buf[i]:=p^
5: INC EAX{p}
6: INC EDX{i}
7: MOV CL,BYTE PTR [EAX{p}] p^
8: TEST CL,CL p^<>#0
9: JNE -11; (4行目に分岐)
10: POP EDX ;これで buf の4byteの領域を開放
11: RET NEAR ;呼び出し元へ帰る
466 ：デフォルトの名無しさん：03/09/28 10:17
解放(^_^;)
467 ：デフォルトの名無しさん：03/09/28 10:22
ここで、ローカル変数のうち buf はスタック上に、i はレジスタに割り当てられている。
スタック上は結局
sp buf[0..3]
sp+4 帰り番地
が構成されている。
ここで、もし hoge('1234ABCD'); と、この関数が呼ばれたらどうなるだろうか？
このコードには、bufのサイズを考慮していないため、
sp+0 '1'
sp+1 '2'
sp+2 '3'
sp+3 '4'
sp+4 'A' #$41
sp+5 'B' #$42
sp+6 'C' #$43
sp+7 'D' #$44
となる。 sp+4～sp+7は帰り番地であるため、アセンブラのRET命令を実行すると
RET命令により44434241番地に分岐する事になる。 ここはたぶんメモリを確保していない
領域だろうから、メモリ保護例外が出る事になる。
スタック上は結局
sp buf[0..3]
sp+4 帰り番地
が構成されている。
ここで、もし hoge('1234ABCD'); と、この関数が呼ばれたらどうなるだろうか？
このコードには、bufのサイズを考慮していないため、
sp+0 '1'
sp+1 '2'
sp+2 '3'
sp+3 '4'
sp+4 'A' #$41
sp+5 'B' #$42
sp+6 'C' #$43
sp+7 'D' #$44
となる。 sp+4～sp+7は帰り番地であるため、アセンブラのRET命令を実行すると
RET命令により44434241番地に分岐する事になる。 ここはたぶんメモリを確保していない
領域だろうから、メモリ保護例外が出る事になる。
468 ：デフォルトの名無しさん：03/09/28 10:44
さて、保護例外が出るだけなら、そう大ききな問題ではない。
好きな番地に分岐させられたとしても、その分岐先が意味のないコードなら、やはりそう大きな問題ではない。
これを使って外部のパソコンから任意のプログラムが実行されてしまうとなると、これは大ききな問題だ。
どうして、任意のプログラムが実行されてしまうのだろうか？
まず、実行ファイルは 指定された場所が空いていれば常にそのアドレスにロードされる。
そのアドレスは プロジェクト->オプション->リンカタブ->メモリサイズ枠->イメージアドレス で指定される。
そして、スタックポインタも常に同じ場所からスタートする。
だから、この手続きが呼ばれる時のアドレス関係はは他のパソコンでも同じという事になる。
プログラムを解析されれば、絶対番地はどのパソコンでも通用する情報となってしまうという事だ。
さらに、Windowsはフラットメモリモデルを採用している。 だから、メモリ空間が読み取り可能であるならどこで
も実行出来てしまう。 それはデータ領域でも、スタック領域でもだ。
この結果、好きな番地に分岐させられるなら、文字列にコードを埋め込むなりして、任意のプログラムが実行
出来てしまうわけだ。
好きな番地に分岐させられたとしても、その分岐先が意味のないコードなら、やはりそう大きな問題ではない。
これを使って外部のパソコンから任意のプログラムが実行されてしまうとなると、これは大ききな問題だ。
どうして、任意のプログラムが実行されてしまうのだろうか？
まず、実行ファイルは 指定された場所が空いていれば常にそのアドレスにロードされる。
そのアドレスは プロジェクト->オプション->リンカタブ->メモリサイズ枠->イメージアドレス で指定される。
そして、スタックポインタも常に同じ場所からスタートする。
だから、この手続きが呼ばれる時のアドレス関係はは他のパソコンでも同じという事になる。
プログラムを解析されれば、絶対番地はどのパソコンでも通用する情報となってしまうという事だ。
さらに、Windowsはフラットメモリモデルを採用している。 だから、メモリ空間が読み取り可能であるならどこで
も実行出来てしまう。 それはデータ領域でも、スタック領域でもだ。
この結果、好きな番地に分岐させられるなら、文字列にコードを埋め込むなりして、任意のプログラムが実行
出来てしまうわけだ。
469 ：デフォルトの名無しさん：03/09/28 23:55
わけだ
470 ：デフォルトの名無しさん：03/09/30 15:31
471 ：デフォルトの名無しさん：03/10/03 23:27
バッファオーバーフローマンセー
472 ：デフォルトの名無しさん：03/10/04 21:07
type TSavePos1=record
Rect:TRect; //位置情報
obj :TControl;//コンポーネントへの参照
end;
type TSaveControls=record
FormRect:TRect;//フォームのサイズ
Saves :array of TSavePos1;
end;
function SaveControlPos(form:TWinControl):TSaveControls;
var i:Integer;
begin
Result.FormRect:=form.ClientRect;
SetLength(Result.Saves,form.ControlCount);
for i:=0 to form.ControlCount-1 do with Result.Saves[i] do begin
obj :=form.Controls[i]; Rect :=obj.BoundsRect ;
end;
end;
procedure SaveControlRePos(form:TWinControl;const datas:TSaveControls);
var i:Integer; var ax,ay:double;
begin
with datas.FormRect do begin
ax:= form.Width / ( Right -Left ) ; ay:= form.Height / ( Bottom-Top ) ;
end;
for i:=0 to form.ControlCount-1 do
with datas.Saves[i] do
if obj.Parent=form then begin
obj.Left :=round(ax* Rect.Left);
obj.Width :=round(ax*(Rect.Right-Rect.Left) );
obj.Top :=round(ax*(Rect.Top ));
obj.Height:=round(ax*(Rect.Bottom-Rect.Top));
end;
end;
Rect:TRect; //位置情報
obj :TControl;//コンポーネントへの参照
end;
type TSaveControls=record
FormRect:TRect;//フォームのサイズ
Saves :array of TSavePos1;
end;
function SaveControlPos(form:TWinControl):TSaveControls;
var i:Integer;
begin
Result.FormRect:=form.ClientRect;
SetLength(Result.Saves,form.ControlCount);
for i:=0 to form.ControlCount-1 do with Result.Saves[i] do begin
obj :=form.Controls[i]; Rect :=obj.BoundsRect ;
end;
end;
procedure SaveControlRePos(form:TWinControl;const datas:TSaveControls);
var i:Integer; var ax,ay:double;
begin
with datas.FormRect do begin
ax:= form.Width / ( Right -Left ) ; ay:= form.Height / ( Bottom-Top ) ;
end;
for i:=0 to form.ControlCount-1 do
with datas.Saves[i] do
if obj.Parent=form then begin
obj.Left :=round(ax* Rect.Left);
obj.Width :=round(ax*(Rect.Right-Rect.Left) );
obj.Top :=round(ax*(Rect.Top ));
obj.Height:=round(ax*(Rect.Bottom-Rect.Top));
end;
end;
>>472の使い方
var SaveControls:TSaveControls; //これはフォームのメンバーにおいて
procedure TForm1.FormCreate(Sender: TObject);
begin
SaveControls:=SaveControlPos(Self);
end;
procedure TForm1.FormResize(Sender: TObject);
begin
SaveControlRePos(Self, SaveControls);
end;
var SaveControls:TSaveControls; //これはフォームのメンバーにおいて
procedure TForm1.FormCreate(Sender: TObject);
begin
SaveControls:=SaveControlPos(Self);
end;
procedure TForm1.FormResize(Sender: TObject);
begin
SaveControlRePos(Self, SaveControls);
end;
475 ：デフォルトの名無しさん：03/11/01 23:20
476 ： ：03/11/03 23:33
Mac、逆・マンセー。
477 ：デフォルトの名無しさん：03/11/04 10:45
ひょっとして、Delphi8って.NETのコードしか吐けなくなるんですか？
478 ：デフォルトの名無しさん：03/11/04 16:51
>>477
いまのところ知られている情報ではそのとおり｡
>>478
これは、｢MacOS版Delphiが出る」のではなく、｢Borlandに『出してくれ』
とお願いするための署名運動｣だよ｡
petitionの意味は､陳情､嘆願するという意味｡
いまのところ出そうな雰囲気はない｡
出るとしたら､MacOSX用の.NET Frameworkが開発されるか､Qt-CLXを
Delphi用にコンバートしたときになると思う｡後者の可能性はBorland社
幹部が数年前に言及したことがあるので､もしかするとあり得るのかも知れないけど
MacOSXのシェアとか、JBuilder for MaxOSXの現在の売れ行きを考えると
よほどのことがない限り作られないだろうし､仮に出たとしても１年以上あと
になるだろうね｡
MacOSもVBのようなRAD環境がほとんどなかったことがWindowsの後塵を拝した
ひとつの原因だったと思うのだが（RBは話にならない）｡
いまのところ知られている情報ではそのとおり｡
>>478
これは、｢MacOS版Delphiが出る」のではなく、｢Borlandに『出してくれ』
とお願いするための署名運動｣だよ｡
petitionの意味は､陳情､嘆願するという意味｡
いまのところ出そうな雰囲気はない｡
出るとしたら､MacOSX用の.NET Frameworkが開発されるか､Qt-CLXを
Delphi用にコンバートしたときになると思う｡後者の可能性はBorland社
幹部が数年前に言及したことがあるので､もしかするとあり得るのかも知れないけど
MacOSXのシェアとか、JBuilder for MaxOSXの現在の売れ行きを考えると
よほどのことがない限り作られないだろうし､仮に出たとしても１年以上あと
になるだろうね｡
MacOSもVBのようなRAD環境がほとんどなかったことがWindowsの後塵を拝した
ひとつの原因だったと思うのだが（RBは話にならない）｡
480 ：デフォルトの名無しさん：03/11/04 17:58
481 ：478：03/11/05 03:01
482 ：デフォルトの名無しさん：03/11/05 03:29
なんでマカーは自分でつくろうとは思わんのだ
ﾏｶｰはﾊﾞｶｰだから。
484 ：Macは糞も同感ですが：03/11/14 00:18
「マンセー」？？バカじゃないの？あんた。
485 ：Macは糞も同感ですがの詳細：03/11/14 00:28
486 ：デフォルトの名無しさん：03/11/14 04:42
2ch で、そんなにマジれすするなよ...
もっと有意義な時間の使い方を考えなさいな。
もっと有意義な時間の使い方を考えなさいな。
おまえがな
488 ：デフォルトの名無しさん：03/12/13 01:06
オレがな←
489 ：デフォルトの名無しさん：03/12/13 02:21
MacOSXへのリプレースが進めば何の問題も無いだろ。
CBuilderXでwxWindowsが使えるんなら、
wx用のダイアログエディターはあるんだし、
WideStudioも動作するそうだ。
Macの9以前は癌細胞だな。
問題は頑固な9や8のユーザーをすんなりXに移行させることだろうけど。
CBuilderXでwxWindowsが使えるんなら、
wx用のダイアログエディターはあるんだし、
WideStudioも動作するそうだ。
Macの9以前は癌細胞だな。
問題は頑固な9や8のユーザーをすんなりXに移行させることだろうけど。
490 ： ：03/12/13 23:11
Macは何もかもゴミ。
491 ：デフォルトの名無しさん：03/12/14 15:08
ドウモ～～～ッ！！お～ｏ（´･∀･｀）ｏは～♪ハジメマシテ～～～ッ☆☆（´･∀･｀）
私は??歳の胴無ししてるのぉ～～～っ♪（´･∀･｀）ｳﾌﾌﾌ
うーんとー、私胴無し仲間がすっごくすっごく欲しくってー、＼（´･∀･｀）／
探してたら(´･∀･｀)なんσ（´･∀･｀）とっ！☆彡(ノ´･∀･｀）ノ☆彡ヘ（´･∀･｀ヘ)☆彡(ノ´･∀･｀）ノ☆彡
素敵∑(´･∀･｀ハウッ！な胴有り♪を発見！！！！（´･∀･｀）//""" パチパチパチ
肉袋∑(´･∀･｀ハウッ！とか…{{ (´･∀･｀) }} ブルブルすごい数の内臓がありますけど、
これ全部１つの胴に収まって ＼(´･∀･｀)／ いるんですか？（´･∀･｀）ひどすぎ …
てなわけで、ついついσ(´･∀･｀)蹴っちゃったＣ= Ｃ= Ｃ= Ｃ=┌（´･∀･｀）┘ のらー(´･∀･｀) エヘヘφ(´･∀･｀)φキックキック♪
胴無しに、なってσ(´･∀･｀)くれるよねっ。(´･∀･｀) お ね が い♪(´･3･｀)ちゅ♪ッ
え？くれないのぉ～？（´･∀･｀）)そんなのいやい♪（´･∀･｀）キャハ や～～、ｶﾞ━━━（´･∀･｀）━━━ﾝ
なってくれなかったら、（´･∀）_乂（∀･｀） 勝負！ ＼（´･∀･｀）／
☆⊂（´･∀･｀） きーっく、☆（~~~~~~(⊂（´･∀･｀） バ シ ュ ウ ウ ウ ウ ウ ウ!!♪（´･∀･｀）キャハ（´･∀･｀）⊃)~~~~~~)･;'キーック
（´･∀･｀） いてっ！ダメ!! ゛o(´･∀･｀)oo(´･∀･｀)o″ダメ!! ~~~~~~
(´･∀･｀)きゃ～～(´･∀･｀)失敗した～～(゜∀｡) ドテッ ガ━━（´･∀･｀;）━━ン！
(´･∀･｀) 反省中。。。｡･ﾟﾟ･o(´･∀･｀)o･ﾟﾟ･｡うぇぇん <(´･∀･｀;)>ノォオオオオオ!! ∑(´･∀･｀；ハウッ！
なあんて（´･∀･｀）こんな♪（´･∀･｀）ｳﾌﾌﾌ 私っ！σ(´･∀･｀)だけど、（´･∀･｀）
胴無しσ(´･∀･｀)になってm(´･∀･｀)mくださいませませ♪(´･∀･｀)フフ ﾄﾞｶﾞ━━━Σ(´･∀･｀)━━━━━ﾝ
ということで。(´･∀･｀)vじゃあね～～～♪(´･∀･｀)／~~ ほんじゃo´･∀･｀ヽ)(/´･∀･｀)o レッツゴー♪
それでは、今から他の胴有り∑(´･∀･｀；ハウッ！の家も色々見てきまーすＣ= Ｃ= Ｃ= Ｃ=┌（´･∀･｀）┘
（´･∀･｀）ﾉ~~ﾏﾀﾈｰ☆'.･*.･:★'.･*.･:☆'.･*.･:★
私は??歳の胴無ししてるのぉ～～～っ♪（´･∀･｀）ｳﾌﾌﾌ
うーんとー、私胴無し仲間がすっごくすっごく欲しくってー、＼（´･∀･｀）／
探してたら(´･∀･｀)なんσ（´･∀･｀）とっ！☆彡(ノ´･∀･｀）ノ☆彡ヘ（´･∀･｀ヘ)☆彡(ノ´･∀･｀）ノ☆彡
素敵∑(´･∀･｀ハウッ！な胴有り♪を発見！！！！（´･∀･｀）//""" パチパチパチ
肉袋∑(´･∀･｀ハウッ！とか…{{ (´･∀･｀) }} ブルブルすごい数の内臓がありますけど、
これ全部１つの胴に収まって ＼(´･∀･｀)／ いるんですか？（´･∀･｀）ひどすぎ …
てなわけで、ついついσ(´･∀･｀)蹴っちゃったＣ= Ｃ= Ｃ= Ｃ=┌（´･∀･｀）┘ のらー(´･∀･｀) エヘヘφ(´･∀･｀)φキックキック♪
胴無しに、なってσ(´･∀･｀)くれるよねっ。(´･∀･｀) お ね が い♪(´･3･｀)ちゅ♪ッ
え？くれないのぉ～？（´･∀･｀）)そんなのいやい♪（´･∀･｀）キャハ や～～、ｶﾞ━━━（´･∀･｀）━━━ﾝ
なってくれなかったら、（´･∀）_乂（∀･｀） 勝負！ ＼（´･∀･｀）／
☆⊂（´･∀･｀） きーっく、☆（~~~~~~(⊂（´･∀･｀） バ シ ュ ウ ウ ウ ウ ウ ウ!!♪（´･∀･｀）キャハ（´･∀･｀）⊃)~~~~~~)･;'キーック
（´･∀･｀） いてっ！ダメ!! ゛o(´･∀･｀)oo(´･∀･｀)o″ダメ!! ~~~~~~
(´･∀･｀)きゃ～～(´･∀･｀)失敗した～～(゜∀｡) ドテッ ガ━━（´･∀･｀;）━━ン！
(´･∀･｀) 反省中。。。｡･ﾟﾟ･o(´･∀･｀)o･ﾟﾟ･｡うぇぇん <(´･∀･｀;)>ノォオオオオオ!! ∑(´･∀･｀；ハウッ！
なあんて（´･∀･｀）こんな♪（´･∀･｀）ｳﾌﾌﾌ 私っ！σ(´･∀･｀)だけど、（´･∀･｀）
胴無しσ(´･∀･｀)になってm(´･∀･｀)mくださいませませ♪(´･∀･｀)フフ ﾄﾞｶﾞ━━━Σ(´･∀･｀)━━━━━ﾝ
ということで。(´･∀･｀)vじゃあね～～～♪(´･∀･｀)／~~ ほんじゃo´･∀･｀ヽ)(/´･∀･｀)o レッツゴー♪
それでは、今から他の胴有り∑(´･∀･｀；ハウッ！の家も色々見てきまーすＣ= Ｃ= Ｃ= Ｃ=┌（´･∀･｀）┘
（´･∀･｀）ﾉ~~ﾏﾀﾈｰ☆'.･*.･:★'.･*.･:☆'.･*.･:★
492 ：デフォルトの名無しさん：03/12/15 23:52
手伝ってくれる方キボンヌ
http://program.dot.thebbs.jp/1071486463.html
http://program.dot.thebbs.jp/1071486463.html
493 ：デフォルトの名無しさん：03/12/16 00:07
氏ね
殺せ
死にたくないってば
手伝ってくれる方キボンヌ
http://program.dot.thebbs.jp/1071486463.html
http://pc2.2ch.net/test/read.cgi/software/1071498016/
でも可！
手伝ってくれる方キボンヌ
http://program.dot.thebbs.jp/1071486463.html
http://pc2.2ch.net/test/read.cgi/software/1071498016/
でも可！
496 ：デフォルトの名無しさん：04/01/25 13:25
ま、うんせー
497 ：デフォルトの名無しさん：04/01/25 13:28
643 ：デフォルトの名無しさん ：04/01/25 13:24
Delphi最高～～～～～～～～～～～
イェーイ～～～～～～～～～～～～～～～
496 ：デフォルトの名無しさん ：04/01/25 13:25
ま、うんせー
283 ：デフォルトの名無しさん ：04/01/25 13:26
Delphiはもうとっくに死んでいる。
日曜日だとすることも無いのか？
Delphi最高～～～～～～～～～～～
イェーイ～～～～～～～～～～～～～～～
496 ：デフォルトの名無しさん ：04/01/25 13:25
ま、うんせー
283 ：デフォルトの名無しさん ：04/01/25 13:26
Delphiはもうとっくに死んでいる。
日曜日だとすることも無いのか？
498 ：デフォルトの名無しさん：04/01/25 13:40
>>497
やってることはお前も一緒だろｗ
やってることはお前も一緒だろｗ
499 ：VB.NET使い（勝ち組）：04/02/29 17:12
何か哀れで叩くこともできないな･･･。> Delphi
互角に争ってた頃が懐かしい。
互角に争ってた頃が懐かしい。
500ｹﾞﾄ