Delphiマンセー
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
NGNGDelphiマンセー
0002デフォルトの名無しさん
NGNG0003デフォルトの名無しさん
NGNG0004デフォルトの名無しさん
NGNG0005デフォルトの名無しさん
NGNGコンパイルも早いし、インラインアセンブラ使って細かい所まで書ける
実際、In/Out使ってプリンタポートをパラレルポート代わりに叩くなんてとても簡単だしさ
0006デフォルトの名無しさん
NGNGほんとほんとそのとーり。
Delphiマンセー
0007デフォルトの名無しさん
NGNG改めてこんなスレで書かなくても良いんだよ。
0008デフォルトの名無しさん
NGNGバージョン7までの命だけどね。
0009デフォルトの名無しさん
NGNGソースきぼん
0011デフォルトの名無しさん
NGNG0012デフォルトの名無しさん
NGNGもうやくめをおわろうとしているけど
Delphiマンセー
0013デフォルトの名無しさん
NGNGDelphiマンセー
0014デフォルトの名無しさん
NGNG0015デフォルトの名無しさん
NGNG0017デフォルトの名無しさん
NGNGDelphiマンセー
0018デフォルトの名無しさん
NGNG仕事で使ってるんだけど……
0019デフォルトの名無しさん
NGNG0020デフォルトの名無しさん
NGNG00215
NGNGでも、バランスがいいよね。
特に動的配列はGOOD これがあれば TList要らなかったんじゃない? と思うほど便利
0022デフォルトの名無しさん
NGNG0023デフォルトの名無しさん
NGNGDelphiマンセー
0024デフォルトの名無しさん
NGNG0025デフォルトの名無しさん
NGNGよってDelの勝利!
0026デフォルトの名無しさん
NGNG0027デフォルトの名無しさん
NGNG0028デフォルトの名無しさん
NGNG0029デフォルトの名無しさん
NGNGどうせならVCやC#と競い合わんと伸びないと思うが?
0030デフォルトの名無しさん
NGNG0032デフォルトの名無しさん
NGNGあるよ
0033デフォルトの名無しさん
NGNG0034デフォルトの名無しさん
NGNG0035デフォルトの名無しさん
NGNG0036デフォルトの名無しさん
NGNG0038デフォルトの名無しさん
NGNGあんなに薄っぺらでは確かに高い。
0039デフォルトの名無しさん
NGNGhttp://pc3.2ch.net/test/read.cgi/tech/1029065381/
0040デフォルトの名無しさん
NGNGそれも今はないから価値はゼロ!
0041デフォルトの名無しさん
NGNG低いので直ぐに切り捨てられて終わりです。>>shoeisha
00425
NGNG0043デフォルトの名無しさん
NGNGプ
00445
NGNGたとえばギコBASIC
http://www.geocities.co.jp/SiliconValley-Oakland/8522/data/ugikoscr.txt
C/C++もあるけど機能はピカ1さ
これは矢印や直線も描ける、しかも設計時にCADみたいにイメージを動かせるコンポ
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1004530597&rm=100
ソース読むと結構勉強になるし、楽しいよ
0045デフォルトの名無しさん
NGNG0046名無しさん@Emacs
NGNG0047デフォルトの名無しさん
NGNG0048デフォルトの名無しさん
NGNG『VBばかリやってると馬鹿になる』ってスレがあって ヒートアップした結果
VB厨が切れて暴れ 片端からDelphiスレに Delphiマンセーと書いてあげ
あげくにこのスレともう一つ作りましたです。
0049デフォルトの名無しさん
NGNG昼くらいまでマンセースレの上げ合戦がありました。
0050デフォルトの名無しさん
NGNGDel厨なに言い訳してますか?
0051四則演算
NGNGvar 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;
0052デフォルトの名無しさん
NGNGfunction 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'); として 呼び出す
0053デフォルトの名無しさん
NGNGDelマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
Delマンセー
0054デフォルトの名無しさん
NGNGfunction 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;
0055デフォルトの名無しさん
NGNG>とある場合に
>CallNotify( Form1 , nil , 'Func'); として 呼び出す
Form1.Func(nil) と比べて、何が便利なの?
0056デフォルトの名無しさん
NGNG名前さえ同じなら呼べるから
つまりインターフェース型を被せるのと同じような事が出来るから
例えば フォームが2つあって、それぞれ Funcメソッドがある場合、どっちも呼べる
0057デフォルトの名無しさん
NGNGその手続きから フォームにメッセージを送りたいのだけど、それを直接
埋め込んでしまうとその手続きの再利用性が落ちてしまうでしょ?
0058デフォルトの名無しさん
NGNG>>57
回答ありがとう、手続き名を変数にできるってことですね。
なるほど。でも、たんにメソッド型(上の例では TNotifyEvent)の
フィールドがひとつあればいいんでは。実装時には未定でも
実行時に動的に変更でききさえすれば同じでは?
0059デフォルトの名無しさん
NGNGたしかに、実行時に動的にやる方法としては他に 手続きに引数としてメソッドポインタを
渡すとかメソッドポインタのフィールド型を渡す手法もあるし、実際そうする方が効率がいいと思うよ
でも、結構それってメンドクサイじゃない。 普段は別に進行状況表示したくないのに、
使う時にこれはnilを入れてとか思い出さないといけないし
あと、スクリプトって程じゃないようなスクリプト中で 特定の処理を実行させたいとき
例えば 'Func'って文字のメソッドを呼び出したいなんて時に、この方式で呼び出せば
手間いらなくていいと思うけど
ボタンを押した時の処理とかは大抵 フォームのpublishedになってるから
簡単なマクロを作ろうと思った時とかは便利だよ
0060デフォルトの名無しさん
NGNGなるほど、ありがとう。
ファイルにしとくよ。
0061デフォルトの名無しさん
NGNG// 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;
0062デフォルトの名無しさん
NGNGhttp://www.crazyentertainment.net/
0063デフォルトの名無しさん
NGNG君自身が厨だったりして
0064デフォルトの名無しさん
NGNG0065デフォルトの名無しさん
NGNG前提が間違っています。本当は
『馬鹿だからVBばかりやる』
が正すいのだぁ
0066デフォルトの名無しさん
NGNG0067デフォルトの名無しさん
NGNG0068デフォルトの名無しさん
NGNG初めて1週間でホントに引き締まりました。
これが自分のコードかと驚く程です。
恥ずかしい話だけど排泄物も驚く大きさです。
でも、これが効果の元なのでしょう。
これからもリバウンドを抑える為に週に一度は欠かさないつもりです
教えて下さった皆さんにホントにお礼を言いたい。ありがとう!
0069デフォルトの名無しさん
NGNGhttp://www.borland.com/products/downloads/download_delphi.html
0070デフォルトの名無しさん
NGNG0071デフォルトの名無しさん
NGNG0072デフォルトの名無しさん
NGNG↓メリケン
ttp://www.borland.com/delphi/pdf/del7_datasheet.pdf
↓ニポーン
ttp://www.borland.co.jp/delphi/del7/feamatrix/
MDAやUMLは
メリケンのArcにはあってメリケンのEntにはないけど
ニポーンのEntにはあるよん
0073デフォルトの名無しさん
NGNG為替レートからみても少し日本のが安い。
0074デフォルトの名無しさん
NGNG>>2
あんまり言いたくないが、人の二番煎じのネタでゲッターやって楽しいか?
舞みたいにオリジナリティ出したら。
http://news2.2ch.net/test/read.cgi/newsplus/1030642180/
0075デフォルトの名無しさん
NGNG0076デフォルトの名無しさん
NGNGあほらしい。二番煎じじゃなくてもゲッターなんかまともなやつのやる
ことじゃないだろ
0077デフォルトの名無しさん
NGNGTIPS 不要ファイルの削除
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のツールの設定で 登録しておくのも手です
0078デフォルトの名無しさん
NGNGDelphiマンセー
0079デフォルトの名無しさん
NGNG0080デフォルトの名無しさん
NGNG0081デフォルトの名無しさん
NGNGdcuって、うざいからオプションで別のディレクトリに放り込んでおけよ。
0082デフォルトの名無しさん
NGNG0083デフォルトの名無しさん
NGNG小さな出版社がある。そして文学ファンはこういった出版社を
潰さないため、今後も翻訳を続けてもらうために
1人で同じ本を2・3冊買うことが良くある。
我々もこういう時だからこそDelphi7を買って
ボーランドを支えるべきなんじゃないだろうか。
Delphi7の売り上げはDelphi8以降の開発資金となるし、
ボーランドジャパンの今後に大きな影響をもたらすだろう。
Delphi7の出来のみを云々するのは
あまりにも近視眼的ではないだろうか?
0084デフォルトの名無しさん
NGNGその謎は以下のスレに..
http://pc3.2ch.net/test/read.cgi/tech/1031668744/536-538
ここにかかれている内容を信じるかどうかはあなた次第。
Delphi7 を注文してしまった人は、すぐに答えが出るでしょう。
0085デフォルトの名無しさん
NGNG.NETは開発は終わったがユーザの要求を見るって言ってたもんね。
.NET1.0は無視した方が良さそうだし。
☆★☆★☆ アンチに朗報! ☆★☆★☆
VS.NET 7.0と.NET 1.1は連携できません!
.NET 1.1を導入すると、VS.NET 2003を買わされる羽目になります!
0086デフォルトの名無しさん
NGNG0087デフォルトの名無しさん
NGNG1) ...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
と4行追加するだけです。
Win95/98/Meの人はこれだとヘルプ制限にかかりますから
他の不要な ヘルプをコメントアウトして下さい。
3)d7.ohcを変更します(同じく保存しておきましょう)
先頭に
:Include indy.toc
:Include del6vcl.toc
:Include api32wh.toc
と入れます
4)d7.GIDを削除します(後で自動的に作られます)
5)d7.hlpをダブルクリックかDelphi7を走らせてヘルプを見ましょう
0088デフォルトの名無しさん
NGNGこんな tipx 、作って悲しくないか?某社員さんよ。
やること、他にあるだろう?
0089デフォルトの名無しさん
NGNG0090名無し王
NGNGの記述を使って、ファイルをサーバーに送りたいんだけど、どうしるの?
0091デフォルトの名無しさん
NGNGマルチポストするのはいいとして、
このスレにかいてもまともな回答は帰ってこないと思われ。
もとのスレにもどるがよろし。
0092デフォルトの名無しさん
NGNG0093デフォルトの名無しさん
NGNG0094デフォルトの名無しさん
NGNGDelphi7のバグはたくさんありそうですか?
Delphi6から乗り換える価値は有りますか?
0095デフォルトの名無しさん
NGNG0096デフォルトの名無しさん
NGNGD5->D7組だから参考にならないかもしれないけど
必要なかったら乗換えなくていいのでは?
ただ、Webアプリの仕事もする可能性があるならいいかも
.IntraWebはなんか便利
Webアプリの仕事はやった事ないけどこれならポトペタだけで簡単に出来そう
0097デフォルトの名無しさん
NGNGそうですね
0098デフォルトの名無しさん
NGNGせめて 127.0.0.1 の制限だけ外す制限解除パスを1パス$10とかさあ
それとこのマニュアルは日本語化しないかなあ
0099デフォルトの名無しさん
NGNG0100Delフサギコ ◆A6VzDeLphI
NGNGミ,,゚Д゚彡 < やっぱ使うのに、英語ひつようなの?
U U \
IntraWeb日本語化コミコミで
Enプラ版同様の機能なら7・8マソでも
欲しい所だったんだけどなー。
D6Pro→D7Proは2.5マソだけど
D6Pro→D7Entで27マソはいくらなんでも、
費用対効果が感じなさ杉タン...
0101デフォルトの名無しさん
NGNGいや>>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;
とやればいい。ほんとに、ネイテブアプリと同じだろ?
0102Delフサギコ ◆A6VzDeLphI
NGNG∧,,∧∩ /激しくIntraWebの
ミ*゚Д゚*ミ < 紹介きぼんです!
(ミ ミ \__(いつもどおりAcidFloorに気体)
〜ミ ,,, ミ
し' `J 100ゲト キガツカンカタ
>>101さん
まぢですか!、
C#でも、画像は動的生成して、ファイルに保存しる
必要があったはずです。
なんか本にはそう書いていたですが。
ああ、これでPro版でLAN内運用可ならよかったのに
,,惜しまれる
0103デフォルトの名無しさん
NGNGいや 請負っての仕事でWebアプリはやってないので、その手の仕事で使えるかどうかは判りません。
社内で使うDB周りのフロントエンドには十分かと感じています
このコードで画像はたぶん動的作成されています。
Exe/DLLのディレクトリに Cache フォルダが作られて
そこにJPEGxxというファイルがボタンを押す都度作られてますから。
Pro版でもIISと組み合わせればLAN内運用可能のようです
実験的にWin2000ProでパーソナルIISをたて
スタンドアロンでデバックした後、同じフォームを流用して ISAPIアプリケーションとし
作成したDLLを C:\Inetpub\Scripts にコピー
URL を http://localhost/Scripts/IWHogeHoge.dll
とすれば同じ動作をしました。
・・・・といってもサーバなんて触った事ないんで、結構時間はかかったんですが・・・
0104デフォルトの名無しさん
NGNG今月中なら $299で VerUp可能だそうだ
0105Delフサギコ ◆A6VzDeLphI
NGNG⊂,,,,,,,,,つ,,゚Д゚ミつ 夏休みから、土曜日全つぶしでやってたので
わかったのですが
>作成したDLLを C:\Inetpub\Scripts にコピー
はしなくても
管理ツールのIISの
IIS
└自マシン
└既定のWebサイト<<
ここで、右クリックしてカソウディレクトリで
Projectのフォルダを設定すれば
動くと思います…
が、しかーしーそれ以上に
DLLコピーだけで動くというのが驚き桃のキ....
>>今年中
それは日本版も、、、なのでしょうか?
某日がVerUp窓口になってくれないかしら。
これとかみると、Webアプリのために、
.NET使わなくてもいい気がしてきました。
http://www.atozedsoftware.com/intraweb/tutorials/index.html
0106デフォルトの名無しさん
NGNGCookieもコンポーネント貼り付けとかで使えるのですか?
0107デフォルトの名無しさん
NGNGhttp://www.atozedsoftware.com/iwintro.html
IntraWeb supports
Internet Explorer, Netscape 4, and Netscape 6.
Cookieについては
SessionTrackingMethod で tmURL と tmCookie が選べるようです
0108デフォルトの名無しさん
NGNGとんでもなく古い IE/Netscape だと動かないかもしれない。
0109106
NGNG処理はサーバーで処理して
frmをhtmlで出力してくれるようなものですかね?
0110デフォルトの名無しさん
NGNGロキシ越しに 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
油断もすきもないなあ
0111デフォルトの名無しさん
NGNG0112デフォルトの名無しさん
NGNG#それってAP版?
0113デフォルトの名無しさん
NGNG(IDEやヘルプ、エラーメッセージ、リソース等が英語なのを除けば)
0114デフォルトの名無しさん
NGNGマルチバイト系(UniCodeだけでヨシ)の処理をサポートしてるのかなあ?
0115デフォルトの名無しさん
NGNG0116デフォルトの名無しさん
NGNG廃刊になったんか
0117Delフサギコ ◆A6VzDeLphI
NGNG∧,,∧ /
ミ,,゚Д゚彡 < ドトネトまがじそになったそうです
,;゙ ミ \
@ミ,,,UUミ  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
0118デフォルトの名無しさん
NGNG0119デフォルトの名無しさん
NGNGhttp://dmj.psnet.ne.jp/
0120デフォルトの名無しさん
NGNGワラタ
0121デフォルトの名無しさん
NGNG無理に VBを使う必要なしっ!
0122デフォルトの名無しさん
NGNG0123デフォルトの名無しさん
NGNG0124デフォルトの名無しさん
NGNG0125デフォルトの名無しさん
NGNGゲーム系だと皆無?それともオレが知らないだけ?
0126デフォルトの名無しさん
NGNG私もそうです。
0127デフォルトの名無しさん
NGNG業務に使ってても
市販じゃなければ外にアピールしなければ
わからないです
0128デフォルトの名無しさん
NGNGうちもVBで作られたシステムを半ばあきらめモードで使用してます。
必要に迫られた時しか起動しませんけど。
0129デフォルトの名無しさん
NGNGVBコンプレックスだと思われずにVBを叩く方法はないだろうか?
0130デフォルトの名無しさん
NGNG相手にしないのが一番とちゃうか?
そもそもなんで叩く必要があるんだ?
0131デフォルトの名無しさん
NGNGVB.NETは今までのVBとは別物なんだし Delphi.NETがDelphiと別物のようにね。
0132デフォルトの名無しさん
NGNG0133デフォルトの名無しさん
NGNG0134デフォルトの名無しさん
NGNGただ、パーソナルだとCで組むより苦労するでしょうから
素直にproを買う事。
VB6程手軽じゃないけどC++よりも楽です。
0135デフォルトの名無しさん
NGNGさんくす。へー、そうなんだー
だれかproを割れてくれないかなー
0136デフォルトの名無しさん
NGNG買えよ。これだからDel厨はダメだと言われるんだ。
0137デフォルトの名無しさん
NGNG0138デフォルトの名無しさん
NGNG0139デフォルトの名無しさん
NGNG評価版使えよ
0140bloom
NGNGhttp://homepage.mac.com/bloombloom/
0141デフォルトの名無しさん
NGNG0142デフォルトの名無しさん
NGNG0143デフォルトの名無しさん
NGNG0144デフォルトの名無しさん
NGNG0145りゅう
NGNG誰かhttp://kakinotane.s7.xrea.com/の
もぐらたたきゲームを作った人はいまつか?
もしいたらもぐら叩きを作ってみよう その3内の
図形の重なりのプログラム。
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;
をどこに書くか教えて( ゚Д゚)ホスィ
よろしく。
0146デフォルトの名無しさん
NGNG0147デフォルトの名無しさん
NGNG↓ここに書く。OK?
http://pc3.2ch.net/test/read.cgi/tech/1033668645/l50
0148デフォルトの名無しさん
NGNG0149デフォルトの名無しさん
NGNG0150デフォルトの名無しさん
NGNG0151デフォルトの名無しさん
NGNG出る杭
0152デフォルトの名無しさん
NGNG0153デフォルトの名無しさん
NGNG昨日から何回かトライしているんですが・・・
0154デフォルトの名無しさん
NGNG罪の意識がある割れ厨→DEL(パソナル)
貧乏人→VC#(雑誌付録期限付き)
手段が目的→BCC(無料)
0155デフォルトの名無しさん
NGNG日本?アメリカ?
0156デフォルトの名無しさん
NGNGデカパイ
0157153
NGNG日本のHPです。
会社のパソコンから接続できたものの登録メアドは家なのでアカウント取れるか心配です。
お家のIEのセキュリティを低にしても接続できないのはどういうわけか・・・
0158デフォルトの名無しさん
NGNGだから打たれるのかぁ
なるほど
0159デフォルトの名無しさん
NGNG0160デフォルトの名無しさん
NGNGわしもでるふぁいすきじゃぁ。
0161デフォルトの名無しさん
NGNGWinでまともなPascalは他に選択肢がありません。
0162デフォルトの名無しさん
NGNGGUIライブラリが…なんていう理由でDelphi使ってるなら、それはもうDelphi嫌いとは言わせん。
0163デフォルトの名無しさん
NGNG0164デフォルトの名無しさん
NGNG0165IP記録実験
NGNGhttp://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を提出することがある。
0166デフォルトの名無しさん
NGNGザラキ
0167デフォルトの名無しさん
NGNGhttp://qb.2ch.net/test/read.cgi/accuse/1042013605/
0168デフォルトの名無しさん
NGNG0169デフォルトの名無しさん
NGNG2ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数: 138720人 発行日:2003/1/9
年末年始ボケがそろそろ収まり始めた今日このごろのひろゆきです。
そんなわけで、年末に予告したIP記録ですが実験を開始しています。
「2ちゃんねる20030107」
こんな感じで各掲示板の最下部に日付が入ってるんですが、
20030107以降になってるところはログ記録実験中ですー。
んじゃ!
────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
0170デフォルトの名無しさん
NGNG0171デフォルトの名無しさん
NGNG相手がその程度で、わざわざ内容証明や令状とって訴えに来るような粘着君なら、狂犬にでも噛まれたと思って諦めれ。
0172デフォルトの名無しさん
NGNG0173デフォルトの名無しさん
NGNG0174デフォルトの名無しさん
NGNGもうそんなこと言ってられる規模じゃなくなってきたんだが?
いつまで数年前の感覚でいるのだね?
たまには外にでて社会を見ようよ。
0175デフォルトの名無しさん
NGNG0176デフォルトの名無しさん
NGNGこんなところでもニュースになってるよ。
けっこう広まってるんだな
0177デフォルトの名無しさん
NGNG音無響子さん?
0178デフォルトの名無しさん
NGNGそれが俺も心配。
ソニータイマーとか死語になりそうなヨカーン。
0179デフォルトの名無しさん
NGNGそれより、そこでもよは何やってんだ・・
0180デフォルトの名無しさん
NGNG0181デフォルトの名無しさん
NGNG0182デフォルトの名無しさん
NGNG2ちゃんねるのお勧めな話題と
ネットでの面白い出来事を配送したいと思ってます。。。
===============================読者数: 139038人 発行日:2003/1/10
なにやら、連日メルマガだしてるひろゆきです。
そんなわけで、ログ記録実験ですが、いちいちサーバ指定するのが面倒なので、
全部のサーバに入れてみました。
重くなって落ちたりしてもご愛嬌ってことで。。。
んじゃ!
────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
0184デフォルトの名無しさん
NGNG2ちゃんねるで公開したらいいと思うんだけど,
そういうのは法的に無理だったりするの?
0185デフォルトの名無しさん
NGNG0186デフォルトの名無しさん
NGNG0187デフォルトの名無しさん
NGNG>そんなわけで、qbサーバでIPの記録実験をはじめましたー。
IP記録実験
http://qb.2ch.net/test/read.cgi/accuse/1042013605/l20
IP記録実験PART2
http://qb.2ch.net/test/read.cgi/accuse/1042020193/l20
IP記録実験Part4
http://qb.2ch.net/test/read.cgi/accuse/1042203275/l50
これまでのあらすじは あたりに誰かお願い。
0188デフォルトの名無しさん
NGNGすまん!
0189デフォルトの名無しさん
NGNG0190デフォルトの名無しさん
NGNGそりゃそうだ(^_^;)まあハッキングと強盗は区別するってことで
20レス分くらい読めよ(^_^;)
どこまでOKなのかわかってたら訴訟で負けたりしません(^_^;)
なるほど(^_^;)
0191デフォルトの名無しさん
NGNG待ち盃7
リーチ
0192デフォルトの名無しさん
NGNG0193デフォルトの名無しさん
NGNG0194デフォルトの名無しさん
NGNGIPを保存することで書き込んだ人に
責任を擦り付けられるとでも思ってんのか?
関係無いぜ。
警察の捜査はしやすくなるかもしれんが、公開責任は依然ひろゆき。
いい加減理解しろや。
日本生命の時から言われてるぜ。
判決もこれに沿ったものだったしな。
日本生命
http://www.geocities.co.jp/Technopolis-Mars/6820/hoken/
0195デフォルトの名無しさん
NGNG強制IP表示されるわけじゃないから自作自演もやり放題だし。
IP記録なんかより荒らし対策をやれよ
0196デフォルトの名無しさん
NGNGってもしかして笑い取ろうとしてるのだったらごめん。
0197山崎渉
NGNG0198デフォルトの名無しさん
NGNG0199山崎渉
NGNG0200山崎渉
NGNG0201デフォルトの名無しさん
NGNG0202デフォルトの名無しさん
NGNG0203デフォルトの名無しさん
NGNGコンパイルも早いし、インラインアセンブラ使って細かい所まで書ける
実際、In/Out使ってプリンタポートをパラレルポート代わりに叩くなんてとても簡単だしさ
0204デフォルトの名無しさん
NGNG私の周りのお得意様のほとんどはDelphi指定してくれないんだょぅ(´・ω・`)。
だから何の指定も無いときはすかさずDelphiだねw
いや、もちろん内容で変えるけど。。。
0205デフォルトの名無しさん
NGNG最近、GWIOPM使いだして、W2Kでもそれ出来るようになった。
自分の中で嬉しいニュースだもんで
0206デフォルトの名無しさん
NGNG今日、LAOXで見てきたら、ボーランドの商品みんな定価売りなんだね・・・
7Proが68000円・・・
バージョンアップ申し込めてよかたよ。それでももうちょい安いといいが。
早く届かないかな。
0207このスレって何書けばいいの?
NGNGラオックスって、みんな高いって感じがする。
と、長年思ってたのだがCD-Rとかは割と安かったりするのでよく分からんな。
でもソフトは思いっきり、みんな定価(に近い?)売りだと思ったが…。
あんなんで売れるのかな?
秋葉のラオックスの話じゃないけどね。
0208デフォルトの名無しさん
NGNGここは安いですよ
ttp://www.getplus.co.jp/product.asp?product=420493
0209デフォルトの名無しさん
NGNGそうだね。他メーカーのは定価じゃなかったけど、全体的にたしかに高めだったかも。
>>208
おお、少し安いけど、バージョンアップに比べると高いよね。
おれの場合Del5ラーニングからのバージョンアップで税込み36750円だから。
これって、どこかで旧バージョンの売れ残りの安いの買ってバージョンアップ
したほうが安上がりになりそうだね。
0210Delフサギコ ◆A6VzDeLphI
NGNGミ,,゚Д゚彡
ミつ日(ミ
とりあえず、会社で買う時
秋葉に行って帰ってくるだけで
時間の激しく無駄なので
品揃え豊富なラオのコンピ館で
買うことにしてますよ。
高くても。。。。
でも、ビクカメラのカードポイントを
ためつつ、会社の金で備品を
買うのが本当は一番いいんだけどね。
0211デフォルトの名無しさん
NGNG0212デフォルトの名無しさん
NGNG0213デフォルトの名無しさん
NGNG0214デフォルトの名無しさん
NGNGよっぼどDelphiとVBを戦わせたいのか?
たいしてレスつかないんだから両方ともdat落ちさせろよ。
0215デフォルトの名無しさん
NGNG会社に電話しても、つながりません。つぶれたんですか?
0216デフォルトの名無しさん
NGNG3点
0217デフォルトの名無しさん
NGNGあなたの電話が止められただけでしょう。
0218デフォルトの名無しさん
NGNG電話止められたら発信音もしないよ。
0219デフォルトの名無しさん
NGNGそのシステムをDelphiでつくっているのでしょう
0220デフォルトの名無しさん
NGNGそしたらライセンス違反じゃん。
0221デフォルトの名無しさん
NGNG0222デフォルトの名無しさん
NGNG0223デフォルトの名無しさん
NGNG0225デフォルトの名無しさん
NGNG0226デフォルトの名無しさん
NGNG0227Delフサギコ ◆A6VzDeLphI
NGNGミ,,゚Д゚彡 2chを思い出しまつ
ミ つ旦)~~
〜と,,,~),,~)
0228デフォルトの名無しさん
NGNGDelphiで下記のようなセーブデータ変更プログラムを作り
ここへうpしなさい。
http://www.geocities.co.jp/Playtown-Queen/5355/save_tools/ps2_ff10_2/ffx2_tool10.zip
0229デフォルトの名無しさん
NGNG0230デフォルトの名無しさん
NGNG0231デフォルトの名無しさん
NGNGというか、こういうソフトをDelphiでも作れるのなら
Delphiをやり始めようと思うが、実際無理でしょ?
0232デフォルトの名無しさん
NGNG0233デフォルトの名無しさん
NGNG無理だと思う理由を上げてみろ。
0234デフォルトの名無しさん
NGNGつかこれってただのパッチだろ?
FFX2セーブデータの知識さえあればバイナリ書き換えるだけの簡単な物じゃん。
0235デフォルトの名無しさん
NGNGセーブデータの構造さえわかれば
CでもHSPでも出来るんで、どれでも好きにやり始めてください。
0236デフォルトの名無しさん
NGNG0237デフォルトの名無しさん
NGNG0238デフォルトの名無しさん
NGNG0239デフォルトの名無しさん
NGNG0240デフォルトの名無しさん
NGNG0241デフォルトの名無しさん
NGNG0242デフォルトの名無しさん
NGNGありがとうDelphi。さようならDelphi。
0243デフォルトの名無しさん
NGNG0244デフォルトの名無しさん
NGNG0245デフォルトの名無しさん
NGNG0246デフォルトの名無しさん
NGNG0247デフォルトの名無しさん
NGNG0248デフォルトの名無しさん
NGNGよくわからん
バージョンによって違うのかな
0249デフォルトの名無しさん
NGNGキーボード一発でトグルで切り替わるんだが。マニュアル読んだ?>>247
0250248
NGNGわざわざマウスで複数行選択してるんですが、キーボードでやる方法ないですか?
0251デフォルトの名無しさん
NGNG0252248
NGNG0253デフォルトの名無しさん
NGNGそんな切り替え機能なんて存在しないが馬鹿?
0254デフォルトの名無しさん
NGNG0255デフォルトの名無しさん
NGNG普通の選択モードでは[Ctrl]+OK, [Ctrl]+OIで切り替えられる。
0256デフォルトの名無しさん
NGNGelse if xx='hage' then zz
みたいな処理を書く時に、
矩形選択で空白1文字を縦に選択しておいて 空白1文字を else if xx=' に置換とか
0257デフォルトの名無しさん
NGNG0258デフォルトの名無しさん
NGNGんでもって、DelphiでMP対応のアプリとか作れるもんなんでしょうか?
どなたか作ったことある人いますか?
0259デフォルトの名無しさん
NGNG0260デフォルトの名無しさん
NGNG0261デフォルトの名無しさん
NGNG糞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
0262デフォルトの名無しさん
NGNG(´д`;)ハァハァ
0263デフォルトの名無しさん
NGNG0264デフォルトの名無しさん
NGNG「このUSBマウスはWin95対応って書いてないけど、ドライバ組み込んで
OSR2.1にしたから何とか使えるべ」
と思ったらやっぱりダメなんスよね。
そんで一念発起して、評判が良かったソフトウェア開発ツールのDelphiを
買って、Win95対応のマウス・ドライバでも作ってやると意気込み、本屋で
参考書を見たらがっかり。Delphiじゃデバイス・ドライバなんて作れない
のね。(ワラテ クダサイ)
で、DDKを手に入れてもVisual C++が必須。デバイス・ドライバ製作という
点から見ればDelphiは使えない。
0265デフォルトの名無しさん
NGNGDelが一番向いていそうなプログラムは、データベースアプリケーションだと言ってみる。
0266デフォルトの名無しさん
NGNG0267デフォルトの名無しさん
NGNG0268デフォルトの名無しさん
NGNG> Delが一番向いていそうなプログラムは、データベースアプリケーションだと言ってみる。
ソリは言い得てますね。DBアプリが作りやすくなったのはBorlandの功績 (?) かと。
0269デフォルトの名無しさん
NGNG>Delが一番向いていそうなプログラムは、データベースアプリケーションだと言ってみる。
Pascalでもできるかも。昔DOSの頃はそういうの結構あったはず。
俺的にはCの次にDelphi。Win32API回りはC並に書ける。
VBなど比較するなど到底及ばない。
0270デフォルトの名無しさん
NGNGそこをガンバッテDelphiで作ればあなたのスキルは一挙に上がったでしょうに。
ドライバを作ってる人でも、細かいアセンブル情報を知ってる人は僅か
殆どの人はサンプルコードを少し弄るだけ。
0271デフォルトの名無しさん
NGNG0272デフォルトの名無しさん
NGNGDelでドライバつくる気にはなれん。
極論から言えば全部アセで書けばいいわけだし。
0273デフォルトの名無しさん
NGNG単純に DLLが作れれば作れる訳では無いと聞いたけど・・・・・
まあ、それが判ってれば、それを付け足せばいいんだとは思うけどね
0274デフォルトの名無しさん
NGNG0275デフォルトの名無しさん
NGNG>Delphiじゃデバイス・ドライバなんて作れない
>のね。(ワラテ クダサイ)
詳細な理由キボンヌ
根本的に不可能な理由があるのか、MS製品でないと作ってはいけないという
制約があるのか、単にお前が無能なだけなのか、264だけでは判断できない
0276デフォルトの名無しさん
NGNGでも、人間の脳細胞数と比べてもパソコンのリソースが、この5年で追いつく時代だ。
出来れば、その最初の道具として Delphiが役立ってくれますように・・・・ナムナム
0277デフォルトの名無しさん
NGNGもしilink32でドライバがリンクできるなら(/adのようなオプションはあるみたいだけど)、
Delphiでもdcc32 -Jでilink32用の.objが吐けるのでドライバが作れる理屈にはなりますが…。
>>274
むしろ稀少なのでOK
0278274
NGNG> FreeBSDに手を出そうと思ってるんですが、
と思いつつなかなかWinのバックアップができないんで手を出しかねてる
ワケですが、KylixをLinux以外で動かした人はいますか? 簡単な設定で
動くんならBSDでやろうと思ってるんでつが…。
0279単刀直入に言うと
NGNG0280デフォルトの名無しさん
NGNG> >>274
> むしろ稀少なのでOK
と思って >278 を入れたが >279 が水を差したんでこの話題終了。
以後Kylixの話題は入れないこと。
0281ミ ◆CSXfsgOKpA
NGNG不必要なルールを押し付ける頭の弱い人の
言うことなんて無視すれ。
0282ミ;゚Д゚彡 ◆A6VzDeLphI
NGNG0283山崎渉
NGNG0284デフォルトの名無しさん
NGNG0285デフォルトの名無しさん
NGNG面倒臭いけどな
0286山崎渉
NGNG( ^^ )< ぬるぽ(^^)
0287デフォルトの名無しさん
NGNG個人情報を登録しないと落とせないし、その情報は転売されてるという話。
捨てアドレスで落としてみな。
そのアドレスに突然スパムがいっぱい来るから。
それはすべてBorlandのせい。
0288デフォルトの名無しさん
NGNG後学のために聞いときたいです。
Delphiで可能なら、他にも(VC++以外で)デバドラ書けるコンパイラ言語があるかも、という期待も込めて。
0289デフォルトの名無しさん
NGNGようするにDLLを作って
ttp://www5e.biglobe.ne.jp/~randy/wps/backnumber/wps0008.txt
の ubsystem / DllCharacteristics の設定が必要って事では?
0290デフォルトの名無しさん
NGNGこの6日間でDL数が1700だった。おれのソフトのなかでは最高。
VBだとランタイムが必要なんで、そんなに落としてくれない。
0291デフォルトの名無しさん
NGNG30KBですむものが600KB。
これが100本あったら・・・
0292デフォルトの名無しさん
NGNG600K+100=60M
何か問題あるの?
0293デフォルトの名無しさん
NGNG0294bloom
NGNG0295デフォルトの名無しさん
NGNGおまえの喜ぶ顔見たさに俺が1700回もダウンロードしたからな
0296デフォルトの名無しさん
NGNGDoS攻撃とみなし、vectorに通報しました。
0297デフォルトの名無しさん
NGNG(´‐` ;)ソ・・ソンナァ
0298名無し
NGNG圧縮ファイルでアップするだろうから、
無駄な部分はすべて圧縮されてます
0299デフォルトの名無しさん
NGNG0300デフォルトの名無しさん
NGNG0301デフォルトの名無しさん
NGNG0302デフォルトの名無しさん
NGNG0303デフォルトの名無しさん
NGNG0304デフォルトの名無しさん
NGNG0305デフォルトの名無しさん
NGNG似たようなの作れば面白がる人はいるかもね
いにしえのPCODE-Pascal引っ張り出してさ
0306デフォルトの名無しさん
NGNG誰か教えてくれ。
厨でスマソ。
0307デフォルトの名無しさん
NGNG0308ひまわり君
NGNG0309デフォルトの名無しさん
NGNG0310デフォルトの名無しさん
NGNGそれはこまわりだろーが!
0311デフォルトの名無しさん
NGNG0312デフォルトの名無しさん
NGNG0313デフォルトの名無しさん
NGNG0314デフォルトの名無しさん
NGNG0315デフォルトの名無しさん
NGNG0316デフォルトの名無しさん
NGNG0317デフォルトの名無しさん
NGNG0318デフォルトの名無しさん
NGNG0319デフォルトの名無しさん
NGNG>まだdelphi初めて一月だが、簡単なゲーム作ってvectorに置いたら
>この6日間でDL数が1700だった。おれのソフトのなかでは最高。
>VBだとランタイムが必要なんで、そんなに落としてくれない。
そのゲームって「敦煌」?
0320デフォルトの名無しさん
NGNG0321デフォルトの名無しさん
NGNGホアンホアンとカンカンが結婚すれば
生まれる子供は保安官
0322デフォルトの名無しさん
NGNGさすがDelphi。
敦煌は新作ソフトランキングにも入ってるね。
0323デフォルトの名無しさん
NGNG0324デフォルトの名無しさん
NGNGおまえには無理だ。
0325デフォルトの名無しさん
NGNG0326デフォルトの名無しさん
NGNG0327デフォルトの名無しさん
NGNG0328デフォルトの名無しさん
NGNG0329デフォルトの名無しさん
NGNG何故かは分からないが
0330デフォルトの名無しさん
NGNGおお、その感性は正しい。なぜならDelphi神殿は
アポロに倒されたイルカの怪物を祀ってある神殿であり、
古来ギリシャではイルカは母親の胎内のシンボルとされた。
Delphi3までパッケージのイメージで使われていたアテナも母性を
イメージしており、ソフトウェアを生み出す力、
母親のような厳しさと寛容さをイメージしている。
0331デフォルトの名無しさん
NGNGDel4のはカコヨカタノニ
0332デフォルトの名無しさん
NGNGマイナーであることは問題ないとして、
ボーランド社がいきなり「デルファイなんてやーめた」とかいって
折角覚えたデルファイが無くなってしまうということはないでしょうかね?
0333デフォルトの名無しさん
NGNG問題ないでしょう。
そもそもDelphi程度も習得できない人間はプログラマーに向いてません。
業界主流のC++の方が遙かに難しいので。
むしろプログラマーには、言語の仕様やツールの特徴よりなんかよりも、
基本的なアルゴリズム、デザインパターンの考え方、
効率の良いプログラミングのセオリーを身につけて欲しいですね。
0334デフォルトの名無しさん
NGNGVBだと別クラス用意しなきゃいけなくて、めんどい。
0335ななしへたぐらま ◆XcB18Bks.Y
NGNG確かにD5のはアレですね.
D5のスプラッシュはJPEGのイメージがそのままリソースになっているので
『リソースハッカー』で好きな絵に差し替えるといいかも.
(『リソースハッカー』でぐぐれば見つかるはず)
>>332
大丈夫でしょう.
仮にDelphiが消滅したとしてDelphi固有の知識は役に立たなくなっても
プログラムを作る技術や能力は大いに役に立つものです.
ボーランドもターボパスカルで名をあげた会社なので
その直系の子孫であるDelphiはそう簡単にはやめないと思いますが.
0336Delフサギコ ◆A6VzDeLphI
NGNGhttp://hp.vector.co.jp/authors/VA028375/
∧,,∧ スプラッシュはこちらのページで
ミ,,゚Д゚彡 懐かしむましょう。
ミ,,, uu ミ
BCBのスプラッシュコレクションされてるページはないかしら?
誰か、持ってませんか?DelWikiネタなどに・・
0337seven
NGNG0338山崎渉
NGNGピュ.ー ( ^^ ) <これからも僕を応援して下さいね(^^)。
=〔~∪ ̄ ̄〕
= ◎――◎ 山崎渉
0339デフォルトの名無しさん
NGNG面白いなあ。
http://homepages.borland.com/aohlsson/index.html
俺的にはDelphi4RC2が一番カコイイかな。
こうしてみるとDelphi5が何故ああなったのかすごい謎だ。
0340デフォルトの名無しさん
NGNGこっちを紹介しないと。
0341Dale Fuller
NGNGそう。Delphi5 で変わったんだったか。アプリケーションアイコンとかも全部。
慣れ親しんだ神殿アイコンが、丸に稲妻に置き換わってしまった。ほとんど全員反対したんだが、
マーケ、デザイナ側の決定事項ということで確定。
0342Delフサギコ ◆A6VzDeLphI
NGNGミ;゚Д゚彡< 反対しても、確定されたうんですか?
ミ つ旦)~~ \
0344間違えた
NGNG0345デフォルトの名無しさん
NGNG0346Dale Fuller
NGNGそうかもね。単に置き換え忘れただけだと(強く)思うけど。
カーン以降は製品に思い入れを持つ CEO はいませんてば。おっと。私は Dale Fuller だ。
0347デフォルトの名無しさん
NGNG0348デフォルトの名無しさん
NGNG悪の軍団 デスパーを
倒すぞ正義の イナズマン
飛べ行け 電光移動
イナズマン念力 光切り
強力招来 超力招来
逆転パンチ
0349続けていいワケ?
NGNGあまりイジメないでください。
0350デフォルトの名無しさん
NGNG以後ここが『HSPの質問はここで白!!!part2』でいいですか?
0351デフォルトの名無しさん
NGNG「けんもほろろ」素敵♥
0353デフォルトの名無しさん
NGNGまず、 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;
0354デフォルトの名無しさん
NGNGちょっと間違えた。
× FHoge
○ FHoge:Integer;
× procedure TBmpData.SetParam(s:string);
○ procedure TTray.SetParam(s:string);
こうして SetParam( 'Hoge=123'); を呼び出せば Hogeに123が代入出来る
SetPropValueのdataはVariantなので文字列で渡しても数字に直してくれるわけだ。
設定ファイルを用意する為にいちいち変数名と設定ファイルでの名前をいちいち定義しなくてもいい。
TTray クラスを継承してプロパティを増やしさえすればいい。
0355デフォルトの名無しさん
NGNG逆に保存したい場合、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]^ )
を呼び出すだけだ。
0356デフォルトの名無しさん
NGNGどうしました?急に。
0357デフォルトの名無しさん
NGNGなんだろこれ、ニコニコしてんの?
0358デフォルトの名無しさん
NGNGPropType: PPTypeInfo;
PPTypeInfo = ^PTypeInfo;
PTypeInfo = ^TTypeInfo;
TTypeInfo = record Kind: TTypeKind; ・・
という事で、ポインタポインタの参照の参照
冷静に返されちゃったな(藁
>ポインタポインタの参照の参照
賛成の反対の反対なのだ!みたいだ。
0361デフォルトの名無しさん
NGNGDelphiでポインタを理解したが、Cは使いたくない。
たとえば、Cでできないような、355のようなアドバンテージがあるのに、Cを使う理由は何?
0362●使ってみたかったんだ。。。
NGNGいや、だからポインタ理解しきれてないんだよん。
頭悪いのでぱっと見て理解しづらいのは生理的にいやなだけ。
なので>>360は
これが「ぱっと見ただけで」わかればCを使ってるんだが、、、
に訂正すまつ。
0363デフォルトの名無しさん
NGNG残念だけどC では published は無い C# なら可能。
しかも名前がウニコードだから日本語でも使えてとても美味しい。
・・・筈だけど・・・あれは中間言語方式だからこの手のテクニック使うと
移植先で重いかもしれんし、どうも躊躇してしまうな。
0364デフォルトの名無しさん
NGNGポインタが出てくる部分は自分で手続化しておけばいいだけでは?
>>353-354までは出て来ないし、ここまでの利用でも結構便利で面白いでしょ?
0366デフォルトの名無しさん
NGNGC#ではUMLから同じような仕掛けで入るようなライブラリがあるね。
0367デフォルトの名無しさん
NGNGそういう場所に日本語の識別子を使う割合って、正直、どれくらい有るの?
まじレスきぼん。
0368デフォルトの名無しさん
NGNGプログラマ以外がいじる個所
英語があたりまえだと思っているのは、プログラマぐらいだ
0369デフォルトの名無しさん
NGNGプログラマがいじらない部分で、C# の(プロパティ)識別子名が表面に出てくるところって
どこがあるの?
0370デフォルトの名無しさん
NGNG0371デフォルトの名無しさん
NGNGテキスト状態の XML をプログラマ以外が目にする状況が想像できない。
それに、そんなところを固有の言語の文字列にしたらローカライズどうするの?
0372デフォルトの名無しさん
NGNGTTypeInfo = record Kind: //TTypeKind; TTypeInfo 型には Kind というメンバーがある
PTypeInfo = ^TTypeInfo; //PTypeInfo型は TTypeInfo 型の場所を覚える型
PPTypeInfo = ^PTypeInfo; //PPTypeInfo型は PTypeInfo 型の場所を覚える型
だから PPTypeInfo 型の PropType メンバから Kind メンバを求める為には
PropType^^.Kind とやれば良い。
使う分にはこの規則さえ知っていれば使えるわけで、使って覚えるって感じでいいんじゃないの?
0373デフォルトの名無しさん
NGNG0374デフォルトの名無しさん
NGNGプログラマ以外がかかわる類のものを想像できないのですか?
0375デフォルトの名無しさん
NGNG想像力が欠如してるのは認めるから、具体例を挙げてもらえないかな?
0376デフォルトの名無しさん
NGNG0377デフォルトの名無しさん
NGNG0378デフォルトの名無しさん
NGNG0380デフォルトの名無しさん
NGNG0381デフォルトの名無しさん
NGNG0382デフォルトの名無しさん
NGNG0383デフォルトの名無しさん
NGNG0384デフォルトの名無しさん
NGNG0385デフォルトの名無しさん
NGNGhttp://store.borland.co.jp/upgrade/csharpbuilder_cmp.html
0386デフォルトの名無しさん
NGNG0387デフォルトの名無しさん
NGNG0388デフォルトの名無しさん
NGNGBorlandには手に余るデザインのプロダクトだな。
なんで J2EE、.NET、CORBAの下にランタイムを敷かなきゃならんのだ。
0389デフォルトの名無しさん
NGNGしったかぶりちゃん?
それが健全かどうかは別にして、J2EE、.NET、CORBA の相互運用を何らかのライブラリなしで
実装できる方法があるのなら教えてね。
0390しったかぶりちゃん
NGNG0391デフォルトの名無しさん
NGNGマチクタビーレタ
☆ チン 〃 Λ_Λ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
ヽ ___\(\・∀・)< 暴乱堂の倒産まだ〜?
\_/⊂ ⊂_ ) \_____________
/ ̄ ̄ ̄ ̄ ̄ ̄ /|
| ̄ ̄ ̄ ̄ ̄ ̄ ̄| |
| .NETみかん .|/
0392デフォルトの名無しさん
NGNG倒産するはずないの。
現金だけで数億円、無借金。MS と喧嘩できるほどのパテントを所有。
株価が $1 切って、丸ごと買収されることはあったとしても倒産だけは無い。
そこらの .com 企業とは違うのだよ
0393デフォルトの名無しさん
NGNG0394デフォルトの名無しさん
NGNG0395デフォルトの名無しさん
NGNG通報しました
0396デフォルトの名無しさん
NGNG自由に使える資金。意味だよ。
>>393
すべて、各期末のレポートとして公開されている情報に記載されているんだが。
0397デフォルトの名無しさん
NGNG「意味」は「自由に使える資金」を表す言葉なの?
0398デフォルトの名無しさん
NGNG0399デフォルトの名無しさん
NGNGその為にはまず、クラス名を登録しなければいけない。
登録するのはこうだ。
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はクラスが無ければ例外を出してくれる。
0400デフォルトの名無しさん
NGNG某厨は今C#Builderやっててそれどころじゃないよ。
0401デフォルトの名無しさん
NGNG相当なクズだ。
0402デフォルトの名無しさん
NGNG0403デフォルトの名無しさん
NGNG0404山崎 渉
NGNG__∧_∧_
|( ^^ )| <寝るぽ(^^)
|\⌒⌒⌒\
\ |⌒⌒⌒~| 山崎渉
~ ̄ ̄ ̄ ̄
0405デフォルトの名無しさん
NGNG残念だけどDelphiは1パスの高速コンパイラがウリなんで、
2パスになるような事はやりません。 つまり、アセンブラソースは吐けません。
ただ、DCU32INTを使うと DCUから逆アセファイルが・・・・
0407775
NGNG(__) うんこ食え
(__)
(・ω・)つ( )
 ̄ ̄ ̄
0408デフォルトの名無しさん
NGNGワロタ
0409デフォルトの名無しさん
NGNGワロワナイ
0410山崎 渉
NGNG0411デフォルトの名無しさん
NGNG0412マリーナの夏
NGNG0413デフォルトの名無しさん
NGNGへーーーッヘッヘッヘッ なーにを言ってやが…
あひぇ!?
あ?
でるひゃいッ!(爆死)
0415デフォルトの名無しさん
NGNG残ったDel厨は真性のカスばっかだな。
0416デフォルトの名無しさん
NGNG真性デムパ
0417↑
NGNG0418デフォルトの名無しさん
NGNG0419山崎 渉
NGNG│ ^ ^ │<これからも僕を応援して下さいね(^^)。
⊂| |つ
(_)(_) 山崎パン
0420デフォルトの名無しさん
NGNG何書くかは知らん。
労働なんだから指示されたものシコシコ書くんだろ。
0421デフォルトの名無しさん
NGNG0422デフォルトの名無しさん
NGNGdfmファイルがShiftJISで保存されなくなってしまった。
レジストリのFileFormat->DFMFormatの値はちゃんと0なのに!
ダウンデートするしかないのでしょうか?
0423|Д・彡 ◆A6VzDeLphI
NGNGこんなんを、DelphiIDEのツールから呼び出すと
http://homepage1.nifty.com/wizman/app/bt5/index.html
不幸の中にも少しのよかったが見つかります。
[Delphi:73074] dfm の保存形式について
このスレにもそういうツールが載ってるよ。
0424デフォルトの名無しさん
NGNGありがとうございます!
リンク先のツールはソースもついててよかったです。
これからはひと手間増えますがこれでいこうとおもいます
0426↑
NGNG0427デフォルトの名無しさん
NGNG0428デフォルトの名無しさん
NGNG0429デフォルトの名無しさん
NGNG0430デフォルトの名無しさん
NGNGprocedure 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言語並に柔軟な表現が出来る。
0431デフォルトの名無しさん
NGNGそういう場合はこうする。
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;
ここでポイントは、
1、var x:Char と引数を定義する事 これで参照渡しとなる
2、abosolute で 参照渡の引数の別名を指定する事
0432デフォルトの名無しさん
NGNGそなの? 配列の型へのポインタにキャストするだけでいいんじゃ?
0433デフォルトの名無しさん
NGNG0434デフォルトの名無しさん
NGNGCの場合は
char *p="1234"
とポインタで定義して p[2] と配列で参照できるからね
0435デフォルトの名無しさん
NGNGだから、配列の型へのポインタにキャストするだけでいいんじゃないの?
0436デフォルトの名無しさん
NGNGそれは
type AByte= array[WORD] of byte;
var P:AByte;
として P^[1] ってアクセスするって事でしょ? ^ を使えば可能という意味じゃ可能だけどね。
0437デフォルトの名無しさん
NGNG逆参照を使っちゃいけない理由でもあるの?
0438デフォルトの名無しさん
NGNG誰もいってないでしょ。
>>432単独なら正しい話だけど、 レスしてるのが>>431だと思ったから
>>431の言ってるC言語のようにとは >>431のリストのような事を言ってるんだろという事さ
普通はあんなややこしい書き方はしないでポインタをそのまま配列ポインタで扱えばいいといいたいなら同意だけどね。
0439デフォルトの名無しさん
NGNG御意。
>C言語のようにポインタを渡して配列のようにアクセスする事はDelphiでは出来ない。
この前提が間違い
0440↑
NGNG0441デフォルトの名無しさん
NGNG○ マンセぃー
0443デフォルトの名無しさん
NGNG0444デフォルトの名無しさん
NGNGちっ…ちまたで噂の「空気の読めない方」ですか!?
0445デフォルトの名無しさん
NGNGちっ…ちまたで噂の「糞スレageちゃう方」ですか!?
0447謎の急浮上!
NGNG0448デフォルトの名無しさん
NGNG0449謎の急浮上!
NGNG0450デフォルトの名無しさん
NGNG0451デフォルトの名無しさん
NGNGDelphiにはとんでもないセキュリティホールが隠されていたそうです。
Del厨はこんなものをマンセーしていたのかよw
やはりネイティブコードは駆逐されるべきだな。
0453デフォルトの名無しさん
NGNGDelphi は Borland の提供する Windows アプリケーションの統合開発環境です。
Delphi に付属するクラスライブラリ VCL に含まれる
TComboBox (コンボボックスを抽象化したクラス)
TListBox (リストボックスを抽象化したクラス)
TToolBar (ツールバーを抽象化したクラス)
TListView (リストビューを抽象化したクラス)
の各クラスにはバッファオーバーフローを引き起こすバグがあることがわかり
ました。
このバッファオーバーフローにより Delphi によって作成されたアプリケーシ
ョンには、任意のコードが実行可能なセキュリティホールが存在し得ます。
0454デフォルトの名無しさん
NGNGじゃC#や.NETもやばいかも。
0455デフォルトの名無しさん
NGNGこれを利用してアタックできるぐらいなら、
直にアタックできるんじゃねー?
どういう状況を想定してるの?
0456デフォルトの名無しさん
NGNG奴とかかな?
サーバーのサービスプロセスとかじゃリストボックス使うなんてありえねえし。
0457デフォルトの名無しさん
NGNGバッファサイズの指定が無いのはヤバイっつー事だな。
0458デフォルトの名無しさん
NGNG0459デフォルトの名無しさん
NGNG0460デフォルトの名無しさん
NGNGC# というより .NET Framework だよ。WinForm の先はいつもの GDI。そこはオーバーフローチェックのない世界。
0461デフォルトの名無しさん
NGNGヴビ厨のコピペなんだから,理解してない彼らに聞いても無駄だよ
でもパッチ出して欲しい…
0462デフォルトの名無しさん
NGNGPersonal だから?
0463謎の急浮上!
NGNG0464デフォルトの名無しさん
NGNGようするにコントロールのItemには行数制限をしてから設定するようにすればいいだけ。
0465デフォルトの名無しさん
NGNGDelphiでこういうスタイルのコードを書く人はあまりいないだろうが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;
良くないコードだが、必ず4文字以下の文字しか渡さないという条件ならでなら悪くはない。
シンプルだし、高速に動く。さて、このコードがどうコンパイルされるか見てみよう。
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 ;呼び出し元へ帰る
0466デフォルトの名無しさん
NGNG0467デフォルトの名無しさん
NGNGスタック上は結局
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番地に分岐する事になる。 ここはたぶんメモリを確保していない
領域だろうから、メモリ保護例外が出る事になる。
0468デフォルトの名無しさん
NGNG好きな番地に分岐させられたとしても、その分岐先が意味のないコードなら、やはりそう大きな問題ではない。
これを使って外部のパソコンから任意のプログラムが実行されてしまうとなると、これは大ききな問題だ。
どうして、任意のプログラムが実行されてしまうのだろうか?
まず、実行ファイルは 指定された場所が空いていれば常にそのアドレスにロードされる。
そのアドレスは プロジェクト->オプション->リンカタブ->メモリサイズ枠->イメージアドレス で指定される。
そして、スタックポインタも常に同じ場所からスタートする。
だから、この手続きが呼ばれる時のアドレス関係はは他のパソコンでも同じという事になる。
プログラムを解析されれば、絶対番地はどのパソコンでも通用する情報となってしまうという事だ。
さらに、Windowsはフラットメモリモデルを採用している。 だから、メモリ空間が読み取り可能であるならどこで
も実行出来てしまう。 それはデータ領域でも、スタック領域でもだ。
この結果、好きな番地に分岐させられるなら、文字列にコードを埋め込むなりして、任意のプログラムが実行
出来てしまうわけだ。
0469デフォルトの名無しさん
NGNG0470デフォルトの名無しさん
NGNGうぷぷ。長文ご苦労様。
でも全然理解してないのバレバレだよ(w
0471デフォルトの名無しさん
NGNG0472デフォルトの名無しさん
NGNGRect: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;
0473472
NGNGvar SaveControls:TSaveControls; //これはフォームのメンバーにおいて
procedure TForm1.FormCreate(Sender: TObject);
begin
SaveControls:=SaveControlPos(Self);
end;
procedure TForm1.FormResize(Sender: TObject);
begin
SaveControlRePos(Self, SaveControls);
end;
0475デフォルトの名無しさん
NGNGhttp://www.petitiononline.com/bdfmosx/petition.html
0477デフォルトの名無しさん
NGNG0478デフォルトの名無しさん
NGNGおお、MacOS版Delphiでるんかい。
これでやっと、Macのソフト作る気になる。
0479ぬるぽ
NGNGいまのところ知られている情報ではそのとおり。
>>478
これは、「MacOS版Delphiが出る」のではなく、「Borlandに『出してくれ』
とお願いするための署名運動」だよ。
petitionの意味は、陳情、嘆願するという意味。
いまのところ出そうな雰囲気はない。
出るとしたら、MacOSX用の.NET Frameworkが開発されるか、Qt-CLXを
Delphi用にコンバートしたときになると思う。後者の可能性はBorland社
幹部が数年前に言及したことがあるので、もしかするとあり得るのかも知れないけど
MacOSXのシェアとか、JBuilder for MaxOSXの現在の売れ行きを考えると
よほどのことがない限り作られないだろうし、仮に出たとしても1年以上あと
になるだろうね。
MacOSもVBのようなRAD環境がほとんどなかったことがWindowsの後塵を拝した
ひとつの原因だったと思うのだが(RBは話にならない)。
0480デフォルトの名無しさん
NGNG>JBuilder for MaxOSXの現在の売れ行きを考えると
ま た 社 員 か
>VBのようなRAD環境
HyperCard .....
0481478
NGNG>これは、「MacOS版Delphiが出る」のではなく、「Borlandに『出してくれ』
>とお願いするための署名運動」だよ。
そうだったのか、残念。
Macがんばれ!!
0482デフォルトの名無しさん
NGNG0483Macは糞
NGNG0484Macは糞も同感ですが
NGNG0485Macは糞も同感ですがの詳細
NGNGマンセー?何処の言葉?信じられない。Delphiはもっと包容力のある言語なはずなのに
なんで?変。>>1。
0486デフォルトの名無しさん
NGNGもっと有意義な時間の使い方を考えなさいな。
0487↑
NGNG0488デフォルトの名無しさん
NGNG0489デフォルトの名無しさん
NGNGCBuilderXでwxWindowsが使えるんなら、
wx用のダイアログエディターはあるんだし、
WideStudioも動作するそうだ。
Macの9以前は癌細胞だな。
問題は頑固な9や8のユーザーをすんなりXに移行させることだろうけど。
0491デフォルトの名無しさん
NGNG私は??歳の胴無ししてるのぉ〜〜〜っ♪(´・∀・`)ウフフフ
うーんとー、私胴無し仲間がすっごくすっごく欲しくってー、\(´・∀・`)/
探してたら(´・∀・`)なんσ(´・∀・`)とっ!☆彡(ノ´・∀・`)ノ☆彡ヘ(´・∀・`ヘ)☆彡(ノ´・∀・`)ノ☆彡
素敵(´・∀・`ハウッ!な胴有り♪を発見!!!!(´・∀・`)//""" パチパチパチ
肉袋(´・∀・`ハウッ!とか…{{ (´・∀・`) }} ブルブルすごい数の内臓がありますけど、
これ全部1つの胴に収まって \(´・∀・`)/ いるんですか?(´・∀・`)ひどすぎ …
てなわけで、ついついσ(´・∀・`)蹴っちゃったC= C= C= C=┌(´・∀・`)┘ のらー(´・∀・`) エヘヘφ(´・∀・`)φキックキック♪
胴無しに、なってσ(´・∀・`)くれるよねっ。(´・∀・`) お ね が い♪(´・3・`)ちゅ♪ッ
え?くれないのぉ〜?(´・∀・`))そんなのいやい♪(´・∀・`)キャハ や〜〜、ガ━━━(´・∀・`)━━━ン
なってくれなかったら、(´・∀)_乂(∀・`) 勝負! \(´・∀・`)/
☆⊂(´・∀・`) きーっく、☆(~~~~~~(⊂(´・∀・`) バ シ ュ ウ ウ ウ ウ ウ ウ!!♪(´・∀・`)キャハ(´・∀・`)⊃)~~~~~~)・;'キーック
(´・∀・`) いてっ!ダメ!! ゛o(´・∀・`)oo(´・∀・`)o″ダメ!! ~~~~~~
(´・∀・`)きゃ〜〜(´・∀・`)失敗した〜〜(゜∀。) ドテッ ガ━━(´・∀・`;)━━ン!
(´・∀・`) 反省中。。。。・゚゚・o(´・∀・`)o・゚゚・。うぇぇん <(´・∀・`;)>ノォオオオオオ!! (´・∀・`;ハウッ!
なあんて(´・∀・`)こんな♪(´・∀・`)ウフフフ 私っ!σ(´・∀・`)だけど、(´・∀・`)
胴無しσ(´・∀・`)になってm(´・∀・`)mくださいませませ♪(´・∀・`)フフ ドガ━━━Σ(´・∀・`)━━━━━ン
ということで。(´・∀・`)vじゃあね〜〜〜♪(´・∀・`)/~~ ほんじゃo´・∀・`ヽ)(/´・∀・`)o レッツゴー♪
それでは、今から他の胴有り(´・∀・`;ハウッ!の家も色々見てきまーすC= C= C= C=┌(´・∀・`)┘
(´・∀・`)ノ~~マタネー☆'.・*.・:★'.・*.・:☆'.・*.・:★
0492デフォルトの名無しさん
NGNGhttp://program.dot.thebbs.jp/1071486463.html
0493デフォルトの名無しさん
NGNG0494↑
NGNG0495492
NGNG手伝ってくれる方キボンヌ
http://program.dot.thebbs.jp/1071486463.html
http://pc2.2ch.net/test/read.cgi/software/1071498016/
でも可!
0496デフォルトの名無しさん
NGNG0497デフォルトの名無しさん
NGNGDelphi最高〜〜〜〜〜〜〜〜〜〜〜
イェーイ〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
496 :デフォルトの名無しさん :04/01/25 13:25
ま、うんせー
283 :デフォルトの名無しさん :04/01/25 13:26
Delphiはもうとっくに死んでいる。
日曜日だとすることも無いのか?
0498デフォルトの名無しさん
NGNGやってることはお前も一緒だろw
0499VB.NET使い(勝ち組)
NGNG互角に争ってた頃が懐かしい。
0500枢軸 ◆AmzNr0BSVY
NGNG■ このスレッドは過去ログ倉庫に格納されています