モナーの *やさしい* Delphi質問スレ Ver.8

　 ∧＿∧　　／￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
　（　´∀｀）＜. Delモナーがどんな厨房疑問でもやさしく答えます。
　（　　　　）　.| Delモナーは時に私であり、時には別の人。
　｜ ｜ ｜　 | 他のスレに書き込んで罵倒される前に、まずここで質問しよう。
　（＿_）＿） 　＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿

前スレ モナーの *やさしい* Delphi質問スレ Ver.7
http://pc.2ch.net/tech/kako/1021/10212/1021262086.html

■過去スレ

モナーの *やさしい* Delphi質問スレ Ver.6
http://pc.2ch.net/tech/kako/1019/10191/1019134412.html

モナーの *やさしい* Delphi質問スレ Ver.5
http://pc.2ch.net/tech/kako/1017/10178/1017803412.html

モナーの *やさしい* Delphi質問スレ Ver4
http://pc.2ch.net/tech/kako/1016/10164/1016467137.html

モナーの *やさしい* Delphi質問スレ Ver3
http://pc.2ch.net/tech/kako/1014/10144/1014474727.html

モナーの *やさしい* Delphi質問スレ Ver2
http://pc.2ch.net/tech/kako/1011/10116/1011649179.html

モナーの *やさしい* Delphi質問スレ
http://pc.2ch.net/tech/kako/1003/10031/1003113413.html

作っちゃったのか･･･

あーあ。相談室と統合したのに。
>>1は責任もって1000までモナー役することになるんだよ。

　　　ﾀｧｯ
　　 　 (⌒)(⌒)
　 彡 │　||　｜
　　　 （∧＿∧⊃
　　　 （　・∀・）
　　　　∪ 　　　5ｹﾞﾄ

あとは勝手にやれや

Del厨マンセー！！！

Delphi相談室の方が埋まったら、そっちをつぶそうな。

この先、できるだけsage進行でお願いします。

(ﾟ∀ﾟ≡ﾟ∀ﾟ)

(´-`).｡ｏＯ（予想通り上がってきた

　　＿＿＿
＿|oo土土|＿ 　ﾁｬﾝﾄ
　（　ノノノハ ○　　ｱﾔﾏｯﾀﾓﾝｯ！
. ノ .ｃﾉ*ﾟ ０ﾟ）/　　　　　ﾜﾙｸﾅｲﾓﾝｯ！
　　くI＿\_i/
　　○　　＼
　　/~~~~~~~＼
　（＿＿＿＿＿）
　　　|＿|_|＿
　　(_＿ ）＿_）

　 ∧＿∧　　／￣￣￣￣￣￣￣￣￣￣
　（　´∀｀）＜ 質問受け付け中モナー
　（　　　　）　 ＼＿＿＿＿＿＿＿＿＿＿
　｜ ｜ ｜
　（＿_）＿）

ApplicationWindowがうざい

ファイルの作成日時を取得する関数はないのでしょうか？

raise ESage.Create('逝って良し');

　　,,,,,,,,,,,,,,,∧,,∧　 　おまいら！
〜′,,,,,,,,,,ミ,,ﾟДﾟ彡　良スレあげですよ！！
　UU"""" U U

統合しました
http://pc3.2ch.net/test/read.cgi/tech/1022921598/l50

よって
■■■■終了■■■■

　 ∧＿∧　　／￣￣￣￣￣￣￣￣￣￣
　（　´∀｀）＜ 再開モナー
　（　　　　）　 ＼＿＿＿＿＿＿＿＿＿＿
　｜ ｜ ｜
　（＿_）＿）

質問に答えてないじゃん

☆ ﾁﾝ　　　　　ﾏﾁｸﾀﾋﾞﾚﾀ〜
　　　　　　　　　　　　　　　　　　　　　　　　　ﾏﾁｸﾀﾋﾞﾚﾀ〜
　　　 　 　 ☆　ﾁﾝ　　〃　 Λ＿Λ　　　／￣￣￣￣￣￣￣￣￣￣￣￣￣
　 　 　 　 　　ヽ　＿＿_＼（＼・∀・）　＜　　>>15の回答まだ〜？
　　 　 　 　 　 　 ＼＿／⊂　⊂＿ )　　 ＼＿＿＿＿＿＿＿＿＿＿＿＿＿
　　 　 　 　 　 ／￣￣￣￣￣￣ ／|
　　　　　　　　|￣￣￣￣￣￣￣|　 |

　 ∧＿∧　　／￣￣￣￣￣￣￣￣￣￣
　（　´∀｀）＜ 新規質問受け付け中モナー
　（　　　　）　 ＼＿＿＿＿＿＿＿＿＿＿
　｜ ｜ ｜
　（＿_）＿）

>>15
function GetFileCreationTime(const FileName: Sttring): TDateTime;
begin
　Result := GetFileCreationTime(FileName);
end;

>>15
FindFirst関数やFindNext関数で使う、TSearchRec構造体の中のTWin32FindData構造体の
中のどっかに格納されてるんじゃないの？

夏休み専用スレはここですか？

　　,,,,,,,,,,,,,,,∧,,∧　 　おまいら！
〜′,,,,,,,,,,ミ,,ﾟДﾟ彡　あげですよ！！
　UU"""" U U

Del厨は氏ね

Del厨大暴れだな

Delphi7の詳細が明らかに！
http://www.borland.com/delphi7/

http://www9.plala.or.jp/t-ranet/kako/flash/saitama.swf

１は責任もって削除依頼してこい。

うっせ
テキトーに消費しろハゲ

夏休みだなぁ(´ー｀)y-~~~

しょうがねぇなー
漏れが変わりにDelモナになってやろう
漏れも初心者だから初心者の範囲を超えた質問は相談室に行ってくれ、なｗ

おーい夏休みなDel厨のみんなー？
質問がないぞ〜〜〜〜〜〜〜〜〜〜〜〜〜〜

>>27
相変わらず元気そうでなにより>>voke

（　´∀｀）Del厨は氏ねよ

DelphiでOption ExplicitをOffにするにはどうすればいいですか？

ヤメテー

delphi関連のサイトを紹介するメルマガとかないでしょうか？。

Delphi.NETの詳細が明らかに！
http://www.borland.com/delphinet/

（　´∀｀）あげ

Delphiマガジンを書店で見つけました。
表紙を見て雑誌を手に取った瞬間買うのを
ヤメマシタ。

>>43
昔の女子高生シリーズよりはマシかと

(´-`;).｡ｏＯ（>>43,44 どんなんだろ･･･

>>44
はげどう、何だったんだろう？あれは…

青年漫画雑誌みたいな戦略だろう

あぁぁぁ、俺見た事ある。
あの表紙をみて買ってしまうかと思った。彼女たちは皆女子校で理系情報課で
IT教育でDelphiを教わっているのだとばかり思っていた。
ああ、Delphiプログラマーは女子高生が多いのかなぁ、これから女子高生Delphi
プログラマーが珍しくなくなるのかなぁ、いいなぁ、よし、これからはDelphiだ！
、と妙に納得した。
次に書店を尋ねた日には、無くなっていたが。

　　　 ＿＿＿＿＿＿＿＿＿＿＿＿＿
　　／
　　|　・・・・・・
　　|
　　|　妙に納得するなよ
　　＼＿＿＿＿＿＿＿＿＿＿＿＿＿
　　　　　　　　　　＿＿__
　　　　 Λ,,Λ　　||:::::::::::||
　　　　ミ；ﾟДﾟﾐ―||:::::::::::||―――
　　 　ミ　　 つ二二ｌニｌ　且
　　　|￣￣|__ﾐ―――――
　　　`ー┬‐''
　　　　　┴ 　　ｱﾉ ﾋｮｳｼ ﾐﾃ
　　　　　　　　　ｾｽｼﾞｻﾑｸ ﾅﾘﾏｽﾀ

（　´∀｀）age

でるふぃって読むの？

でるぷひー

でるふぁい

デルポイ

､._., < Del厨氏ねよ

統合したんじゃないのか?

>>56
こちらに統合しました

クラスのメンバ関数を比較関数にするには
どうしたらいいのですか？

>>58
演算子をオーバーロードしよう

StringGridについて教えてください。
StringGridでオブジェクトインスペクタでカラム数を指定すると
フォーム上にはその数分のカラムが表示されるようになりますが、
実際にアクセスできる要素数はその数を超えていても、アクセスできますよね。
実際に書き込んで読み出してみると、ちゃんと書き込んだ値が入っています。
StringGridの読み書きできるカラム数や行数はオブジェクトインスペクタで
指定した（表示上の）カラム数や行数とは別と思って良いんでしょうか？
アクセスすればその分領域が勝手に確保されると思って良いのかどうか。
ＶＣＬのソースが有ればその辺はソースを見れば判るのかも知れませんが。
Personalな物で。。。
何故、そんなことを知りたいかというと、StringGridには必要なデータを全て
入れておいて、画面（グリッド上）上には一部のデータしか表示しない様に
したいという事なんですが。
判る方教えてください。

zlib使う方法ってない？

標準でついてるじゃん

>>61
＞何故、そんなことを知りたいかというと、StringGridには必要なデータを全て
＞入れておいて、画面（グリッド上）上には一部のデータしか表示しない様に
＞したいという事なんですが。
できるよ。問題なし。

>>63

　そうですか。
　動作的には使えているので、ＯＫの裏がとれれば安心です。
　ありがとうございました。

復活したのけ？

TComboBoxなどでStyle=cpDropDownListの時って、内容が編集できないから、最初からListのうちの一つが表示されてた方が便利じゃないですか。
みんなはそういう時ってFormのCreateなどでComboBox1.ItemIndex := 0; という風にやってるんですか？

>>66
何かそれで問題があるのですか？

>>67
特に問題ないですけど、スタイルを変えた時に勝手にそうなってくれればいいのになぁと思って。

>>68
リスト要素を実行時に設定する場合どうするの？

>>65
Personalもインストーラが作るフォルダのINFO\EXTRASフォルダに入ってる。>ZLIB
(しかしJPEG特許訴訟はDelphiにも影響でるかね〜。
某が怖気づかなきゃいいけど。)

ＶＢＡの質問です。
本気で悩んでいるので出来れば助けてください。

FormAからFormAのサブフォーム(FormA_S)を呼びだしたいんだけど、
FormAにどうやったら「君のサブフォームはFormA_Sだよ」と
教えてあげられるのですか？

また、
変数 = CurrentDB()
でカレントＤＢを変数に入れてるんだけど、カレントＤＢは
どこできまっているのですか？

>71 は誤爆に見せかけた攻撃です。
皆さん冷静に対応しましょう。

「ヴバ」って何ですか？

>>73
調べたら、乳母が年をとると濁ってヴバになるんだそうな
いや、勉強になったなった

>>73
なんか飲んでる時に爆笑するとなる。

描画オブジェクトのヒットテストとかに使える
リージョンについて詳しいサイトとかあれば教えて。

>>71
マジですか？

>君のサブフォームはFormA_Sだよ
forms!FormA_S

そのレベルだとVBAも辛いね、N88-BASICでもやってろ
つーか、仕事でやってんなら会社辞めちまった方がいいね。
学生なら就職先はソフトウェア関係あきらめろ。
ネタだとしても、たぶんプログラマとしての能力はかなり
低レベルだとお見受けします、しかも面白くない。

え〜っと、VBAの質問って、ここでいいんですか？

>>78
なんでも聞け

>>78
答えは/dev/nullに書きますので注意してください。
(NULに書いて欲しい場合は言ってくれ)

　 ∧＿∧　　／￣￣￣￣￣￣￣￣￣￣
　（　´∀｀）＜ 新規質問受け付け中モナー
　（　　　　）　 ＼＿＿＿＿＿＿＿＿＿＿
　｜ ｜ ｜
　（＿_）＿）

Linux使い逝ってよし

>>80
SYSOUT=* におながいします。

>>83
お断りします。

　 ∧＿∧　　／￣￣￣￣￣￣￣￣￣￣
　（　´∀｀）＜ Delphi以外の質問も受け付け中モナー
　（　　　　）　 ＼＿＿＿＿＿＿＿＿＿＿
　｜ ｜ ｜
　（＿_）＿）

>>85
んなわけない
￣￣∨￣￣￣
　 ∧＿∧
　（　・∀・）
　（　　　　） 　
　｜　某｜ 　
　（＿_）＿）

>>78
ヴバスレ逝け！

モナさんモナさん
デルファイて他言語と比べて
どのくらいのシェアなんでしょ？
大雑把でイイから教えて下さい

逆襲のｼｪｱ

Pascalコンパイラのシェアならほぼ100％。

ただし市場規模はかなりせまい。

２ちゃんねる デスクトップアクセサリー V1.2

『みんなでモナーになろう計画!!』

http://members.tripod.com/2ch-Tools/2chDTA.zip

>>88
シェアを気にしてDelphiが出来るかぁ〜〜っ！！(怒

なんかもー、「Delphi」、「質問」とは関係ない世界に突入ですな。

>>94
ネタスレですから。はっはっは

だんだん
http://pc3.2ch.net/test/read.cgi/tech/1027226769/l10
に近づきつつある予感。

今からここは APPGallery 質問スレになりますた！

（´-`）.。oO（なんで>>96みたいなスレがム板にあるんだろ‥‥)

ゲ製作版で相手にされなかったから。
（隔離版のつもりで嘆願したのによぉ〜。）

http://game.2ch.net/test/read.cgi/gamedev/1005313791/

あのね、Delphiで作ったActiveXに、
JavaScriptから文字列を渡したいんだけど、
どうやったらいいかわかんないの。
JavaScriptの方からは多分、
「ActiveXのID.メソッド名(文字列の入ったパラメータ)」
で渡せばいいんじゃないかなーとは思うんだけど、
肝心の呼び出される方をどう書いたらいいのかがわかんないの。
例えば「a」って入力されたら「1」を、
それ以外を入力されたら「0」を返すような
DelphiのActiveXを誰か一緒に考えてくんないかなあ。
同時に、２ちゃんらしいかっこいいメソッド名も
考えるのも手伝って欲しいかな。ヨロシクおながいしまーす。

なんかネカマだとやる気うせるなあ。
「ディスパッチインターフェース型」参照しろやｺﾞﾙｧ！

DelphiのString形式で\nとかが使えないんですが
改行する方法ｷﾎﾞﾝ

>>102
んー、多分これ、チェキに対するレスだよね。
だったら、さんきゅーさんきゅー。
ネカマってのはなんか気にさわるけど放っとくわ。
ていうか、私あてのレスじゃなかったら恥ずかしいなあ。
そうそう、でね、今ヘルプでその
「ディスパッチ〜」見てるんだけどまるっきし意味不明。
「オートメーションコントローラは，
COM IDispatch インターフェースを使って
COM サーバーオブジェクトにアクセスするクライアントです。」？？？
なんでこやってややこしい日本語で書くんだろうね。
まあ、それはおいといて、なんか102さん出来る人っぽいから、
101のチェキの例題、一緒に考えてくんないかなあ？　お・ね・が・い。

>>103
sLineBreakを使うのが最善
　'文字列'+sLineBreak

>>105
ありが(・∀・)�d!!

>>86
どうしてそういうことが言えるんですか？

私には分かりません。
みんなあなたを盛り上げているのに。。。。

いい加減にしなさいよ。

>>107
んなわけない
￣￣∨￣￣￣
　 ∧＿∧
　（　・∀・）
　（　　　　） 　
　｜　某｜ 　
　（＿_）＿）

ＩＥで閲覧中のサイトのアドレスを
ｄｅｌで作ったアプリから取得する方法を教えてください。
おながいします。

テキストボックスコンポーネントを使って
データの入力を受け付ける会計ソフトのようなものを作ってるんですけど
Delphiでもバッファーオーバーフローの脆弱性は発生しえますか？

×テキストボックスコンポーネント
○TEDITコンポーネント
の間違いでした

Delphiは危弱だからね

>>112
脆弱が読めないDQNﾊｹｰﾝ

「きじゃく」って入れたんだろうな〜
脆弱→ぜいじゃく

ちなみに
虚弱→きょじゃく
強健→きょうけん

>>113
ｱﾌｫ。がいしゅつみたいなもんじゃｳﾞｫｹｪ

>>115
無知を認めるのが嫌で逆ギレしてるDQNﾊｹｰﾝ

ｷｼﾞｬｸage

危弱祭り
http://pc.2ch.net/test/read.cgi/win/1024800891/

>>115
バーカ(ﾌﾟ

ここはネタスレなので、質問は談話室までどうぞ。

危険で弱いで危弱だよ。通じてるじゃん。
誰も脆弱だなんて言ってないよ。

>>104のキモイやつ。Delphi談話室（２ちゃんじゃなく）に
おもいっきりマルチポストですなぁ。
ここで冷たくされたから、あっち行ったのか？
あっちは丁寧語だが（藁

なんだかんだ言ってこのスレ結構盛りあがってるじゃん。

>>104
普通に言えば答えてもらえたかもしれないのにね（藁
ヲタはいいけどネカマは逝ってください。

RichEditで予約語が入力されたときにその語の
色やフォントを変更する方法を教えてください。

>>109
WinSightでも使って、ウィンドウクラスを追っていけば、アドレスが手に入りますなぁ。

Delphi 7 英語版発表あげ
http://crn.channelsupersearch.com/news/crn/36736.asp

難しいです････

>>125
検索して選択してフォント変更

>>129

ありがとさん

>>130
答えがそっけない（期待してたのと違う？）と、質問は敬語で、礼はフランクだな（藁

（´-`）。o ○ （ネカマのアホの質問、シカトされてるなぁ…　あそこ以外で
どこか他にもマルチポストしてんだろうなぁ…　アホだなぁ…＜チェキ）

>>130
ちゃんとやりたきゃEditControlを作る・・・
か、他人が作ったのを使う
RichEditじゃあ使い物にならず

delphiでブラウザって作れるんでしょうか？

>>134 言語の機能としては無理ではないが、一から一人で作ってては生きてる間には完成しないだろう。
　ブラウザコンポを貼り付けなさい

>>134
何のブラウザ？

IE コンポーネントを使うものなら腐るほどある。コンポのっけるだけ。
Geekko エンジンを呼び出すものもある。
さすがにフルスクラッチのものは少ないが、それは C/C++ でも同じだろう。
IE/Mozila 並みの描画能力を得るにはかなりのコードを書かなければいけない。

そこまで行かなくても、表なしの HTML 程度ならいくつかソースが転がっている。
探してみそ。

ネカマの「チェキ」とか言う馬鹿、DelphiGIG.comにも
マルチポストでした。
そーゆーことするな！カス！
何が「mie」じゃ。プログラマー初心者というより、
人として問題だっつーの。糞野郎。ハゲ。

>>135-136
レスどうもありがとうございます。
難しいことがやりたいのではなく、ブラウザみたいに実用的なものを作って勉強していくということなんです。まだ、レベル低いので。
というわけで、IEコンポーネントを使ってやってみることにします。

>>137
お前も負けず劣らずアホだけどな。

>>126
レスありがとうございました
さっそくやってみます。

>>130
ｱﾘｶﾞ(・∀・)�d!!

>>131
>>125≠>>130です....

>>139
（´-`）。o ○ （アホはチェキと>>139だけ。）

>>134-138
Delphi　はじめの一歩
http://delphi.sakura.vg/
Delphiやろうぜ！＠ダメ板
http://salami.2ch.net/test/read.cgi/dame/1018335057/l50

参考にどうぞ。

つーか、「作れますか」「出来ますか」はＮＧワードにした方がいいと思う。

Delphi談話室にマルチポストしたヤツ、レスナッシング。
ゲラゲラゲラゲラ。

>144
『*やさしい* Delphi質問スレ』なんだからOKでいいんじゃない？
そのかわり、「できます」「できません」としか答えない、とか。

>>146
不毛でない？

>>147
後段はともかく、「こんなこと出来るんだったらDelphiやってみよーかなー」って人に門戸を閉ざすのもどうかと...

多少は布教活動もしないと。

>>145
ﾈｶﾏに相当恨みがあるようだな。
過去に騙されて大恥かいたのか？ﾌﾟﾌﾟﾌﾟ

149=ネカマ　　

>>150
そんなことないもーん♪(*'-')

ここはネタスレですよ。

やっぱ、Delphi小枝集のスレにしよう！

こ...こえだ...？

>>153
飽きた。

ならばここはDelphi for .NET妄想スレにしよう。

仕様を引数に渡すと、実装を返してくれるWebサービス。

コンパイラスイッチ１つでMSILとフルネイティブを切り替えられる。

日経ごときに叩かれてるな。(w

http://itpro.nikkeibp.co.jp/free/NSW/NEWS/20020807/1/print.shtml

> そんなわけで，Visual Basic .NETやVisual C# .NETのように，.NET
> クラスライブラリのコンポーネントをフォームに貼り付ける形でプロ
> グラムを作ることはできない。すなわち，.NET用のIDE（統合開発環
> 境）はなく，コマンドライン・コンパイラが付いただけである。今か
> ら研究を始めたいという人には朗報だが，今.NETアプリケーションを
> Delphiで作りたいという人にはがっかりではないだろうか。

がっかり

日経BPなんてこんな奴のいる会社だ。信用するな。

http://www.zakzak.co.jp/top/top0806_3_01.html

もっこり

>>161
まるで、女子中学生に手を出すといけないような言い方をするな。

まあ、VB.NET で出来る事をDelphiでワザワザやる必要ないし >>159
Delphiで作成済のライブラリをエクスポートできればとりあえず十分

わざわざVB.NETでやらなきゃいけないことがいくつあるかが問題だな。
C#使った方が楽と。

　　　　　　　　　　　　　　　　＼　│　／
　　　　　　　　　　　　　　　　　／￣＼　　 ／￣￣￣￣￣￣￣￣￣
　　　　　　　　　　　　　　　─（ ﾟ ∀ ﾟ ）＜　でるふぁいでるふぁい！
　　　　　　　　　　　　　　　　　＼＿／　　 ＼＿＿＿＿＿＿＿＿＿
　　　　　　　　　　　　　　　　／　│　＼
　　　　　　　　　　　　　　　　　　　 ∩ ∧　∧　　／￣￣￣￣￣￣￣￣￣￣
￣￣￣￣￣￣￣￣＼∩ ∧　∧　＼（ ﾟ∀ﾟ）＜　でるふぁいでるふぁいでるふぁい！
でるふぁい〜〜！　　 ＞（ ﾟ∀ﾟ ）/ ｜　　　　/　＼＿＿＿＿＿＿＿＿＿＿
＿＿＿＿＿＿＿＿／ ｜　　　 〈　｜　　　｜
　　　　　　　　　　　　　 /　／＼_」　/　／＼」
　　　　　　　　　　　　　 ￣　　　　 / ／

簡単なチャットソフトのサンプルって落ちてないでしょうか？

ﾁｪｷｰ

>>167
\Demos\Internet\Chat

>>169
ｳﾏｲ

>>161
「Ｈしていた疑い。」って、
「Ｈ」ってニュースで使われるまで、オフィシャルな俗語だったんだぁ。。
ちょっと感心した。（藁

「Ｈ」って言葉が嫌いだ。
「コーマン」「オマンコ」「セックス」「マンコにチンコを入れてました」
って堂々と言え！
テレビで言えないなら「Ｈ」なんて言葉でごまかすな。

ZAKZAKってそんな格のあるメディアなのか？

東スポ程度には。

いい講座のサイトってないでしょうか？
実際にアプリを作りながら覚えるってタイプの方がいいんですけど

(´･ω･`)　169さんが言ってるチャットのサンプルないぽ・・・
パーソナル版だからかな？

demos以下ってpersonalだからつけられない代物か？
setupの時に、選んでないとか？

>>175
http://delphi.sakura.vg/

>>175
そういうのって結構難しい。
初心者でひとくくりできるものではないしね。

プロが知識と経験を元に講座を開くことは可能だが
初心者同士で群れても勉強にはならない。

身近にある程度の知識を持った人がいるならそこに行って自分のコードを見せてみなさい。
いないときは、同程度の知識の仲間を見つけて、良いソースを一緒に分析しなさい。（要するに輪講だ。）

コンポーネントのインストールってどうやるんでしょうか？
拡張子が「dcr」と「pas」ってのを手に入れてヘルプ通りにやってもダメです

>>179 また register -> Register な罠なお話？

俺も激しく激しくチャットソフトのサンプルｷﾎﾞｰﾝ
みんなチャットソフトとかって作れます？

ソケットでもDirectXでもサンプルみつけましたがなにか？

>>182 　（´Д｀；）ﾊｧﾊｧ　それは海外のサイトですか？

再来週になってもまだ需要があるなら
サンプル作ってあげよう。

>>184 マジかよ！？　でも再来週かよ！？
とりあえず神候補に登録しときます　

これはほんのつまらないものですが・・・
http://www.pp.iij4u.or.jp/~momoman/manman/main.htm
なんとかこれで・・・

-------風俗の総合商社・ＭＴＴどこでも-------

〇デリバリーヘルス〇デートクラブ〇女性専用ホストクラブ〇
〇ハードＳＭ奴隷クラブ〇レズビアン倶楽部〇ホモ・オカマ倶楽部
〇変態痴女と遊ぶ会〇痴漢・覗き趣味の会〇変態同好会・各種！
●楽しく遊べます！　090-8002-8356番
-----------美男・美女会員など多数在籍中-----------
　 http://www.mttdocomo.jp/
-----女性アルバイト随時募集・高収入（日払い）月100万円可能住み込みも可
-----レズビアン・スタッフ●ホモスタッフ●女性専用ホストスタッフ同募-----
http://www.mttdocomo.jp/
------------------------------------------------

もしかして　２CHからそこに飛んだら自動的に書き込みされる仕掛け作ってるのかな

僕も184さんに期待してます

　　　　　ｱｹﾞヽ(´ー｀)ノ

>>175
ここは？
http://www.geocities.co.jp/SiliconValley-Bay/3828/

　　　　　　　　　　＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
　　 ∧.,,∧　　 ／>>189>>175
　　ミ.,,ﾟДﾟ彡＜　リンク切れやいいページがあったら報告して
　　ﾐ つ目(ﾐ .　＼メンテしろやｺﾞﾙｧ
〜ミ,,Ｏ,,,,,,つ 　　　￣￣￣￣￣￣￣￣￣￣￣￣￣￣

http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=999486538
ここの　○入門　のところは全部みるといい感じ。

昨日一晩中トライしたんですが、どうしてもわからないんで質問させてくらはい
コンポーネントのインストールについてなんですが、「コンポーネント」→「コンポーネントのインストール」で
あってますよね？　でもこれでやると拡張子「.dpk」のファイルじゃないとダメです。

http://home1.infonia.ne.jp/~delphian/delphi/←にあるコンポーネントをDLしても「.dpk」のファイルは見当たりません
コンポーネントがインストールできたら便利だろうなぁっていつも思うんで、何とか教えてもらえませんか？

>>191 その上の ユニットファイル名で指定しなさい

下の .dpkじゃない部分には新規の所で作りたいファイルの名前を入れたらいいよ

アルゴリズムとは無関係なコーディングスタイルの質問です。
(スレ違いだったら、スマソ)

(1) 予約語は、大文字、小文字のどちらが一般的なスタイルでしょうか？
　　 VBでは、頭文字のみ大文字、その他は小文字というのが一般的(Javaでも？)
　　ですが、書籍等で見るDelphiのサンプルコードは、すべて小文字になっている
　　ようです。これは、一般的なのでしょうか？

(2) インデントは2スペース、4スペースのどちらが主流でしょうか？
　　書籍や雑誌では、2スペースの方が多い(Delphiに限らず、他言語でも)ですが、
　これは、紙面の都合と考えられないでもない。
　　実際のところ、VB(A)の案件では、4スペースでやってるところが（経験的に）
　　圧倒的に多いのですが、Delphiではどうでしょうか？(売りモノのソースコード
　　を見たことがないので、判断がつかず・・・）
　　4スペースにすると、おなじアルゴリズムでも、begin ...... end の分だけ、
VBよりインデントが深くなるのがちょっと気になります。

(3) CやJavaでの{ ] のスタイルとおなじような話になりますが、

if ...... begin

（ifと同一行にbeginを記述）と、

if ......
begin

（改行する）または、

if ......
　　begin
（beginでインデントを下げる）

のどれが一般的なのでしょうか？

どれも、コーディング規約次第、と言ってしまえばそれまでですが・・・。(^^;

>>193

自己ツッコミ。
193の文章、インデントが汚いですね。(半角／全角スペースの混在が原因)
コーディングスタイルを語るなら、インデントをそろえなきゃダメですな。(Ｗ

>>193
＞(Javaでも？)
違います。

getTextlength()

ラクダ型と呼ばれます。

>>195
「予約語」って分かる？

>>195
コメント感謝。
「ラクダ型」って、どこかで眼にした記憶があります。
（大文字の部分をラクダのコブに見立ててるのでしょうか？）

ちなみに、その例なら、
getTextLenght　（Lが大文字）
が正解ですよね？(自信なし)

> 違います。

えっと、メソッド／プロパティ名の頭文字は小文字で、クラス名の頭文字は
大文字・・・でしたっけ？？（うろ憶え。あまり自信なし・・・）

スレ違いです。

まさにコーディング規約しだいだよなあ。
それでもってんなら、VCLのソースを参考にしたらどうか

>>199

あ、ナルホド、それが（ある意味）一番無難ですね。
ありがとうございます。

ここはネタスレだっちゅーの！むぎゅ。

質問者は相談スレへ。

ちんこむぎゅ。

ソフトで作成したデータの保存先を指定したいのですが
デフォルトだと "マイドキュメント"になってしまいます。
厨な質問ですみませんが、よろしくお願いいたします。

>>193
個人的には、
(1) 予約語はすべて小文字。
　VCLも概ね小文字。たまにStringとか見かけるが。
(2)インデントは2スペース。
(3)beginは同一行に記述。
　VCLでは改行されていることが多い。
　漏れ的には、endがifやfor、with等と対になっているのが
　読みやすい。あと、行数が減らせる（＝１画面に表示できる量が増える）。
　ただ、言語使用としてはbeginを改行するのが正しいと思う。

× 言語使用
○ 言語仕様

IMEのバカ...

>>205
IME=MS-IMEか？Windowsの勉強からやり直すべきだが。

IME=InputMEthodだろ。
しかもつっこむなら自分の間違いをIMEにするな、だろ。
マジレスカコ悪いか？

＞IMEにするな
IMEにせいにするな

Imput Method Editor

適当なこと書く暇があったら、もっとやるべき事があるだろ。

ちょっと恥ずかしい質問なんですが今、チャットソフトを作っています
でもユーザーの名前が表示されません・・・
Edit1に例えば「taro」って入力したら会話文が表示されるmemo1の頭に常に「taro」が表示されるには
どうしたらいいんでしょうか？　変数を使うってとこまではわかるんですが具体的にどういうコードを
書けばいいのかわかりません　　　おながいします

>>211
とりあえず何かDelphiの本買ったほうが良いと思う。

たぶんEdit1をダブルクリックして、
memo1.txt := Edit1.txt
とか書けば。
txtだったかどうか忘れたけど。

>>204
ありがとうございます。

保存先フォルダーの指定方法を聞いた者です。
作成したソフトと同じフォルダーにデータを保存したいです。

NT4.0だとそのままでもうまく行くのですが
Win2kだと "マイドキュメント"に・・・
どこで設定をしたら良い物なのでしょうか？

s := ExtractFilePath(Application.ExeName);
ShowMessage(s);
ExtractFileDir()でもいいかな

デルファイ５です。

クイックレポートで、マスターリンクレポートではない、普通の？レポートで、いくつかのグループごとにメンバーを印刷させる処理。
その「グループ」が変わったと同時に新しくページを起こしたい（COBOLでいうコントロールブレイク）をしたいんですが、どうすればいいんですか。

リアルコボラーで、デル初心者です。あれこれ書籍やヘルプを見たのですが、マスターリンクレポートの説明しか見つけられず、しかも、内容的にマスターリンクレポートでは不都合なのです。

よろしくおねがいします。

>215
ありがとうございます！うまくできました。

んで184氏のチャットソフトはまだかな？
激しくｷﾎﾞｰﾝ

ActiveXコンポーネントを設計時にフォームに貼るのではなく
実行時にclsidを指定して読み込ませたいのですが、
Delphiではどのようにすれば良いのでしょうか？

>>219 先にTLB読んでるなら、普通に　CreateComObject　で開いてIUnknownに

はじめまして、DELPHIを始めて半年の山川と申します。

　Memoコンポーネントに書いたテキストをボタンクリックで
WEB上の掲示板に投稿してくれるとゆうソフトを作ろう
と思ったのですが具体的に何をすればいいのか解りません（汗

どなたかこうゆうアプリの作り方をご存知でしたら
教えてください、よろしくお願いします（＾＾；A


http://www2.sega.co.jp/cgi-bin/kymega/kyview.cgi?k=b&dir=test
↑目的の掲示板の書き込み用ページです。


私に解るのは..
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
１、各欄用に以下のコンポーネントを用意し、
　　データを入力する。

名前:　　　　　　　→Editコンポーネントのtext
メールアドレス:　　→Editコンポーネントのtext
確認キー :　　　　→Editコンポーネントのtext
URL:　　　　　　　　→Editコンポーネントのtext
cookieのON、OFF：　→CheckBoxコンポーネントのChecked
題名 :　　　　　　　→Editコンポーネントのtext
メッセージ : 　　　→MemoコンポーネントのLines


２、ClientSocketコンポーネントを使い、掲示板のCGIと
　接続する。 そのCGIのアドレスはこちらです。
　http://www2.sega.co.jp/cgi-bin/kymega/submit.cgi
　（ClientSocketの使い方が良く解らないのでこのCGIに
　　接続する方法が解りません。　ClientSocketは
　　ヘルプファイルにも説明が無いんです）


３、　１、で各コンポーネントに書いたデータを送信する。
　　（データをどうやって加工＆送信すればいいのか
　　　解りません)
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿

このようになんとなくプログラムの手順は想像がつくん
ですが具体的にどうしたらいいのかがさっぱりです、
出来れば簡単なプログラムを作っていただけると
非常に助かります、どうかお願い致しますm(__)m

>>221 具体的にはまず
　Internetのところに TWebBrowserというのがありますか？　あればそれを
無ければ　ActiveXの取り込みから MicroSoft Internet Controlを探して　それをインストールして下さい

ここまで出来たらご連絡下さい

しまった・・・　パーソナルだと MSHTML.pas がついてないのか・・・・

　となると厄介だ　ごめん忘れて

ヘルプからCLX関連の情報を消すにはどうすればいいのでしょう？
いちいちVCLかCLXか選択するのは面倒なので。

>>224 インストールしたディレクトリにある Readme.txt　のオンラインヘルプの項を見てみましょう

CLX ヘルプ参照のリンクを解除するには

VCLをコテコテに使ってD5で組んだプログラムがあるのですが、
AnsiStringだから･･･Shift-JIS以外のコードは基本的に使えないのでしょうか？

多言語対応にする必要に迫られているのですが･･･ﾄﾞｳｼﾖｳ。

>221

TClientSocketは最低限のデータの送受信機能しかありあせん。
そこで、HTTP手順を実装する必要があります。
ネットでRFCを検索して自分で実装しましょう。

これが無理ならIndyというフリーのコンポーネントがあります。

たとえばヤフーのトップページを取得するには下のようになります。

with IdHTTP1 do
begin
Host := 'www.yahoo.co.jp';
Port := 80;
Memo1.Lines.Text := Get('/index.html');
end;

Indyを使えば簡単にできると思いますが、
WEB(HTTP)を理解するのが先決でしょう。

>>226
日本語以外にMBCSな言語があるなら、WideStringにするのが手っ取り早いと思います。
ただVCLにはWideString用のコンポや関数が非常に少ないので、どこか（主に海外）で
探してくる事になると思いますが。。。

>221
http://www.monazilla.org/
ここの資料室と2chスレッド１〜３と見て、勉強しる！
投稿する対象が２ｃｈ以外になるだけだから、
ちゃんとここの内容を理解すれば、作れるはず。

タイプライブラリエディタで IStream を返すメソッドを作りたいのですが、
パラメータの型に IStream を指定できません。
どうすれば良いでしょうか？　それとも IUnknown で返すしかないんでしょうか。
厨な文章で申し訳ない。

＞出来れば簡単なプログラムを作っていただけると

＞よーするにソースきぼんぬ？

>>228
ありがとうございます。
どうやら、VCLの中では特に2バイト文字を使う必要はなさそうなのですが、
他で宣言をWideStringにすれば他のコードが使えるようになるものなのでしょうか？

「使う」にどれだけのことを期待しているかによる。
例えばフォームに表示したいなら、WideStringに対応したTEditもどきコンポとかがいると思う。

あっ、なるほど･･･。やっぱりそれ相応のものが必要ですね。
ちょいと不安ですが、探してみることにします。

プロジェクトファイルを開こうとすると「Unit1.pasを開けません」とエラーが度々でるんですが
これは一体何が原因なんでしょう？

>>236
たぶん、エラーメッセージそのままの意味だと思いますが。
Unit1.pasを保存してなかったとか。移動したとか。名前変更したとか。
プロジェクトファイルを違う場所にコピーして、開いたとか。

>>222

私のはパーソナルです、書き忘れてしました、申し訳無いです。（汗
パーソナルでは使えない機能を使わないと厄介なんですか..
internetのところにはClientSocketとServerSocketの２つしか
ありません。(泣)　幸いなことに他の方法を書いて下さった方が
いらっしゃいましたのでそちらを参考に頑張ってみたいと思います、
即レスありがとうございました。m(__)m


>>227

socketコンポーネントだけではダメなんですか・・
HTTP手順を自分で実装しないといけないとは予想以上に
難しいんですね（汗　RFCとIndyのどちらとも勉強してみます。
情報＆サンプルソースありがとうございました。m(__)m


>>229

２ｃｈに投稿するプログラムの作り方が載ってるんですか！
大変参考になりそうです、時間をかけてみっちりと勉強しようと
思います。　情報ありがとうございました。m(__)m


>>231、232

簡単なソースをいただければあとは改造するだけなので
助かります（＾＾；　出来れば早くアプリを使いたい
ので・・　もちろんソースの勉強もするつもりです。

　∩|　　　　ｵﾚ ﾊ ﾎｯﾄｿﾞﾇ ﾕｰｻﾞ
　ﾐ ﾞ''ﾞﾞﾞつ　　　　＿＿＿＿＿＿＿＿
　ﾐ∧,,∧　　　／CGIへの投稿は
　ミ,,ﾟДﾟ彡 ＜　2cnﾌﾞﾗうざっのﾚｽ投稿の仕組みを
　Ｕ　Ｕ　　　　＼利用したらいいんでないかしら。
　　　　　　　　　　￣￣￣￣￣￣￣￣
Indyはフリーだけど、
ご利用を快適にするには日本語ＨＥＬＰありの
D6Pro版買うのが早道だと思われ。
もうすぐD7もでるようですね。

　∩ ∩
　ﾐ ﾞ''ﾞ〜　　　　　＿＿＿＿＿＿＿＿
　ﾐ∧,,∧　　　／CLXのTEditは
　ミ,,ﾟДﾟ彡 ＜　　海胆ｺｰﾄﾞ対応だったような
　Ｕ　Ｕ　　　　＼気がシル
　　　　　　　　　　￣￣￣￣￣￣￣￣

>>226
「多言語化｣の内容によると思うが？
VCL には Shit-JIS固有のコードは入っていないです。
OS 自身の主言語（日本語 Winsows なら Shift-JIS, 韓国ならハングル）で
動きますから、一つ作ればどの国でも動く。
メニューやエラーメッセージを翻訳する作業は必要ですが。

そうだね　日本語とかと同時に他国の言語も表示したいなら WideString対応コンポを自作して
フォントも入れて貰って結構大変だけど、他国で使えるようにするなら別かも

Delphi 自身、どの国の製品もバイナリは同一です。
台湾用として購入したら、英語版でした。特に問題なく使えています。

>>239
　
＞2cnﾌﾞﾗうざっのﾚｽ投稿の仕組みを利用

ありがとうございます、これも参考にしてみます。
私に理解出来るのかちょっと不安ですが（汗

D6Pro版はお金に余裕が無いのでパーソナルで
出来る限り頑張ろうと思います。

Delphiマンセー

えーと、とりあえず
タイプライブラリエディタの左のツリーの根っこを選択して
右ペインの［使用］で「Windows Media Player Core」をチェックすれば
IStreamは使えそうです（このやり方でいいかどうかは知らんけど）。

で、今度はIStorageを使いたいのですが、
どのタイプライブラリを使えばいいか分からん！
てゆーか↑のMedia Player Coreを探し当てるのもえらい苦労したし(;_;)

こーいうのって、どうやって探したらいいんでせうか。ぇぅぇぅ

uses activeX したら IStrageがあるみたいだけど？

ActiveX使ったらバージョンの互換性とかで問題が出るから
全部静的リンク。Delphiでランタイムを使うなんて馬鹿げてる

すみませんpcodeってなんですか？
コンポーネントかなにかでしょうか？
友人は「基本的にはゴミだが、うまく使えば役に立つ」
って言うんですが、それ以上教えてくれません。

>>249
.NETでも使われている先進的なものです。

>>249
友人に聞け。本当はしったかしているだけだったりしてな。

誰かメールソフトのサンプルないですか？　シンプルなやつでいいんでｱﾌﾟｷﾎﾞｰﾝ

>>251
本人だったりしてな。

>247
コードエディタじゃなくて、タイプライブラリエディタなんですよー。

>>235
ｽﾏｿ ちと早とちりしてました。
他のレスにある通りで、多言語でも混在させる必要がなければ
AnsiStringのままでやった方が（標準的なコンポのままでいけるので）
楽ですわ。

　　　　　∧,,∧ 　　　　>>252
　　　　 ミ,,ﾟДﾟ彡 　＜Indy使うよろし。
　　　　　ミ　つ且~~
　　　　　ﾐ,,__　ヾ
　⊂二二二UU二二⊃
　　　Pro版にはIndyを浸かったﾒｰﾙｸﾗｲｱﾝﾄの
　　　サンプルがある

procedure TForm1.SendMail;
begin
　with IdMessage1 do
　begin
　　Body.Add('ハローワールド);
　　From.Text := '送り主のメールアドレス';
　　Recipients.EMailAddresses := '送信先メールアドレス';
　　Subject := '題名';
　　Priority := mpNormal; //メール重要度
　　CCList.EMailAddresses := ''; {CC}
　　BccList.EMailAddresses := ''; {BBC}
　　ReceiptRecipient.Text := ''; //メッセージ受信確認の送信先アドレス
　end;

　with IdSMTP1 do
　begin
　　AuthenticationType := atLogin;
　　UserId := 'ユウザーID';
　　Password := 'xxxxx'; //実際のパスワードを入力

　　Host := 'xx.co.jp'; //SMTPサーバー
　　Port := 25;
　end;

　IdSMTP1.Connect;
　try
　　IdSMTP1.Send(IdMessage1);
　finally
　　IdSMTP1.Disconnect;
　end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
　SendMail;
end;

Delphi6 アップデートファイル#2が欲しいんですが、
FTPサイトに入れないのでBorlandからダウンロードできません。
どこかに、置いてあるミラーサイトはありませんか?

>>249
特にターゲットとするマシンを規定しない汎用コードのことだ。
それを適当なコンバータにかけてネイティブコードとする。
Javaのマイクロコード、VBのコンパイル後のコードなどがそれだな。

>>251が一番知ったかしてるだけだな。

ファイルの末尾128バイトが読めねぇ。
教えて、エロい人。

>>259　今どうやって読んでるの？

厨房質問ですみません。
ユニットのinitialization/finalizationにvarを含めることはできないのですか。

>>261 その直前で var を使えばいいと思うけど？　それで何か問題あるの？

>>262 回答ありがとうございました。

自己解決しました。
ありがとう、>>260、そして全世界のエロい人。

まあね。

僕もチャットソフト作ってるんですけど「複数の部屋を選択または自由に作って」ってのは
一体どうやったらいいんでしょうか？

>>266
まず、俺も混ぜろ糞どもが！ってみんなに投げる。
で、みんなが、ここに部屋があるぞカスめ！って返す。
自分で部屋を作ったら、部屋を作ったぞ童貞ども！って投げる。

>>267 やっぱりそうか！　中々言い出せなくってね・・・

　　　　　　　　　　ぢゃなくて　（´Д｀；）

そういうソフトを作りたいのですよ　　どうかお知恵を・・・ﾌﾟﾘｰｽﾞ!

コンボボックス

>>269 なるほど・・・使い方はｻﾊﾟｰﾘだけどやってみまふ　ｻﾝｸｽ

pcodeって人では？

偏屈オヤジ？

>>272
それは吐駄

他言語化についてアドバイスありがとうございました。
IDEでは日本語と英語しか打てなかったので、試しに外部から文字コードを
読ませたところ、メニュー等しっかり表示されました。

あと、ここで聞くことか迷ったんですが･･･。
日本語W2Kでコンパイルしたものを韓国語XPに持っていくと、
コンポーネントの大きさが全部1.3倍くらいになってしまった･･･。
（フォントまで12ポイントが16ポイントくらいになってる）

バイナリは各国同一とのこと、環境の問題なのかなぁ･･･｡･ﾟ･(ﾉД`)･ﾟ･｡

Windowsの設定(画面のプロパティのフォントサイズのdpiだったかと)に引きずられて
開発環境と稼働環境のフォントの比率で拡大/縮小されるのがVCLのデフォルトですね。
フォームのScaledをFalseにすると自動調整は行われませんが、
今度はフォントがはみ出たり色々弊害もあると思います。
最終的にはコードで微調整するしかないかと。

あぁ、そんな機能があったのですね。
2000では大丈夫でXPで変になったので、単なる解像度だけの問題では
ないと思ってたのですが、確かに開発は1280、変になった環境は1024で
数値的にも合います。フォームのプロパティを色々と調整してみますね。

ありがとうございます。精進しなければ･･･。

>>274
日本語環境でフォームを作ると、「MS Pゴシック」が埋め込まれてしまいます。

ちゃんと韓国語環境でフォームを整形するか
すべての .dfm からフォント定義を削除するか。

フォント定義を削除しておけば、実行時のフォントが使われますから
韓国語 XP のデフォルトフォント名知らないけど、大きく外れることはないかと

えー・・・複数の部屋を選択&新規にユーザーが作れるっていうチャットを作ってる者です
コンボボックスかリストボックスでユーザーが部屋を追加したとしたら、その部屋はどういう風に表示したら
いいんでしょうか？　あたらしいMemoでしょうか？

>>278　タブにしたらいいんじゃない？

>>278
それを考えるのが作者の楽しみだと思うんだが

>>280
同意。

〜を使って〜な感じにしようと思うんですが・・・

から文章が始まって然りな気がするが。

>>258
ありがとうございました。
どうも友人の知ったかのようですね。
Delphiに深く関係するようなこと言ってましたので。

>>282 Delphiに関係するといえばするけどね
昔 pascal　が　PCODEインタプリタ方式が主流だった時代に
ネイテブコードにコンパイルして、しかも、コンパイルしてるの？　ってくらい
早くて、さらに金額もリーズナブルという　ターボパスカルというのが
Delphiの元になってるという意味で

>>278-281
よりよいUIにするための相談と言うより、
単に何使っていいかわからないだけなのか？

おっと、ここは　やさしい相談室だった

>>278 Win32タブに TabControl と PageControl があるでしょ？
この場合はどっちでも使える
一つのメモが複数あるようにしたいなら TabControl
　ただし内容は、TStringListとかの配列を作って自分で管理しなければいけない

PageControlにして新しいページを作る時に１ページ目の内容を
動的に作成させる方が今の所は楽かもしれない

>>284-285 ﾜﾛﾀ

たまにｱｹﾞ　ヽ(´ー｀)ノ

>>285 例えばチャットの文字が表示されるmemo1があってその右側に部屋一覧のlistboxがあるとします
そのlistboxの中の一つを選択したらmemo1がmemo2になったりってできますか？
ちょうどフレームを使ったサイトのリンクをクリックしたような感じにしたいんです

>>288　そうしたいのなら、PageControlでMemo1を貼ったページを生成してゆくか
　内部にTStringListの配列を作っておいて、listboxの選択時に切り替えればいいと思うよ

コンポーネントのクラスTShapeを継承したTShape2というクラスを作った場合、
それを利用するにはどうしたらいいでしょうか？

http://kado7.ug.to/net/


朝までから騒ぎ！！
　　　小中高生
　コギャル〜熟女まで
　　　メル友
　　i/j/PC/対応

女性の子もたくさん来てね
　　小中高生大歓迎です　　　　　　　　　　　　　　　　　
全国デ−トスポット情報も有ります。
全国エステ＆ネイル情報あります。

　　激安携帯情報あります。

どうでもいいがコギャルって死語だよな・・・。

>>290
　方法は２つ
　一つは、Register 手続きを書いて　IDEに登録すること

　もう一つは、動的に作成して使う事
　　面倒なら
　　動的に作成して、元のTShapeの必要なプロパティを代入して
　　元.Freeして　作成したのと置き換える

クラスTShapeを継承したコンポーネントを作成？の方がいいのでしょうか？

>>294 良いか悪いかは判らないけど、
　自分が使う分には手間はその方が少ない
　他人に渡すソースは逆

>>293
>>295
どうもありがとうございます!!　勉強しますぅ！

表計算みたいなコンポーネント StringGrid のセルから整数を拾いたいのですが、
整数以外を０としたい為に、次のようにしています。

try i:= StrToInt(StringGrid.Cells[1,1]); except i:=0; end;

しかし、これだとＤｅｌｐｈｉの環境から実行したときに、警告メッセージが
でてしまいます。どうしたらいいでしょうか？

>>297
StrToIntDefじゃ駄目？

>>298
ありがとう！！　知らなかったですぅ!!

DELPHIを始めて半年の山川と申します。

http://www2.sega.co.jp/cgi-bin/kymega/kyview.cgi?k=b&dir=test
この掲示板に自動書き込みをするプログラムを作ろうと
思ってるんですが、「名前」、「本文」等のデータを
掲示板のCGIに送る方法が解りません。

こうゆうプログラムの作り方を知ってらっしゃる方が
いらっしゃいましたらどうか教えて下さいませm(__;)m

私のDelphiは「PERSONAL6 SP2」でIndyインスト済みです。


（私が解っている事）

HTTPの知識が必要。
RCFの知識が必要。　RCFとはインターネット標準を
書き記しているもの。　「FTPは何番。」などのように
番号によって書かれている内容が違う。

Indyでデータを送信するコードがmonazilla.org(wの
「資料室」に書いてあること。
http://members.jcom.home.ne.jp/monazilla/document/indytips.html

２ちゃんねるに書き込むコードが
http://members.jcom.home.ne.jp/monazilla/document/monazilla_part_1.htm
ここの９２０番に書いてあること。


（私が解らない事）

HTTPの何についての知識が必要なのか。　掲示板の書き込み
ページのソースのことじゃないですよね(汗

どの番号のRCFの知識が必要なのか。

上に書いた「Indyでデータを送信するコード」と
「２ちゃんねるに書き込むコード」を
http://www2.sega.co.jp/cgi-bin/kymega/kyview.cgi?k=b&dir=test
この掲示板用に書き換えるにはどうすればいいのか。

＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
長い時間かかってもこのアプリを完成させたいと思って
ます。　どうかよろしくお願いしますm(__)m

（追記）
　HTTPの知識が必要ってのはもしかしたらRCFの
HTTPについての記述を知っている必要があるって
ことなのかな・・　しかし全部英語・・（汗
一体どうすればいいんでしょうか（＾＾；A

明日早いので今日はもう落ちます。m(__)m

Indyを紹介した者です。

>>301

そうです。RFCのHTTPに関するドキュメントを読みましょう。
HTTPは簡単なので英語でも理解できると思います。
と、言いたいところですが、俺は日本語に翻訳されたのを読んだよ（藁

で、次は実践。とりあえずOSを2000と仮定してコマンドプロンプトを起動。
次のように打ってみて。

telnet www.2ch.net 80 （リターン）

画面がクリアされるのでさらに次のように打つ（画面には表示されない）

GET /index.html HTTP/1.0 （リターン）
User-Agent: HogeHoge （リターン）
Host: www.2ch.net （リターン）
（リターン）

最初のGETは必ず大文字で。画面には表示されないから注意ね。
使いづらかったらTeraTermというフリーソフトを使いましょう。

IndyはGetをメソッド、User-Agentなどをプロパティとして実装してる。
もちろんレスポンスもプロパティで実装してくれている。

で、実際にどういうデータを送ればいいということだが、とりあえず
ソースを見て想像してみましょう。

わからんかったらローカルプロキシサーバーを立てて通信内容をチェック。
フリーなどでもたくさんある。

以上だが、親切すぎたか（藁

delphi歴数週間の者です。
初歩的な質問をさせてください。
ある入門書（personal用）を見ながらソースを
ポチポチ見たまま打っているような次第なのですが、
その中でまずフォームにコンポーネントを貼り付ける
ように指示があり図も載っているのですが、
コンポーネントパレット上でShowListが見つけられないのです。
ListBoxやBottunはそれ以前にパレット上の場所や説明もあり
問題ないのですが、ShowListはいきなり出てきた感じで
どこにも見つけられず困っています。
勘違いな質問をしてしまっているかもしれませんが
どなたが教えてくださーい。

　　　.∧,,∧∧,,∧ ))
　 ((ミﾟДﾟ ≡ ﾟДﾟ彡＜ShowListってのが何かは
　　⊂ﾐ ⊂≡⊃ ﾐ⊃ 　誰にもわからないと思います
　　ｵ とﾐ,,≡,,ﾐづ　ｵ
　　ﾛ　　し＾ Ｊ　　 ﾛ

TListBox を置いて、名前（Name）を ShowList に変更してたり......とか

>>303

この間は＆今回もご親切にありがとうございましたm(__)m
おかげで少しずつ答えに近づいているような気がします。

telnetですがtelnet.exeとTeraTermの両方で試してみまし
たが、送信後も何も表示されず謎だらけでした。
そこでwindows用webサーバのhttpdに送信してログを
見たところこんなログが残っていました。↓

＿＿＿＿＿＿＿「trace.log」ここから＿＿＿＿＿＿＿
<<< s=80: Sun Aug 18 06:16:28 2002 <<<
GET /index.html HTTP/1.0
<<< s=80: Sun Aug 18 06:16:29 2002 <<<

<<< s=80: Sun Aug 18 06:16:39 2002 <<<
User-Agent: HogeHoge
<<< s=80: Sun Aug 18 06:16:40 2002 <<<

<<< s=80: Sun Aug 18 06:16:49 2002 <<<
Host: www.2ch.net
<<< s=80: Sun Aug 18 06:16:50 2002 <<<

>>> s=80: Sun Aug 18 06:17:22 2002 >>>
HTTP/1.1 400 Invalid
MIME-Version: 1.0
Server: AnWeb/1.40d
Date: Sat, 17 Aug 2002 21:17:22 GMT
Content-Type: text/html
Connection: close
Content-Length: 203

<HTML><HEAD><TITLE>Error </TITLE></HEAD>
<BODY>
<H1>Error 400</H1>
Invalid Request -- header not terminated<HR><ADDRESS><a href="http://www.st.rim.or.jp/~nakata/">AnWeb/1.40d</a></ADDRESS>
</BODY></HTML>
＿＿＿＿＿＿＿＿＿「trace.log」ここまで＿＿＿＿＿＿＿＿

＿＿＿＿＿＿＿＿＿＿「errors.log」ここから＿＿＿＿＿＿＿
Sun Aug 18 06:13:41 2002 AN HTTPD 1.40d Ready.
Sun Aug 18 06:17:22 2002 Error Response 400 Thread 0(ID= -3708173) to 127.0.0.1 for "??????"
＿＿＿＿＿＿＿＿＿＿「errors.log」ここまで＿＿＿＿＿＿＿


＿＿＿＿＿＿＿＿＿＿「httpd.log」ここから＿＿＿＿＿＿＿
127.0.0.1 - - [18/Aug/2002:06:16:08 +0900] " ?????? HTTP/ﾚ・・Q" 400 203
＿＿＿＿＿＿＿＿＿＿「httpd.log」ここまで＿＿＿＿＿＿＿


trace.logにある「Content-Length」などはmonazillaのスレ
で見覚えがあります。　このlogの最後にはエラーをHTMLで
返した形跡がありますね、これをアプリに受信させて例外処理
を書けば時間を置いてから再送信させたりするプログラムも
書けそうですね（＾＾；


それとRCFのHTTP(2616)の日本語訳を公開しているサイトを発見しました。
www.studyinghttp.net/rfc_ja/2616/rfc2616_ja.html

今から出かけなくてはならないのでこの続き（訳の熟読など）は
帰ってから頑張らさせていただきます。m(__)m

書き忘れました、私のOSはwindows98SEです。
ではでは、行ってまいりますm(__;)m

>山川さん
Indyで送るのはこんな感じで。
http://delphi.sakura.vg/acty/memo1.html

で、HTTPについては
http://www.atmarkit.co.jp/fnetwork/rensai/index/index-serial.html#netpro
とか参考になるかも。

Delphi V6 Personal で質問です。

ローカルで静的バッファ作ってその先頭ポインタを返す関数が
あったとき、そのバッファが破棄されるタイミングって、ポインタの参照
がなくなったとき（ [2] のタイミング）でよいのかしら？それともスコープ
抜けた時（ [1] のタイミング）にすでに破棄されているのでしょうか？
（試したところ、取り合えず動いちゃったので参照カウントがなくなる
タイミング[2]で破棄されていると思うのですが・・・）

function foo: PChar;
var buf: array[0..256] of Char;　// ローカルバッファ
begin
　Result:=@buf;　// ポインタ返し
end; [1]

procedure baa;
var tmp: PChar;
begin
　tmp:=foo;　// 受け取る
tmp[0]:='a';
tmp[1]:=#0;
end;　// tmp ポインタ参照終了。バッファの破棄？ [2]

本当は静的配列を返したかったのですが、ヘルプ読んだりやググルっ
たりして見みても、性的配列の返し方が解らなかったのでつ。
stringで返してもよいのですが、WinAPI 回りに使う関数なので他の
API関数との受け渡しでキャストが発生しちゃうのもなんなのでので、
出来ればポインタで返せればなー・・・と。

よろしくお願いします。

fooのローカルバッファは fooを抜けたとたん消えてしまいます

もしAPIの為にだけPCharが必要なら　単に文字列(string)を使う方が余程簡単で安全です

例えば、
var str:strings;
　ならば
setlength(str , 999);
setlength(str , GetWindowText(Handle,PChar(str),Length(str)-1) )

のようにした方が安全でかつ簡単だと思います

>312
解答ありがとうございます。
string を使用するようにしたいと思います。

静的配列は、やはり、foo 抜けた時で破棄されるんですね。
baa で書き込みに成功していたので勘違いしておりました。

本当にありがとうございました。

>313
おお、詳しい解説助かります！
よしゃー、string で書き直してきまつ！

Cスタイルの文字列なら

setlength(str , 999);
GetWindowText(Handle,PChar(str),Length(str)) ; // #0用にバッファには１バイト余分があるみたい
str:=PChar(str); //PCharを文字列に代入すると#0終端としてコピーされるのでサイズは自動調整される

という手もあるよ

>316
ん！？申し訳ありません。うまく理解できませんです。

この処理は

１行目： string 型変数 str に 999 バイト（最大ｻｲｽﾞ）の領域を確保
２行目： バッファに書き込み処理
３行目： 大抵の場合バッファは余るので、キャストして代入することにより
　　　　　バッファをリサイズしてあげる。

ってことでよろしいんでしょうか？

因みに、今ここ見ながらしこしこしてます。（既出？）
ttp://isweb21.infoseek.co.jp/computer/wblue/prog/one/o002a.htm

>>310

大変参考になるリンクをありがとうございます。m(__)m

「資料室」のIndyについての説明には解説が一言も
無くて困ってたんですがご紹介していただいたリンク先
にはちゃんと解説も入ってるので助かります。

HTTPのほうも読ませていただきます。　RCFの全文も
読まなくてはいけないのですべて読み終わるまで
少し時間がかかりそうですが頑張ります。

RCF……ってまだ突っ込んじゃダメ？

>>319
だ　め　

>>319

ツッコミありがとうございます。
ここ以外場所で恥を書かずに済みました（汗
とりあえず麗子ファンクラブ(RFC)と覚えました。
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
ぅぅ・・・　また問題が・・
personalなのでHTMLApp.pasが入っておらず「HTTPEncode」が
使えないことが解ってしまいました・・

hogehoge2001.tripod.co.jp/note-delphi.html
ここには「既存ソースを動かしてみる時にはAPIの仕様を推測して
必要な関数だけ作ろう。」と書かれてました。　今度はAPIの
勉強も必要のようです。

>>321
＞HTTPEncode」が 使えない
簡単だから実装しな。

>>322

とりあえずどんなAPIがあるのかすら知らないので
まずこれから勉強してみます。

>麗子ファンクラブ
不覚にもﾜﾗﾀ

URLエンコードの件は解決しました。m(__)m

gaogao.moemoe.gr.jp/archives/component/
↑ここでDmonkeyってゆうコンポーネントが配布されて
ますのでこれを入れればURLエンコード関数(escape)が
使えるようです。

ただ、delphi6 personalな私の場合、RTLのアップデート
をしないとDmonkeyが正常にインスト出来ませんでした。
　↓RTLのアップデートについてはこちら。
http://www.borland.co.jp/delphi/del6up.html#del6rtl

これで本題に取りかかれます（＾＾；

（´-`）。o ○ （つーか、「荒しツール」？＜掲示板自動書き込み）

（´-`）。o ○ （　そっとしといてやれ　）

>>303さんの言うtelnetのことでお聞きしたいの
ですが303さんはtelnetで一体私に何を見せようと
して下さっていたのでしょうか？　一応httpdの
ログは見れましたが今になって別の何かを
見せたかったのではないか？　とゆう気がします。

telnetのログ機能を使ってログを取ったりしたの
ですがログには何も残っていませんでした。
他に何かを見落としているのでしょうか...

303さん、または303さんの真意がお解りになる方が
いらっしゃいましたらご教授お願いしますm(__)m

PS.
私の作ろうとしている自動書き込みアプリは
荒らしが目的ではありません（＾＾；

>>328
HTTPというプロトコルを使うにあたって
・クライアントとサーバがどういうやりとりをしているか
・その際に設定するデータはIndyでどういう風に実装されているか
を理解してほしいと思われ。

>>329
HTTP 0.9レベルなら非常にかわいいプロトコルなんでSocketからスクラッチしてみるのも良い勉強になると思われ。

>>329

どうもありがとうございますm(__)m

＞クライアントとサーバがどういうやりとりをしているか

なるほど。φ(・・)　つまり303さんのおっしゃる通りの操作
をしたらこのやり取りが表示されるわけですか、一体どこで
操作を間違えてるんだろ・・


＞その際に設定するデータはIndyでどういう風に実装されているか

こちらのほうはだいたい理解しているつもりです。　例えば
「相手サーバから帰ってきたデータが自動的にIndyの
特定のプロパティに代入される。」とゆうようなこと
ですよね。(汗

>>331
local echoを有効にする
telnet起動後
set local_echo

ageちゃった・・・不覚・・・

>>333

どうもありがとうございましたm(__)m
ローカルエコーをオンにして再度試してみたところ
以下のようなデータが表示されました。↓

＿＿＿＿＿＿＿＿＿＿＿＿＿＿telnetに表示されたデータここから＿＿＿＿＿＿＿＿
HTTP/1.1 200 OK
Date: Tue, 20 Aug 2002 21:35:30 GMT
Server: Apache/1.3.6 (Unix) PHP/4.0.3pl1 mod_gzip/1.3.19.1a mod_ssl/2.3.6 OpenSS
L/0.9.3a
Connection: close
Content-Type: text/html

<HTML><HEAD><TITLE>2ちゃんねるへようこそ</TITLE>
<META HTTP-EQUIV="Content-Type"
CONTENT="text/html; charset=x-sjis">
<style type="text/css">
<!--
.unnamed1 { top:
70%; clip: rect( ); height: auto; width: auto; left: auto}
-->
</style></HEAD
>
<BODY BGCOLOR=#FFFFFF background="back.jpg">
<p align="center"><a href="http://i
.2ch.net/"><font size="-1">i-mode</font></a>○<a href="http://www.2ch.net/2ch.ht
ml">掲示板</a>○<a href="http://www.2ch.net/mag.html">２ちゃんねるメルマガ</a>○
<a href="http://www.2ch.net/kakolog.html">過去ログ倉庫</a></font></p>
<br>
<p alig
n="center"><a href="http://www.2ch.net/2ch.html"><img src="http://www.ff.iij4u.o
r.jp/~ch2/2ch-logo.gif" alt="2ch-logo.gif" width="200" height="480" border="0"><
/a><br><br>
<font size="+3"><b>お子さまへ！<br>

２ちゃんねるをみるときは、へや
をあかるくして<br>

できるだけはなれてみてください。</b></font></p>
<p align="cen
ter">２ちゃんねるのご利用は利用者各位のご判断にお任せしています。</p>
</BODY></HT
＿＿＿＿＿＿＿＿＿＿＿＿＿＿telnetに表示されたデータここまで＿＿＿＿＿＿＿＿


HTTPのバージョンやら時間やらサーバ名やら接続状態やらが
最初に表示されてますね。　そのあとに２ちゃんのTOPページの
HTMLソースと・・・φ(・・)

303さんが見せたかったのはこれのことで合ってるのかな・・

http://www.borland.co.jp/qanda/delphi/d0002805.html
こんなことをしてメモリリークはしないのでしょうか？

質問です。
ジグソーパズルみたいに、画像を張りつけたブロックを、
マウスで動かす事をしたいのですが、どんな方法がいいでしょうか？
大雑把でいいのでご教授お願いいたします。

また、ちょうどいいコンポーネントとかありますでしょうか？

>>335
しない。
理由が知りたかったらVCLのソースを嫁。

＞337
ども。C++の感覚からすると、ちと不安でした。VCLを読むきっかけにします。

>>336
＞また、ちょうどいいコンポーネントとかありますでしょうか？
叩き殺したい衝動に駆られた。

Mousedown Mouseup Mousemoveを組み合わせれば自前でドラッグアンドドロップルーチンが書ける。

>>339
Mousedown・・・は判るんですけど、
Timageとかいいのでしょうか？
真四角じゃないのとかできますか？

（´-`）。o ○ （自分で試すとかゆー発想は無いのかなぁ…）

自分で試せるぐらいなら初めから質問はしません。
質問した方が早いとの判断です。

ﾜﾗﾀ

そうですか。すみませんでした。
退散いたします。

>>342
VBスレの177だな。

>336>342
そんな態度だと教えてくれるものも教えてくれなくなるよ。
というか、ワザワザDelphi使ってゴミみたいなゲーム作るんだったら、Flashあたりで作った方が早いような気がするぞ。

>>346
VBが出たとき、これでもかって言うクソゲーが\500のシェアウェアとかふざけた時代があったなぁ。

>>336
まずは、やりたい事を、ボタンを押した時カーソルの下にあるピースをドラッグ状態にして…
なんて具合に手順手順で分割して考えてみてください。
で、その手順をひとつひとつ実現していく段階で、初めてDelphiをどう使うか、という話になります。
そうすれば、具体的に何が必要か見えてきますし、
質問も回答も具体的な話ができるでしょうから。(例えば、ドラッグを開始するには？→BeginDrag、みたいな)

>>347
そーゆーのに金払っちゃう人と、じっくり話し合ってみたい。
「どーしてドブに捨てるような金の使い方をするんですか？」

>>346
・・・342は自分じゃないですぅ。

>>348
どうもありがとうございます。
もうちょっと考えがまとまってから出直しますぅ。

語尾の「ぅ」、やめてくれないかなぅ
見ていて非常に臭ってくるぅ
マジでやらないでねぅ
おねがいぅ

つ〜か、何もまとまってないのにとりあえず聞いてみたってのが。。。

語尾の「ぅ」、やめてくれないかなモジャ
見ていて非常に臭ってくるモジャ
マジでやらないでねモジャ
おねがいモジャ

語尾の「モジャ」、やめてくれないかにょ
見ていて非常に臭ってくるにょ
マジでやらないでにょ
おねがいにょ

>>354
語尾の「にょ」、やめてくれないかピラニア
見ていて非常に臭ってくるピラニア
マジでやらないでピラニア
おねがいピラニア

>355
語尾の「ピラニア」やめてくれないかアウストラロピテクス・アファレンシス
見ていて非常に臭ってくるアウストラロピテクス・アファレンシス
マジでやらないでアウストラロピテクス・アファレンシス
おねがいアウストラロピテクス・アファレンシス

>356
語尾の「アウストラロピテクス・アファレンシス」やめてくれないかヨウ化ジフェニルピペリジノメチルジオキソラン
見ていて非常に臭ってくるヨウ化ジフェニルピペリジノメチルジオキソラン
マジでやらないでヨウ化ジフェニルピペリジノメチルジオキソラン
おねがいヨウ化ジフェニルピペリジノメチルジオキソラン

>357
語尾の「ヨウ化ジフェニルピペリジノメチルジオキソラン 」やめてくれないか札幌市デジタル創造プラザ インタークロス･クリエイティブ・センター
見ていて非常に臭ってくる札幌市デジタル創造プラザ インタークロス･クリエイティブ・センター
マジでやらないで札幌市デジタル創造プラザ インタークロス･クリエイティブ・センター
おねがい札幌市デジタル創造プラザ インタークロス･クリエイティブ・センター

>358
語尾の「札幌市デジタル創造プラザ インタークロス･クリエイティブ・センター」やめてくれないかナカバヤシ Colorインクジェット フォトプリント光沢紙PX フォト・エクストラ・ハイグレード
見ていて非常に臭ってくるナカバヤシ Colorインクジェット フォトプリント光沢紙PX フォト・エクストラ・ハイグレード
マジでやらないでナカバヤシ Colorインクジェット フォトプリント光沢紙PX フォト・エクストラ・ハイグレード
おねがいナカバヤシ Colorインクジェット フォトプリント光沢紙PX フォト・エクストラ・ハイグレード

>359
語尾の「ナカバヤシ Colorインクジェット フォトプリント光沢紙PX フォト・エクストラ・ハイグレード 」やめてくれないかニンテンドー ゲームキューブ ワイヤレスレシーバー&ニンテンドー ゲームキューブ ワイヤレスコントローラ ウェーブバード
見ていて非常に臭ってくるニンテンドー ゲームキューブ ワイヤレスレシーバー&ニンテンドー ゲームキューブ ワイヤレスコントローラ ウェーブバード
マジでやらないでニンテンドー ゲームキューブ ワイヤレスレシーバー&ニンテンドー ゲームキューブ ワイヤレスコントローラ ウェーブバード
おねがいニンテンドー ゲームキューブ ワイヤレスレシーバー&ニンテンドー ゲームキューブ ワイヤレスコントローラ ウェーブバード

モナーの *やさしい* なんだから たしょうアレでもやさしくしてやれよぉ

>>361
>>354以降に罪はないだろ・・・。

やりすぎだお前ら(w

・・・だめだ。
>360のニンテンドー(以下略)より長い名前が見つからない・・・

>>364
ジュゲ（略

>>364
語尾の「ニンテンドー ゲームキューブ ワイヤレスレシーバー&ニンテンドー ゲームキューブ ワイヤレスコントローラ ウェーブバード
」、やめてくれないかパブロ・ディエゴ・ホセ・フランシスコ・デ・パウラ・ファン・ネポムセノ・マリア・デ・ロス・レメディオス・シプリアーノ・デ・ラ・サンテシマ・トリニダット・ルイス・イ・ピカソ
見ていて非常に臭ってくるパブロ・ディエゴ・ホセ・フランシスコ・デ・パウラ・ファン・ネポムセノ・マリア・デ・ロス・レメディオス・シプリアーノ・デ・ラ・サンテシマ・トリニダット・ルイス・イ・ピカソ
マジでやらないでパブロ・ディエゴ・ホセ・フランシスコ・デ・パウラ・ファン・ネポムセノ・マリア・デ・ロス・レメディオス・シプリアーノ・デ・ラ・サンテシマ・トリニダット・ルイス・イ・ピカソ
おねがいパブロ・ディエゴ・ホセ・フランシスコ・デ・パウラ・ファン・ネポムセノ・マリア・デ・ロス・レメディオス・シプリアーノ・デ・ラ・サンテシマ・トリニダット・ルイス・イ・ピカソ

ギネスに載っている世界一長い人名を書こうとしたが、書くのが気が遠くなる位長かったのでやめますた。

K.Sankaranarayanan教授？

　　　　 ///////
　　　　///////＿＿＿＿＿＿＿＿＿＿＿_
　　　 /////// ￣￣￣￣￣￣￣￣￣|￣￣
　　　///////　　　　　　　　　　　　　 (~)　ﾁﾘﾝﾁﾘﾝ
　　 ///////　　　　　　　　　　　　　　ﾉ,,
　　///////　　　　 ∧＿∧　　　　　　　　 ／￣￣￣￣￣￣
　 ///////　　　　 （　´∀｀）（ 厨 ） )）　＜　　夏だなあ〜
　/////// 　　　　 （つ　へへ つ　　　　　 ＼＿＿＿＿＿＿
///////　　　//△ ヽλ　 ）　）　旦
//////　　l￣￣￣￣￣￣￣￣￣￣￣l
/////　　　￣| .|￣￣￣￣￣￣￣| .|￣
////　　　　　^＾^　　　　　　　　　 ^＾^

　　　　２chの夏。厨房の夏。

Delphi6でAS400につないでる人いませんか？
うまくいかなくて困っています。

>>370
マルチポストは迷惑です。

>>370
Delphi/400じゃなくてDelphi6でつないでるの？

>>372
そうです。Delphi400ではなくDelphiでつなぎたいのです。
Delphi400はないので。

Delphiはいつの間にバージョン400まで行ってたんだ？

>>374
つまんねー

　　　　　∧＿∧
　　　　 （　´,_ゝ`）　ﾌﾟｯ
　　　　／　　　＼
　　　 /　　 　/￣￣￣￣/
　 ＿_(__ﾆつ/　 FMV　 /
　 　　　 ＼/ 　　　　　 /￣￣
　　　　 　 ￣￣￣￣￣

Delphi/400、それは負の遺産。

>>376
超薄型PCだな。

Delphiじゃつながらないなあ、Tケーブルかなにかじゃないと・・・
ってネタは置いといて、普通そういうのはミドルウェア噛まさないか？

ところでDelphi/400は現行製品ですが？(まだD5がベースみたいだが。)
http://www.migaro.co.jp/

>>378
モバイル板で人気のノートです。
http://pc3.2ch.net/test/read.cgi/mobile/1007674054/

キムタクに憧れて表紙にレタリングしました。

Delphi6にて
目的、プログラムからWINDOSのアクティブデスクトップにhtmlファイルを登録する。
関連するunit 　　ShlObj,comobj, WinInet;
現在の進捗
IActiveDesktop　<WINDOWSのコンポーネントを使って実現する（多分）
このコンポーネントを使って壁紙の変更はできている。（コンポーネントの呼び出しは間違っていない）

質問
1）このコンポーネントでそもそもアクティブデスクトップにＨＴＭＬを登録できるのか？

2）もし可能ならどのメソッドを使うのか？

msdnURL
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/ifaces/iactivedesktop/iactivedesktop.asp
3)いくつか該当しそうなメソッドがあるので、
ADDDesktopItem()
ADDUrl（）
を試したのだが...パラメーターエラーを返してくる。
何処がエラーだか分からないのでご指摘をお願いできますか？。
----------------------------------------------------------

続き
Ｖ以下資料＆実験報告
hObj := CreateComObject(StringToGUID('{75048700-EF1F-11D0-9888-006097DEACF9}'));
ADesktop := hObj as IActiveDesktop;

with Cop do begin
dwSize:= sizeof(Cop);
iLeft:=0;
iTop:=0;
dwWidth:=300;
dwHeight:=300;
izIndex:=0;
fCanResize:=true;
fCanResizeX:=true;
fCanResizeY:=true;
iPreferredLeftPercent:=100;
iPreferredTopPercent:=100;

end;
With Co do begin
dwSize:=sizeof(Co);
dwID:=0;
iComponentType:=COMP_TYPE_HTMLDOC;
fChecked:=true;
fDirty:=true;
fNoScroll:=true;
cpPos:=Cop;
StringToWideChar('hoge',wszFriendlyName, MAX_PATH);
StringToWideChar(OpenDialog1.FileName,wszSource,INTERNET_MAX_URL_LENGTH);
StringToWideChar(OpenDialog1.FileName,wszSubscribedURL,INTERNET_MAX_URL_LENGTH);
end;
// Ecode:=ADesktop.ADDUrl(hwnd,wstr,Co,ADDURL_SILENT);
Ecode:=ADesktop.AddDesktopItem(Co,0);

実行するとパラメーターが不正とエラーが帰ってくる。

続き
かなりお手上げ状態です。
パラメーターが不正は、おそらくconponent　構造体が間違っていると推測されるが
どこが間違っているか不明。

ShiObj　unitで宣言されている　_tagCOMPONENTの宣言文
type
{$EXTERNALSYM _tagCOMPONENT}
_tagCOMPONENT = packed record
dwSize: DWORD; // Size of this structure
dwID: DWORD; // Reserved: Set it always to zero.
iComponentType: Integer; // One of COMP_TYPE_*
fChecked: BOOL; // Is this component enabled?
fDirty: BOOL; // Had the component been modified and not yet saved to disk?
fNoScroll: BOOL; // Is the component scrollable?
cpPos: TCompPos; // Width, height etc.,
wszFriendlyName: array[0..MAX_PATH - 1] of WideChar; // Friendly name of component.
wszSource: array[0..INTERNET_MAX_URL_LENGTH - 1] of WideChar; //URL of the component.
wszSubscribedURL: array[0..INTERNET_MAX_URL_LENGTH - 1] of WideChar; //Subscrined URL
end;

msdnのそれと見比べると微妙に違う部分がある
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/structures/component.asp
------------------------
連続書き込みすいません。
どなたか解かる方、ご教授ください。

ああ宿題スレで思いっきり無視されたやつだ

>>384
壮大な宿題だな。

W2KでCOMポートを叩くライブラリを探しているんですが、
DSPで探すもことごとく玉砕･･･。お勧めのものはありませんか？

やりたいことは、外部デバイスが繋がっているCOM1を監視して
何か来たらそれを読みたいってことなんですが･･･。

>>386
CreateFile

>>386
今はやりのワン切りプログラムですか？

>>386
これはダメか？
http://www2.arnes.si/~sopecrni/

>>387 (;´Д｀) !
>>388 COMに繋がったゲームコントローラと通信をしたいんです。
>>389 ありがとうございます。これ確か、ライブラリ導入段階で諦めてしまった奴です。
翻訳しながら再挑戦してみます。VCLじゃないとつい弱気になってしまって。

>>390
少なくとも導入時については翻訳するほどでもなかったような。
選択すべきメニューが File/Open とか書いてあるから拾い読み程度で済んだ。

こうやって動いてる香具師もいるので、頑張れ。

>>391
冷静になったらできました！Runtime使うのは初めてだったので
ミスってたようです。ありがとうございます〜。

>>390
http://www.google.co.jp/search?hl=ja&inlang=ja&ie=Shift_JIS&q=CreateFile+%83V%83%8A%83A%83%8B&lr=lang_ja

すみません、厨な質問で申し訳ありません、
Delphiで、ウィンドウが移動されたのを検知するにはどうすればいいんですか？

procedure WMMove(var Message: TWMMove); message WM_MOVE;

というのを、TForm1のprivateなところに書き足して、
Ctrl+Shift+Cを押すか、Personalなら手で地道に

procedure TForm1.WMMove(var Message: TWMMove);

間違えて送信してしまいました。

procedure TForm1.WMMove(var Message: TWMMove);
begin
　inherited;
　{必要な処理}
end;

で、いいと思います。
OnMoveなんてイベントが無い以上、それほど厨な質問でも無いかと。

>>396
ありがとうございます、とても参考になりました。
本当にありがとうございます。

ん？継承してんの？

やっと掲示板に書き込むプログラムの作り方が
解りました。　ヒントをくれた皆様、どうもありが
とうございました。m(__)m

予想外に長い道のりでしたが無事に作ることが出来た
ので頑張ったかいがありました、初めて自分で
自分を誉めたいと思います。

では遠慮なく・・・


よくやったね　＞自分

ありがとうございます。

TColorのclWinow（ウィンドウの背景色）は
具体的はどこの色を見てるのでしょうか？
とっても素人な質問ですみませんがよろしくお願いします。

メモ帳の文字が入力されるところの背景色。

画面のプロパティ

追加
画面のプロパティ＞デザイン＞指定する部分＞ウィンドウ
で指定した色

VCLのソースコードは見ないの？Personal版？

>403
なるほど・・・
ありがとうございました！

Delphiでプロジェクトを開くときにデフォルトのフォルダってどうやったら変更できるんですか？

ショートカットの作業フォルダ変えるだけじゃだめだっけ？

>>407 それで(・∀・)ｲｲ!!

pasファイルをプログラム内で呼び出すにはどうすればいいのですか？
あと、DelphiXコンポーネントをDelphi6パーソナルに組み込むこと可能ですか？
できるなら教えてください

もう来るなよ>>山川

>pasファイルをプログラム内で呼び出すにはどうすればいいのですか？
実行時に指定した.pasファイルを呼び出すって事？
だったらDLLを作ってください。

>pasファイルをプログラム内で呼び出すにはどうすればいいのですか？

意味わかんねーなぁー

そこで宣言されている関数とかクラスとか定数とかを使いたいってこと？
たんに uses に加えるだけでは？

>411-412
なるほど、わかりました。ありがとうございます。
usesにいれるだけでした。

どなたかDelphiXコンポーネントをDelphi6パーソナルに組み込む方法
教えてください。ちなみに普通のコンポーネントのインストールは
わかるのですが…DelphiXって6には対応してないのかな？

（´-`）。o ○ （ちょっとは自分で調べるっことしないのかなぁ？
「DelphiXって6には対応してないのかな」…対応してないって書いてあるのに
なぁ…
書きゃ答えてもらえると思ってないかなぁ…）

>>414
答えてるじゃん

（´-`）。o ○ （>>415そーゆー問題じゃないと思うなぁ…
しつこくしつこく同じこと聞いてくると思ったからしょうがなく、つまんねーこと
書いたのに…
４１３＝４１５かなぁ…
答えてもらえないからって、同じこと何度も書くのはどうかなぁ…）

uses の意味も分からず、いきなり DelphiX かぁ。
なんか、大変そう。
ちゃんと文法とかをやったほうがよいと思われ

失礼しました、今までのとおりQuadupleDでやっていきます。
回答大変ありがとうございました。

>>416
すいません、私と415は別人です。。。

>>410

　 ∧＿∧　　／￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
　（　´∀｀）＜おまえモナー
　（　　　　）　.|
　｜ ｜ ｜　 |
　（＿_）＿） 　＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿

うーん・・・「Delphiでプロジェクトを開くときにデフォルトのフォルダって
どうやったら変更できるんですか？」と聞いたものですがちょっとわからないです
ショートカットの作業フォルダ？　　
すんませんもうちょいｱﾌｫでもわかるように説明していただけませんか？
おながいします　　世界中のｴﾛｲ人

>>420
じゃ、逆に、何のためにデフォルトフォルダを変更したいの？って聞いてみよう。

>>421 何の為？　なんて言うかあまり階層を辿りたくないんですよ　本能的に(w
今はちょっと考えてデフォルトのProjectフォルダの中に変更したいフォルダのショートカットを入れてます
でもワンアクション多いのがちょっと・・・（´Д｀；）　
どうにもならんでしょうか？

では次に、プロジェクトのショートカットアイコンのプロパティを開いてみてください。
何か発見できると思いますが。

後で同じとこで迷うヒトのためにリンクはっとこ。
HTTPapp.pasが無いpersonalな方はこれをインストしましょ。

文字コードを変換してくれるコンポーネント。
plaza11.mbn.or.jp/~pz/delphi/pzconv/document.htm
（HTTPEncode関数の代わりに使えます。）

んじゃ。

>>422
つか、開きたいだけだったらプロジェクトファイルダブルクリックでいいんじゃ？

>>422
単に、IDE 起動時のデフォルトディレクトリ(フォルダ)を変更したいだけなら、
Delphi のショートカットアイコンの初期値を変更すればよいかと。

謎は全て解けた！！！　　　ヽ(´ー｀)ノ　　世界中のエロイ人たちありがとう！

大丈夫なのか？
ほんとに解けたのか？

DelphiXはDel6にインストール可能です。
手順が長いのでこちらには書きませんが
googleで調べたらすぐに出てきますよ。

>>429
でてきますよ、じゃなくてリンク貼れやｺﾞﾙｧ
無駄に生きてどうするよ

ttp://turbo.gamedev.net/delphixd6.asp
ですね、ありがとうございました。

昨日までコンポーネントのインストールには問題なかったんですが
突然インストールできなくなりました
pasファイルを読み込んでコンパイルしようとすると
「[致命的エラー] ファイル 'e:\program files\borland\delphi6\Projects\Bpl\form.bpl' を作成できません」
っとなります　　原因は何でしょうか？

類推出来ること

１．再インストすれば直りそう
２．delphiをＥドライブに入れている
３．バージョンは６だ
４．form.bplがイカレてんだろう、きっと

やっぱそうですか・・・Projectsの中のbin?とかいうフォルダを消しちゃって・・・
再ｲﾝｽｺします

BINファイルってどのアプリで開けばいいのでしょうか？
どなたか教えてくれませんでしょうか。

>>435 に答えていいものだろうか？

エディタの背景色ってどうやって変えるんですか？　エディタオプションでやってもよくわからん。。。
ちなみにみんなはどの色でやってる？

すんません　Serversocketのイベントで「ServersocketError」ってのがあるんですが
イベント欄に見当たりません
実際には存在するんでしょうか？　

>437
エディタオプション＞色のタブで、右上の「デフォルトを使用」グループボックスのチェックを外してミソ。
左下の色を選ぶところに「BG」とあるのが背景。「FG」とあるのが前景(文字だったら文字の色)だよ。
色を左クリックで前景色、右クリックで背景色。

文法要素の一個ずつに設定しなければいけないので面倒くさいけどね。
逆に言えば一個ずつ設定できるので便利。

・・・というか、俺はデフォルトの白だね。
目が疲れている場合は、黒にする。

>>430
張ったら這ったで英語サイトを平気ではるやつウザイとかいうから、
いやなんだよ（´д｀；）

そういや、この前な、英語なのでインストールできませんでした、
なんていう奴がいたもんでな。
どっかのHSPのスレッドだっけか。

HSPスレにまで布教にいかなくても（;´Д`）

>>440
2ch だし、細かいことは気にせずいこうよ。

>>435
バイナリエディタ (ﾎﾞｿ

最近Redhatをインストールしましたが、X-Windowの解像度変更と
デュアルディスプレイ化をしたいのですが　どの様にしたら良いか
アドバイスを頂ければありがたいです。

※解像度のほうは、Xconfiguratorを使ってやってみましたが
かゆいところに手が届かないと言った感じでした。

デュアルディスプレイについては見当も付きません。

諸先輩方々、すみませんがよろしくお願いします。

>>445
・X-Windowsってなんですか？(お約束)
・Delphiとなんの関係があるんですか？(お約束)

>>446
ごめん、X-WIndowだった。

って言うかわざとだろ。debianネタふってる奴。

間違えましたー

>>444
ありが�d。
バイナリティエディタか。・・・・・なんだよそれ。

モナーさん、質問です。
スタートボタンとストップボタンを作ります。
スタートボタンを押すと、「repeat 〜 until 〜;」を用いた無限ループである処理をして、
ストップボタンを押すと止まる様な処理をしたいのです。
無限ループをそのままにしておくと、他のボタンが効かなくなってしまうので、
ApplicationのProcessMessageを使えば良いと思い、
repeat
　〜
　Application.ProcessMessage;
until 〜;
としてみたのですが、巧くいきません。
Del6 Personalです。
関係ないですけど、作ってるのはTListBoxに素数を列挙するという物です。
解決法、よろしくお願いいたします。

フラグを用意しておいて
スタートでフラグON
ストップでフラグOFF
ProcessMessagesをしたあとにフラグの状態を調べ、
OFFになってたらループを抜ける

すいません、ListBoxのアイテムの重複をなくすにはどうすればでしょうか。

>>452
ありがとうございます。
この件のやり方はわかったのですが、ProcessMessage自体がよくわかってないっぽいです…。

>>453 たしかプロパティに重複禁止　と言うのがあったようなー
んで、.sort　だったようなー

>>454
別にProcessMessageにはループうんぬんに直接関係あるワケでなくて、
「固まらないようにする」ってことです。
うまくいかないってどのへんがだろう？
var flag:boolean;
とかなんとかやってますか？フラグ用意して、最初にfalseにして、
「止めたい方のボタン」にフラグをtrueにするようにして、
trueならやめると…。
前にも同じ様な質問あったな…。

素直にマルチスレッドにしてはどうか？

むむッ？激しくトンチンカンなレスした予感…。
だとしたら失敬。
456は忘れて。
ボスケテ。

坊さんと出るかい？

delphiproのDemos→Internet→chat→clientのTimerって何をしてるんでしょうか？

こんなドメインが立ち上がっておりますた。
http://dotnet.borland.com/

delphiのサンプルってあまり落ちてない？
http://www.planet-source-code.com/vb/default.asp?lngWId=7
ぐらいしか見つからなかった・・・（´Д｀；）

何のサンプルがほしいんだよ。

tp://www.nifty.ne.jp/forum/fdelphi/samples/index.htm
ここは？

DELPHIで作られたアプリを逆コンパイラしてソースを見せてくれる
ソフト、または方法ってある？

http://www.vector.co.jp/soft/win95/prog/se189339.html
逆コンパイラっぽいものはあるけどソースは見れない。

無いならないでいいが。

リヴァースエンヂニアリングｯﾅ！

フォームの変更ならResourceHackerでできる。
あと文字列はエディタで見ればモロ見え。
レジストリの記録場所も分かる。
なんのDLL使ってるかも分かる。

でもソースは無理。

Del6製のアプリには使えないっぽいんだけど。＜ResourceHacker

>>468
別にリソース除く程度なら、ResHackerじゃなくてもいいべ。
VisualStudioのIDEでも覗けるし、フリーとかもいっぱいあるべ。

>>467

どもども

やっぱ無理ですか・・　無念。

逆コンパイルを逆コンパイラと書き間違えたのは秘密。

馬鹿ばっか

生産的な話をしろよ

>>471
生産的な話をしろよ

凄惨的な話

現在開いているファイル名の取得はどのように行なったら宜しいのでしょうか？
QuickReportなどに貼っているTtableのtablenameに送りたいのですが・・・

素人な質問で恐縮ですが、よろしくお願いいたします。

>>474
自分で開いたなら自分でわかるだろ

>>475
OpenDialogなどで開いたファイルをプログラムの変数として扱いたいです。

Del厨ってやっぱ馬鹿だな(藁

>>477
悪い、これに関しては謝罪するわ。

× >>477
○ >>471

>>479
誰お前？

>>480
>>478です。

>>481
楽しい？

>>481
偽者さん、必死だな。

>>483
まったくだ。

本物はトリップつけてない奴です。

俺が本物かもしれない。

>>479-486
おい。お前ら俺を騙るのはよせ。

　　　　 ///////
　　　　///////＿＿＿＿＿＿＿＿＿＿＿_
　　　 /////// ￣￣￣￣￣￣￣￣￣|￣￣
　　　///////　　　　　　　　　　　　　 (~)　ﾁﾘﾝﾁﾘﾝ
　　 ///////　　　　　　　　　　　　　　ﾉ,,
　　///////　　　　 ∧＿∧　　　　　　　　 ／￣￣￣￣￣￣
　 ///////　　　　 （　´∀｀）（ 厨 ） )）　＜　　夏だなあ〜
　/////// 　　　　 （つ　へへ つ　　　　　 ＼＿＿＿＿＿＿
///////　　　//△ ヽλ　 ）　）　旦
//////　　l￣￣￣￣￣￣￣￣￣￣￣l
/////　　　￣| .|￣￣￣￣￣￣￣| .|￣
////　　　　　^＾^　　　　　　　　　 ^＾^

　　　　２chの夏。厨房の夏。

Del厨の夏は篤いぜ！

日本はまだまだ暑いと聞くけど、何かあったのかな？

書き込みにクッキー必須になっているし

荒れｷﾞﾐですが...ちょっくら質問。

Inprise が保証しないのは承知ですが、Delphi4 で作成
したアプリはWinXP で動きますか?
232C とメモとファイルアクセス程度なんですが。
Delphi4 標準の Component & API を使用して作るつもりです。

>>491
OS の互換性の保証は OS メーカー側なんだけどね。
XP のビジュアルスタイルを使わなければ、大きな問題は出ません。D3 の
アプリ、使っています。

問題が出やすいのは、オーナードロー。MS がコモンコントロールの動きを変えたので
状況によってはちらつきや、再描画の遅延が起きます。

朝、ご質問をしたのですが少々荒れていて埋没してしまいましたので改めまして、

現在開いているファイル名の取得はどのように行なったら宜しいのでしょうか？
QuickReportなどに貼っているTtableのtablenameに送りたいのですが・・・

素人な質問で恐縮ですが、よろしくお願いいたします。

>>493
自分で開いたなら自分でわかるだろ

... 「現在開いているファイル名」誰が開いたファイル名を取得したいの？

>>492
Thanks です。
Delphi3 をお使いですか。
だったら Delphi4 でも大丈夫そうですね。

> OS の互換性の保証は OS メーカー側なんだけどね。
「仕様です。」 って返事 Only ですからな〜。 (w

>>494
OpenDialogなどで開いたファイルを変数として
動的にTtableのtablenameを変えたいです。

>>496
普段、OpneDialpgってどうやって使ってるの？
OpenDialogでユーザーが指定したファイル名の取得が分からないってわけじゃないよね？
もしそうなら、OpneDialogって使えないし、それが判るなら、何がわからないのかわからない…
とりあえず、OpneDialogの、FilenameプロパティはString型。でヒントになる？

>>497
買ってきた本と睨めっこをしながら手探りで、まだ知識となっていないので
書いているコードなどが、何を差してるか分かっていなかったです。
ヒントになりました、ありがとうございました。

プログラムの実行時に動的にコンポーネントを生成してそれをフォームなどに
表示するにはどうしたらいいでしょうか？

例えば、ラベルを生成してフォームのLeft20、Top40の位置に表示するにはどう
すればいいでしょうか？

>>498
がんがれ!

Help は使い難い(分かり難い)けど、Help を使う癖をつけよう。
OpenDialog にカーソルを置いて F1 だ!

http://www.nifty.ne.jp/forum/fdelphi/faq/00117.htm
>499

>>501
ありがとうございました。
出来ました。

これで夏休みの課題も終わりました。
感謝です。

かわいいエイリアンって何ですか？

遊ぶかね欲しさに遺憾の意を表明ってことです。

ネタスレで質問してる人は、相談スレに行ってください

*と*.*ってどう違うんですか？

>>506
使う局面による。

TPanelを継承したTKsBlockというクラスを別ファイルで作りました。
動的にパネルを配置し、パネルをマウスでクリックしたときbeepを鳴らしたいのですが、
うまくいきません。教えてください。m(__)m
********
unit Unit1;

interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, KsBlock, StdCtrls;
type
TMainForm = class(TForm)
Button1: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
private
public
procedure KsBlockMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
end;
var
MainForm: TMainForm;
block: TKsBlock;
implementation

procedure TMainForm.KsBlockMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
Beep;
end;

procedure TMainForm.FormCreate(Sender: TObject);
begin
// ↓ここで、エラー。イベントの関数を割り当てたい。
// block.OnMouseDown := KsBlockMouseDown;
end;

// ボタン押したら、動的にコンポーネント作成
procedure TMainForm.Button1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
block := TKsBlock.Create(MainForm);
block.Parent := MainForm;
block.Left:= 100; block.Top:= 100; block.Width :=100; block.Height:= 100;
beep;
end;
end.

unit KsBlock;

interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, ExtCtrls;
type
TKsBlock = class(TPanel)
private
public
constructor Create(AOwner: TComponent);
end;
implementation
constructor TKsBlock.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
end;
end.

長文スミマセン。
タブがそろって見づらくなってしまいました。

>>508
エラーの原因は
Createで まだ作ってないインスタンスのメンバ（プロパティ）に代入しようとしてるから

それと、そのやり方だと 古いblockはどうなるの？
単にどんどん作りたいなら
　with TKsBlock.Create(MainForm) do begin
　　Parent := MainForm;
　　OnMouseDown := KsBlockMouseDown;
　　Left:= 100;
　　Top:= 100;
　　Width :=100;
　　Height:= 100;
　end;
beep;

とすればいいし、別の仕様ならそれなりに考えて

>>511
ありがとうございます！！！烈しく感謝です！！！！！

すみません、ヘルプファイルをHTMLで書いたのですが
これをInternetExplorerを起動して見たいのですが
どの様にしたら良いのでしょうか？

−MSのHTML-helpと言うのもあるみたいですが、変更箇所もまだまだ出るので
普通のハイパーテキストとブラウザを使いたいです。

どなたか優しい御仁、素人な質問ですみませんがよろしくお願いします。

そのファイルをExplorerからダブルクリックするだけだろ・・・
プログラムから開きたいならShellExecute使え

絶対パスではなくて、そのＰＣごとにあったように
相対パスの書き方で、できればお願いします ｍ（_ _）ｍ

>514
素早いレス、ありがとうございます。
ShellExecuteと言うのがあるのですね。
この後、使い方を調べてみます。

・・・でも相対パスの書き方は、僕のスキルだと難しそうです。

ExtractFilePath(Application.ExeName) + 'help\index.htm'

>517
あ、ありがとうございます。　・・・たぶん、僕宛てですよね。

素人なのでこれが何を差しているかどの様に使うのか、ちょっと謎です。
すみませんが、もう少しヒントをください。

それとShellExecuteのHelpを見たのですが、日本語化されてないのですね。
ちょっと手強いです・・・

>>518
あれくらいの〜英語くらい〜読めないと〜

MSDNの英語くらい諦めずに嫁

ExtractFilePath

これのことでしょ

MSDN見れば日本語でみれるっしょ……
そうでなくても、google見れば、MSDNがイヤでも引っかかるご時世なのに……

（´-`）。o ○ （多分、「ヒント」じゃなくて、「ズバリ（ソースとか）」
じゃないと、解決しない予感…）

(´-`).｡oO( そのまえに、相対パスと絶対パスの違いを教えてやんなさいな ）

それすら知らないプログラマがいたなんてかなりびくーり。
ぷろんぷとって使ったことないのかな？
いまどき、Webデザイナですら知ってる言葉なのに・・・・。

>>524
Webデザイナだから知ってるんだよ。

（´-`）。o ○ （ウィンドウズ・エックスペー世代はＤＯＳなんて
いじったことなかったりして…）

そうなのかも、チョット切ないね。
あんな便利な物が過去の遺物扱いになってしまうなんて・・・。

漏れにとってはデザインのいけてないアプリなんかよりシェルのほうが使いやすいがな。
でもステキデザインのアプリは別、ユーザインターフェイスとしてね。

>>518
ExtractFilePathとApplication.ExeNameは日本語のヘルプがあるだろ
それくらい読め

無内容なレスばっかり・・・

529＝無内容なレス

ばーか　俺のはメタレスだ

>>529-532
>530

>>529
procedure hoge;
begin
showmaeesge('>>529=質問者はソースが書いてないレスは一律無内容のようです。');

end;

質問です。
ウィンドウForm1があって、その中にScrollBoxLとScrollBoxRが左右に２分割してあります。
右側のScrollBoxR上のPanelをマウスで摘んで左側のScroolBoxLに配置したいと考えています。

右側のPanelをマウスでクリックしたときに、Panel.parentをForm1とするPanelを動的に作ろうとしたのですが、
作った瞬間、ウィンドウの同座標にPanelが作成されるまではいいのですが、左側のScrollBoxLの
エリアが右側に広がって、ScrollBoxL上のパネルになってしまいます。

どうすればいいのでしょうか？
ScrollBoxLとScrollBoxRをまたげるPanelというのは作れないのでしょうか？
また、このようなプログラムを作る場合、どういう方法がベストでしょうか？

よろしくお願い致します。m(__)m

SetParent()

>>535
ありがとうございます！！　ヽ（´∀｀　）ﾉ
でも、Panel.parentで指定してますし、改めて、SetParent()やってみましたがダメでした。
しかし、その後いじくっていて、Form1.AutoScrollをtrue→falseにしたら、
うまくいくようになりました。

動的にパネルを配置したときに、なんでか左側のScrollBoxLの範囲に乗っかるように
Ｗｉｎｄｏｗがスクロールされてしまうみたいです。

あの初心者からの質問ですが・・・
今度、Delphi Studio 7がでますが、あれを使うと .NETフレームワーク
アプリを作れるようになるのでしようか?
これからは、Webアプリを作ることが多くなる一方、Delphiの方が
開発速度もはやいときいているんで、こっちを書いたんですけどね。。

>>537
.NETを使うなら開発速度はDelphiもC#もVB.NETも同じ。
Delphiの開発速度がはやいというのは.NETに対応していないVC等に対して。
特に理由がなければC#にしとけ。

>>537
.NETアプリを作成する際にMSの開発環境以外を選択する理由は
安置MSであることのみ。とBorland自身が言っている。

もはやBorlandの技術的アドバンテージは皆無って事。

仮に安置MSであったとしてもDel7は最悪の選択肢なので
せめてDel8まで待ったほうがいい。

>>539
> NETアプリを作成する際にMSの開発環境以外を選択する理由は
> 安置MSであることのみ。とBorland自身が言っている。
ソースｷﾎﾞﾝ

Delphi.NETスレ作らね？

いらない。

レスありがとうございます。
以前は、dllファイル不要(?)のDelphiアプリってすごい魅力的だったように
思ったのですが、今では VB.NETでも同じですか。。
じゃあ、VB.NETを覚えようと思います。

>>543
参考までに.NETのDelphiはDLL必要。

なんだ、Delphiにランタイム要るのか。
全然ダメだね。(藁

>>543
.NETの案件があるんですか。
差し支えない範囲で内容教えてもらえませんか？

↓これ動かないんですけど。Del6の無料版です。

言っておくけど、.NETは普及しないよ。失敗するよ。
ActiveX みたいに。

↑あなたは動かないらしい。

>>540
ttp://www.zdnet.co.jp/news/0208/26/ne00_galileo.html

中身空のtxtファイルを生成したいだけなので、
SaveToFileをTMemoとかTPictureなしで使いたいんですがどうしたらいいでしょうか。

>>551
何もSaveToFile使わなくても、FileCreateでも何でもいいんじゃ？

>>552
ありがとうございます。FileCreate、覚えました。
あれ〜、なんで最初にヘルプ探した時に気付かなかったんだろう(^^；

>>553
Del使いのレベルを誤解されるのでそう言う発言は控えてください。

>>554
そういうスレですのでお前が発言を控えてください。

>>551
with tstringlist.create do begin savetofile('a.txt'); free end;

556 はいつも全部小文字で書いてるの？

↑ の340はフサスレからの流れ。かんべん

初歩的な質問かも。

TListBox.Itemsの文字列をOLEドラッグ＆ドロップ（送るだけ）したいんだけど
やり方がわからん・・。
どなたかヒントを教えて下さい。

Delphiをはじめたばかりでわからないことだらけなのですが、
１つ教えてください。
動的にメモリを確保する（プログラム実行時まで配列のサイズがわからない）方法を教えてください。

その質問の意味すらわからない俺って・・・

動的配列

探していたら見つかりました

http://www.geocities.co.jp/SiliconValley-SanJose/2560/delphi4/pascal/index.htm

ありがとうございました

http://www.leverage.jp/bloom/start/

と思ったらあまり役に立たなかった。
GetMemで確保したメモリを配列のように扱えないのでしょうか。
下のような使い方しかわからない。

var
pData : PInteger;
pTarget : pInteger;
begin
GetMem(pData , 10);
pTarget := pData;
for i:= 0 to 10 do
begin
pTarget^ := i * 10;
Inc(pTarget);
end;

>>565
>>562の動的配列や、TListじゃ駄目なのか？

>565
こういう感じじゃいかんの？
var
Buf:array of Char;
begin
SetLength(Buf,10);

563のどこを見てたの？動的配列やりたいんじゃないの？

>>563
>「Pascalにない数学関数の作り方」
ん？これって全部math.pasにないか？

>>566
動的配列って自分でメモリ確保することの別名かと勘違いして流してしまいました。
TList調べて見ます。

>>567
ありがとうございます。試してみます。

>>568
上の方のメモリの確保に目がいって下の方の動的配列を見逃がしていました。

>>569
確か昔はなかったと思う。
あと最下位エディションにはmathユニットが付属してなかったし。

>>565
　配列として使いたいなら
type
TAInteger = array [0..9]Integer;
pTAInteger = ^TAInteger
var
pData : PInteger;
paData : pTAInteger absolute pData;
begin

とやれば pDataとpaDataは同じ番地に配置されるから
GetMem(pData , 10); として
paData^[i]　と配列アクセス出来る。
なお、この方式の場合配列サイズは考慮されないようす

Delphiは純パスカルと違って、メモリアクセスに関しては案外と柔軟

「動的配列」といわれたらまずはヘルプ検索しなよ。
webべったりは効率悪いよ。バージョンの違いで嘘情報になってることもあるし。

>>571
いまは open にも math ついていますって。

delphiでtiffファイルを扱いたいのですが
参考になるソース、HP、書籍などありましたら教えてください

>>574
知ってる。だから過去形で書いた。

>>575
http:www.google.com

>>575
参考になるようなならないような。
http://leed.issp.u-tokyo.ac.jp/~takeuchi/delphi/browse.cgi?index=062973&back=http%3A%2F%2Fwww2%2Ebig%2Eor%2Ejp%2F%7Eosamu%2FDelphi%2Fdelphi%2Dbrowse%2Ecgi%3Findex%3D062973

>>577
吐駄はｶｴﾚ!

Delphi7日本語版はもう発売されたの？

>>579　9月26日だそうだ

コンパイル・実行する時に、
「ソースファイルが見つかりません：Graphics.pas」というダイアログが出て、実行できないんですけど、
Delphiのフォルダから、何かを間違えて消してしまったってことでしょうか？
教えて下さい。

lib\Graphics.dcu ?
CD からコピー。

Graphics.pasです。
ちなみにLib\Graphics.dcuはありました。

.pasって、ユニットソースファイルらしいですけど、
uses節に書かれているGraphicsの参照先でしょうか？
何も書いてないときは普通にコンパイルできるのですが、
Image1.picture.LoadFromFile…という所を書いたらエラーが出ました。
picture: TPicture←これがGraphicsユニットに属するらしいですが…。
どなたか教えて下さい。

別の新規プロジェクト作って
何も変えずに空のフォームのまま実行したらどうなる？

>>585
実行できます！

Delphi7ってまたただで使えるの？

>>544
遅レスすまんが、嘘いいなさんな。
必要なものが全てひとつの*.exeにパックされる作りなので、不要ですよ。

ﾈﾀ?

>>588
.NETフレームワークまで！？

>>581
もしDel6パーソナルだったらパッチ当てる

>>588
＞*.exeにパックされる

することもできる。に訂正きぼん。

>>591
ありがとうございます。
Del6パーソナルです。
それと、パッチってどれを当てれば良いのですか？
この中の物ですよね？
http://www.borland.co.jp/download/delphi.html

糞野郎
DelphiのあすくえにRuybyをばかにすんあ　

>>593
そのページであってるから、内容を読んでもらえないか？

>>595
どれを当てれば治るか、書いてなくないですか？
とりあえず、それっぽい物(アップデートファイル #2)にしておきます。

それと、ページによって見出しが違うのでわかりにくいですね。
http://www.borland.co.jp/delphi/del6up.html
こっちでは「Update Pack 2」になってますし。

> それと、ページによって見出しが違うのでわかりにくいですね。
（　´_ゝ`）ﾌｰﾝ　で、だからどうしろと？

>>597
特に貴方には何も。
貴方に何かして欲しいように見えますか？

>>598
某のサイトが判り難いとここで愚痴たれても意味ないだろってこと

すさんでるなぁ。

質問です。
専用の例外はどうやって作るんですか？

TSpecialException = TException;

Delphi 7 の中身が全然見えてこないんですが。

>>603
Delphiはオープンソースじゃありませんよ

>>603
人柱になって買ってみたいのだが、いかんせん金が……
もっと安くしてほすぃ。
つかアカデミックキボンヌ(泣

>>605
アカデミックあるぞ。３ﾏｿで買える。

アケデミックで３万はたかいよなあ・・

Del7価格一覧
ttp://www.borland.co.jp/sales/delphi.html
３万なのはprofessional版な。というかproにしかアカデミックがないわけだが。

ＤＥＬＰＨＩってなんでただなんですか？

普及してないから。

ふつう
普及してない方が
やすうりするとおもうんだけどなあ・・

>>609 + >>610 -> >>611

どういう神経してんだ？

6から7 にバージョンアップしようかいまいち踏ん切りが付きません。
だれか背中を押してください。

>>613 俺はVer5からだからバージョンアップするよ
　でも6持ってて必要無いなら待ったら？

だれかModelMaker使ってる香具師いる？

おれ。
質問あるなら聞くよ？

トライアル版使ってるんだけど
シーケンス図ってコードに反映される？
見当違いな質問だったらスマソ

トライアル版って、D7 付属？それとも ModelMaker から落としたもの？

シーケンス図では、既存のメソッドを図式化することと、
メソッド単位での追加ができる。

クラスビューから適当なクラスをドラッグアンドドロップすると、
ロールシンボルに変換される。

ロール間を「手続きメッセージの追加」アイコンを押してつなげると
メソッドの雛型を自動的に作成する。

もちろん具体的なコードは手で書かなきゃダメだけどね。

>>618
ModelMakerから落としたもの
一応プロジェクトの保存はできるみたい

>>619
例えばクラス図で作成したクラス中のメソッドの実装を書く
ことができるん？
UMLもいまいちわかってないので基本から勉強すっかな
サンプルプロジェクトとかどこかのサイトにないかな

今回も佐川急便で送ってくるのですか？

>>620
コードは手で書かなきゃいけないのね
どうもです。

Delphi 7 のスクリーンショットどこかにありませんか？

UML/ダイアグラム上でメソッドの雛型を作ったら、
インプリメンテーションタブでコードを埋める。

Rose とかの高級品と違って、UML ビューで作成される雛型は雛型でしかないから
実装時に UML 図でどのような役割をメソッドに与えたのか考えながらコードを
書く必要がある。それを楽にするには一行メモをしっかり埋めること。

UML -> ソースコードジェネレーターではないので、過度の期待はしないように。

>>615
あのさ。もし日本語環境での不満やバグとか見つけたのなら、レポートしてもらえる？

>>626
英語版でつ

>>英語版でつ
そりゃそうでしょ。

動作環境も英語 OS？

>>626
某の方ですか？

D7入れると、関連づけって、D7の方になっちゃうの？

>>628
もちろんバリバリ日本語OSです
とりあえず日本語対応もどき（フォント変えただけですが）にして
使ってるんだけど特に問題ないっす

>>630
D4,D5,D6 と、インストール時に（.pas/.dpr とかの）関連付けを更新しますか？
って聞いてきたから今回も確認するんじゃないの？

ま、フォントの設定を変更すればほとんど問題なく日本語が使えるからね。

Build #140x を使っているのなら、ダイアログベースフォントとエディタ２種類。
あとプロジェクトオプションのダイアグラムスタイルの２種類のフォントを日本語
にしておけば大丈夫。

>>615
ま、バグレポートとは言わないけど、使ってみて感じた感想とか、教えてもらえると
とっても嬉しいな。と書いておこう。詮索無用。

>>634
今日使い初めたばっかなのでよくわからんが
少なくともVisio2002標準のUMLステンシルよりは使いやすい

あれ？6.22 pre Beta を使っている？
そっちだと
>the major change is invisible: MM was MBCS enabled.
だよ。

>>634
図をExport as image → Clipbordにして
Word(XP)に貼り付けたら図が変になった。
CRTL+Cで貼り付けたら大丈夫
バグ？

Wordpad に貼り付ける分には問題ないようだ。
メタファイルだし、そんなに変なことが起きるとは思わないけど。

Delphi 7の新コンポーネント

TPageSetupDialog
TXPColorMap,
TStandardColorMap,
TTwilightColorMap

TwilightColor・・・・

TStrings に２つのプロパティ追加
ValueFromIndex , NameValueSeparator.

StrUtilsユニットに PosEx 関数追加。

紙のマニュアルと同じ内容がPDFファイルとしてCDに収録。

TCustomFormに新プロパティ
ScreenSnap , SnapBuffer,

TCustomComboBoxExに新プロパティ
AutoCompleteOptions

それって、何と比べてる？D6 で実装されているものもあるようだけど？

>TPageSetupDialog
最後の最後でこんなん付けてきたか
ずっと欲しかったのに・・・

D7Trialちょこっとですが。
http://nonoclub.coolfreepages.com/d7trial.png
http://nonoclub.coolfreepages.com/indy.png
http://nonoclub.coolfreepages.com/readme.txt

windowsには
ユーザーインターフェイスガイドラインみたいなものは
あるのでしょうか？

http://www.leverage.jp/bloom/start/

>>650
グロ

>TPageSetupDialog

どういうもの？

>TPageSetupDialog
どういうもの？

Delphi6　についてるのと一緒だろーが。

PrinterSetupと間違えてないか？

>>654
フリーのコンポ入れてた。逝ってきます

ファイル型変数って何ですか？
ファイルの中身がそのままはいっているのでしょうか？
カンタンDelphiプログラミングよんでるのですが
型を格納するとかかいてあるのですが
型を格納するのになぜファイルなの？っってかんじですた

（´-`）。o ○ （>>656もう少し、大人っぽい文章書かないと、荒れそうだなぁ…）

36インチワイドCRT買え

特定の型のレコードを格納する変数じゃなくて
特定の型を格納する変数というのがよくわかりませんでした
＜ファイル型変数

ﾌｻｽﾚでD7触った感触とか数日前に出てたのに誰も見てないんだな。

ファイル変数は
ファイルハンドルのことなのか
よくわかりますた

てゆーか
この本
説明を省略しすぎたとおもうんだが・・

>>606
バージョンアップより高いんですけど（´д｀；）

ありゃ。そろそろ D7/Indy を使う人が出てきているのかな？

他のスレ/板で話題になっていたら教えてください。

ModelMakerのシーケンス図って活性区間を重ねることは
できないんですか？

重ねることはできるけど（マウスで上下にドラッグできるでしょ）重なっている場所を
少しずらして表示するとかはできないみたい。

実際、
ttp://www.ogis-ri.co.jp/otc/hiroba/technical/Jouhoushori-UML/UML11.html#rabel2
こういった議論もあります。活性区間を重ねなければいけない場合って？

>>667
よくわからないけど、自分自身（クラス）のメソッドを呼び出す場合
活性区間のネストが表現できればいいなぁとか思ってみるテスト

>649
ないよ。
あったらもっと操作性が統一されてるだろう

>>669
Microsoft Press の「Windows ユーザーインターフェイスデザインガイド」は違うの？

まあ、マイクロソフト自体もこのガイドから外れることばかりしているから、誰も守らない
というのは当たっているけど。

>>670
ふるっ
Visual Studio&OfficeがUIのお手本です。

インストールしようとしたら
使用許可コードというのが出てきて
英語がぎっしりのページで登録したんですけど
その後どこでライセンスを受け取るのですか

>>672
Delphi7トライアル？
だったら、メールがくるから、そのメールに書いてあるとおりに添付ファイルを配置すればOK。

>>670
ははは、やっぱり古かったですか。

でも、「Visual Studio&Office」というのは「ちゃんと文章化」されているのでしょうか。
そして、その文章化されたものが適当な価格で販売されているのでしょうか。もし、
それがないのだったら「ガイドラインは無い」というのもあながち間違いではないかも。

>でも、「Visual Studio&Office」というのは「ちゃんと文章化」されているのでしょうか。

検索すれば一発でわかると思いますが。調べもしないで無意味な投稿をしないでください。

おっインストールできた
ありがとう

>>675
その脳内理論を普遍なモノとして語る癖やめないと友達いなくなるよ？

>>677
そのセリフは吐駄ﾁｬﾝに言ってくださいな。

>>675
ふーん、調べれば分かることですか。それは良かった。

検索までして調べる気もないや。私は古いガイドで十分だから。

>>679
>検索までして調べる気もないや

よかったね。問題解決できて。

　　　　　　　　　　＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
　　 ∧.,,∧　　 ／
　　ミ.,,ﾟДﾟ彡＜　マジ質問ですたんか？
　　ﾐ つ目(ﾐ .　＼
〜ミ,,Ｏ,,,,,,つ 　　　￣￣￣￣￣￣￣￣￣￣￣￣￣￣

2chDelphi系のスレでは
某ML(のある人)の慣習に従って、どんな質問がきても
「過去ログを検索しろ」レスをつけておちょくるのが
流行っているんで(ｗ
あまりマジで受け取らないように。

で、
>でも、「Visual Studio&Office」というのは「ちゃんと文章化」されているのでしょうか。
されてないと思われ。

>それがないのだったら「ガイドラインは無い」というのもあながち間違いではないかも。
「ガイドラインは無い」というのが多聞正解
だから、ころころ変わるVSやOfficeやXPに追随せねばならんです

"Designed for Windows XP/2000/ME/98/NT"
っていうロゴを取得したりは出来るらしですが、
別にあってもなくても誰も気にしないと思われ

プリンターとかデジカメを買ったときにバンドルされてるソフトが
とんでもないデザインなのは何とかしてほしい。
ボタンだらけとか色が派手派手だとかヒントがまったくでないとか。。

ﾈﾀにﾏｼﾞﾚｽ。Delフサギコ, えらい。

>>682
そういう人のためにWindowsにはエクスプローラというすばらしいファイラーがついているのだよ。

>>684
ファイラの話はしてねーよ

> とんでもないデザインなのは何とかしてほしい。

使わなきゃいいだろ。
Delphi となんの関係があるの。 Delphi 製とか？

>Delphi と関係があるの
うるさいなぁ。ML の下らん規則を持ってくるな。ぼけ。

>>686
使ってないよ。
"Designed for Windows XP/2000/ME/98/NT"の話が出てきたから、
UIにも気を使ったソフトを作らないとね、っていう話をしたかった。

>>680
何も問題ではありませんが？「調べりゃわかる」と言われたんで、調べる気もないと返した
だけです。

「Visual Studio&Office」というソフト名らしき物を上げて「お手本です」と書かれたので、文章
化（書籍化やWeb上にまとめられているか）を知りたかっただけです。

>>681
ありがとうございます、やはり「MSのソフトに合わせろ」という感じなのでしょうか。それはど
う考えても「デザインガイド」ではないですね。ただのお手本という感じにしかなりませんね。

それならば私が出した本は「一応デザインガイド」となっているので、これに従うのが一番妥
当なような気がします。ちょっと古くさいUIですが、別に動かないというものでもないし。

>>689
>それならば私が出した本は
（（（（（（（（ ；ﾟДﾟ))))))))))))ｶﾞｸｶﾞｸﾌﾞﾙﾌﾞﾙ

>>690
後３分くらい考えると本当の意味がわかるよ。
逆にそれくらい考えないと意味がわからない文章だよ。

おれもいっすんガクブルですた。　ミﾟДﾟ,,彡
スレの流れも意味わからないけどな。

>ちょっと古くさいUIですが、別に動かないというものでもないし。
それを許せるのなら、どんな UI を使ってもいいんじゃないの？
それとも、自分で考えるのがいやとかかな？
ガイドラインがないと何もできないとか？

PC98システムデザインガイド マイクロソフト公式解説書
これか

それはハードの仕様だろう。
＞PC 98は、ハードウェア設計者を対象に作成され、その目的は、以下の通りです。
って書いてあるやん。

appleみたいにちゃんとしたガイドラインだしてほしいよ

ガイドライン厨

>>690-692
分かりにくくなってすみませんでした。「私の挙げた本は」とすべきでした。

>>693
確かにどんなUIでも良いのですが、一応「標準（デザインガイド）」があるなら
それに従った方が使いやすくなると思っています。自分しか使わないソフト
なら全く考えずに作るのですが、一応フリーソフトとして公開するやつはデザ
インガイドから外れていないかチェックするようにしています。

「ちょっとしたツール」程度のものですから、複雑なUIを使わなくても何とか
なります。

マイクロソフトのソフトはほとんど使っていないので、「ソフトを見ながらUIを
チェックする」ということが出来ないんです。

設定を入れる場所に悩む
macなら編集できまりなのだが
winだと編集だったりツールだったり

[編集|設定]や[表示|設定]はヘタレなアプリが多い。
ツールにしとけ

>>698

＞マイクロソフトのソフトはほとんど使っていないので
メモ帳、ワードパッド、マインスイーパー、エクスプローラーあたりを使ってみてはどうか。

質問です。
TShapeの図形をクリックすると、新しく図形がそこに作成され、
マウスで動かせるようにしたいのですが、
マウスをムーブした時のイベントが、元の図形のままになっているようで、
うまくいきません。

新しく作成したTShapeのイベントにするような方法ってありますでしょうか？

「元の図形」はマウスで動かせるの？
もしそうなら、新しい TShape のイベントをそれに関連づけたら

クリックイベントを受けるのは古いオブジェクト。
それが新しいオブジェクトを生成したとしても、何もしなければ古いオブジェクトの
イベントのまま。だってイベントの元の Windwos メッセージは古いオブジェクトの
WIndow ハンドルに送られてきたんだから。

アクロバット的な解決方法もあるかもしれないが、定石としてはコンポーネントを
乗せているオブジェクト（TForm など）に細工をするのがおすすめ。

>>702
　作成したイベントが重なっていないなら動かせるけど、重なっていると
　どっちにしてもどれか一つしか受け取れない

こんなの参考にして複数のイメージを含んだコンポ作ったら？
矢印や直線も描ける、しかも設計時にCADみたいにイメージを動かせるコンポ
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1004530597&rm=100

>>703,704,705
たいへんありがとうございます！！！
試行錯誤して色々やってみます！！！

こんなのもあるよ。
ttp://home1.infonia.ne.jp/~delphian/delphi/compo/text/mi0027.txt
結構古い（D3時代）から、手直しが必要かも。

FAQ です、良くありそうな話題は、過去ログを検索するか
FDelphi の FAQ を探してみましょう。

>>707,708
どうもありがとうございます！！

また質問なのですが、ShapeのParentを変更すると、
マウスを早く動かしたときに図形がマウスについてこなくなってしまうのです。
再びマウスを乗せるとついてきます。
ＦＡＱっぽい感じもするのですが、見当たらないです・・・。

Parent はこの際あまり関係ないと思う。
SetCaptureControl やってみそ

>>710
即答どうもありがとうございます！！
やってみます！！

冗談なのに...

> だってイベントの元の Windwos メッセージは古いオブジェクトの
> WIndow ハンドルに送られてきたんだから。

TShape はウィンドウをつくらないはず。ハンドルなんかないよ。
Ｄ＆Ｄで動かせるようなイベントハンドラが Sender だけを参照して
特定のインスタンスを参照しないようにコーディングされていれば
新しいインスタンスのイベントに関連づけするだけでは？

たびたびすみません。どうもうまくいきません。
TShapeを配列でたくさん作って、それぞれに共通の関数で処理しているのですが、
根本的にやり方がタブーなんでしょうか？

★最初にTShapeを配列でとって
Var
MyShape : array[1..10] of TShape;

★Form1のクリエイト時に
procedure Form1.FormCreate(Sender: TObject);
begin
for i := 1 to 10 do
begin
MyShape[i] := MyShape.Create(Form1);
MyShape[i].Parent := Form1;
MyShape[i].OnMouseDown := MyShapeMousedown;
MyShape[i].OnMouseMove := MyShapeMouseMove;
MyShape[i].OnMouseUp := MyShapeMouseUp;
end;
end;

★クリックされた時の関数は
procedure Form1.MyShapeMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
SetCaptureControl(TControl(Sender));　←☆
for i:=1 to 10 do
if Shape[i] = Sender then　ここで配列の中のどのコンポーネントか判断している。
begin

マウスを早く動かすと、移動中のShapeがおいてけぼりになってしまいます。
SetCaptureControlをマウスクリック時に設定しても、マウスを動かしたときにMyShapeMouseMove()に処理が来ないです。

Del5proです。
onKeyDownイベントで[CTRL]+[SHIFT]+[0}が入力された時のみ
特定の処理をしようと思っているんですが・・・。

[SHIFT]→[CTRL]→[0]と押す　　Key値：16
[CTRL]→[SHIFT]→[0]と押す　　Key値：17

となってしまいます。
因みに何も押さない時のKeyは96。

きちんと[SHIFT][CTRL][0]を検知するにはどうしたら・・・？

　　　　　　　　　　　　　　　 ＿＿＿＿＿＿＿＿＿＿
　　　　,,,,,,,,,,,,,,,∧,,∧　 　／Ctrll+Shift+0
　　〜′,,,,,,,,,,ミ,,ﾟДﾟ彡＜　 Actionのｼｮｰﾄｶｯﾄキーに
　　　UU"""" U 　⊃　　＼割り当てるのがよし
　　　　　　　　　　　　　　　 ￣￣￣￣￣￣￣￣￣￣

> if Shape[i] = Sender then　ここで配列の中のどのコンポーネントか判断している。

ふつう Sender を TMyShape にキャストするだけでは？

>>714
コンポを配列にするというVBみたいな発想はやめたほうがいいよ

　　　　　　　　　　　　　　　 ＿＿＿＿＿＿＿＿＿＿
　　　　,,,,,,,,,,,,,,,∧,,∧　 　／>>718
　　〜′,,,,,,,,,,ミ,,ﾟДﾟ彡＜　 時と場合によると思うよ
　　　UU"""" U 　⊃　　＼
　　　　　　　　　　　　　　　 ￣￣￣￣￣￣￣￣￣￣

>>719
同意。

ボタンを押すと１００個のチェックボックスが一斉に（略

てゆうか、Controlsプロパティで同じことが出来るよね？

>>721
彼のようになんとしてもキャストを使いたくないときには有効だと思われ。

>>719
>>714 のコードは配列をループで回すところが無駄なんだよ。

どうもありがとうございます。
配列をループで回さない場合、どうやるのでしょうか？
Controlsでしょうか？勉強します。

Shape.parent := で親を変更すると、マウスの動きが速いとき図形がついてこなくて、
Windows.SetParent(Shape.Handle,Form1.Handle); だと、きちんとついてくることが判りました。
しかし、この場合、Shape.top:= Shape.Left :=　で、図形の位置をセットできません。
Shape.parent := の場合は、図形の位置をセットできます。うーん。

　　　　　　　　　　　　　　　 ＿＿＿＿＿＿＿＿＿＿
　　　　,,,,,,,,,,,,,,,∧,,∧　 　／
　　〜′,,,,,,,,,,ミ,,ﾟДﾟ彡＜　 ClientToScreenとかその逆で
　　　UU"""" U 　⊃　　＼ Top/Leftを計算してみては？
　　　　　　　　　　　　　　　 ￣￣￣￣￣￣￣￣￣￣

Tagにでも自分のインデックスを入れておけば、わざわざforで検索しなくてもいいかと

>>725　どうもありがとうございます。
Shape.parent:=で親を変更した場合は、ClintToScreenなどでtop,Leftを
計算してうまくいくのですが、
Windows.SetParent(　で親を変更した場合には、Top,Leftに何を入れても
反映されないのです・・・

>>726
どうもありがとうございます。
tag・・知らなかったです。^^;

はーい、先生、ドラグするためにどうして配列の番号を知る必要が
あるんですか？

>Shape.parent:=で親を変更した場合は、ClintToScreenなどでtop,Leftを
>計算してうまくいくのですが、
>Windows.SetParent(　で親を変更した場合には、Top,Leftに何を入れても

TShape ってウィンドウを作らない VCL コントロールなんだから
Windows.SetParent() で親を設定できるはずないだろ

>>716
遅レスｽﾏｿ
そっか。そういう方法を忘れてた。
後でやってみるです。
ありがとうございます。

>>726
他のみんなはコントロールをすべてなめる時の話をしてるんだけどね。

>>732
はあ？　スレの流れ読めてないね。
発端の >>714 のコードが何やりたいかわからないのか。
ループで回す必要ないんだよ。Sender に目的のオブジェクトが入ってるんだから。

もちろんこの場合は Tag なんて論外。

>>709
Shepeコンポのドラッグによる移動はこんな感じでしょうか．
>>710さんが意図したのとは違うかも知れませんが
SetCaptureControlでShapeの親がマウスイベントを捕捉するようにしています．

//TForm1のフィールド変数に以下を追加
FDraggingControl: TControl; // ドラッグしているコントロール
FDragOffset: TPoint; // ドラッグしているコントロールの左上座標からドラッグした位置までのオフセット

// 各ShapeコンポのOnMouseDownイベントハンドラ
procedure TForm1.Shape1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
// ドラッグしているコントロールを保管
FDraggingControl := Sender as TControl;
// ドラッグしているコントロールの左上からマウスカーソルまでのオフセットを保管
FDragOffset.x := X;
FDragOffset.y := Y;
// マウス処理をこのコントロールの親で捕捉するようにする
// （つまり，以後にマウスを動かしたりボタンを離しても
// ShapeコンポのOnMouseMove，OnMouseUpイベントは発生せず，
// 代わりに親の同イベントが発生する）
SetCaptureControl(FDraggingControl.Parent);
end;

（つづく）

（つづき）

// Shapeの親のOnMouseMoveイベントハンドラ
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
// ドラッグしているコントロールがあるならそれを移動する．
if (FDraggingControl <> nil) then
begin
FDraggingControl.Left := X - FDragOffset.x;
FDraggingControl.Top := Y - FDragOffset.y;
end;
end;

// Shapeの親のOnMouseUpイベントハンドラ
procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
// マウス処理の捕捉を終了
// （以後，通常通りにマウスイベントが発生する）
ReleaseCapture;
// ドラッグしているコントロールがなくなったことを記憶．
FDraggingControl := nil;
end;

どうもありがとうございます。ヽ（´∀｀　）ノ
初心者＆独学で、なんとも変なコードを当たり前の様に
書きつらねてしまっているので、大変勉強になります！！！

教えてくだちい
Ｓｈｅｌｌｌｉｓｔｖｉｅｗで選択したファイル名って、なんていうプロパティで受け取る
ですか？？？？
ＨＥＬＰにもありません
(^o^)丿

ShellListView を使った時点でDQN

>>738
ItemIndex とか Selected とかかな？ 使ったことないけど。

>>739
理由教えて。

>>730
すみません。その通りでした。
ShapeじゃなくてPanelでした。呆けてました。
ネットで検索したら、parentはcreateした直後に設定し、その後にその他の
プロパティを設定しなくてはならないみたいです。
・・・とすると、一度parentを設定したら、変更してはいけないのかな？という感じがします。

> 一度parentを設定したら、変更してはいけないのかな？という感じがします。

親を変更してはいけない、ということはありませんが
変更しなくてもよいプログラムが書けるならそのほうが
よいと思います

>>738
Pathだったような違ったような。

>>738
FAQです。過去ログを参照しましょう。
ってMLじゃたたかれますな。
>>739
多分Delphi6もってないんじゃないの？
注意書きと、些細なバグさえ修正すればそこらの汎用プログラマが作成するより幾分堅牢なコンポーネントのような気はするけど。
些細なバグは過去ログあたってね

> 多分Delphi6もってないんじゃないの？

当たり！

Delphi6でQuadruple Dを使っている人、誰かいませんか〜？

>>746
使ってる。つっても、インストールしてサンプルで適当に遊んで
DDSDでoggファイル再生する実験してみたくらいだけど。

教えてくだちい
教えてくだちい　へこへこ

>>746
使ってますよ。

すみません。再び教えてください。

>>735さんに教えていただいて、次の書き込みのソースを書きました。

Form1の左側にScrollBox2,右側にScrollBox1があります。
左側のScrollBox1をparentとするPanel1をマウスでドラッグ＆ドロップで、
右側のScrollBox2に移動させたいと考えています。

Panel1をマウスクリックした時にparentをForm1に変更し、
マウスボタンを離したときにparentをScrollBox2に変更しています。

ところが、マウスのボタンを離してもScrollBox2にpanelが移動しないのです。

念のため、
タイマーを使って、Panel1のparentを左右のScrollBoxを交互に変更させたらうまくいきました。

Private
____FDragOffset:Tpoint; //オフセット
____FDraggingControl : TControl;//ドラッグしているコントロール

implementation
//マウスを移動
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
____FDraggingControl.Left := X-FDragOffset.X;
____FDraggingControl.top := Y-FDragOffset.Y;
end;

//マウスボタンを離したら
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
____ReleaseCapture;
____FDraggingControl.Parent := Scrollbox1; //マウス離したら親をscrollbox1に変更
____FDraggingControl:=nil;
end;

//マウスボタンを押したら
procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
____FDraggingControl := Sender as TControl;
____FDragOffset :=point(x,y);
____SetCaptureControl(Form1);
____FDraggingControl.Parent := Form1; //マウス押したら親をForm1に変更
end;
end.

Del6でもDDDDで「asm fint; end;」をいちいち入れないといけないのでしょうか？
DirectX7SDKヘルプの「ボーランド浮動小数点の初期化」というのを見ると、
もっとスマートな方法があるような気もするのですが。
Quadruple Dのヘルプを見ても、入れなければならない条件というのがあいまいで
よくわからないのですが。。。

>>751
KeyUpだし
ScrollBox2出てこないし

>>746
Del6でインスコしていじってたことあるよ

>>753
たいへんありがとうございます！！！！
ScrollBox2が出てこないのは書き込み用のタイプミスでしたが、
まさしくKeyUpが原因のようです。
・・・・３日間の悩みが解決しましたヽ(´Д`；)ﾉ

デュアルＣＰＵ対応のアプリを作るにはどうしたら良いのでしょう

マルチスレッドにすりゃできるよ
TThread使え

ありがとうです。やってみます。

デルファイのプロフェッショナルで5，6万、エンプラで２，３十万
これらを買うとどんな得点があるのでしょうか。
visualStdio.netを買うとSQLサーバーやOS、その他いろいろ提供してもらえます。
デルファイはなにがもらえるのでしょうか。教えてください。お願いします。

>>759
愛とか夢とかロマンとか…。

すいません、教えて下さい。

動的配列を２つ作って片方にデータを入れたあと、
もう片方にそのデータをコピーして使いたいのですが、
↓みたいなやり方で大丈夫でしょうか？

var
Array1，Array2 : Array of String;
begin
____SetLength(Array1,1);
____Array1[0] := 'aaa';

____Array2 := Array1;

____//メモリ再割り当て
____SetLength(Array2,Length(Array2));
____Array2[0] := 'bbb';

____……
end;

>>761
本題と関係ないけど
_
のかわりに
&nbsp;
を使うほうがいいかと。

>>762
全角スペースでもよいかと

&nbsp;と打つのかな？

 って打ってみる

         なるほど！

SetLength(Array2,Length(Array2));

？

>>761
Array of string　なら Tstringlist 使ってしまえば？
Assignできるし。

Copyってのも手ですね。

>>767
ご存じかも知れませんが
動的配列変数同士の代入では内容のコピーは行われない仕様のようです．
（しかも文字列と違い，コピー後に片方を改変してもコピーは行われない）

しかしSetLength手続きで再割り当てすると
２つの変数は別な配列を指すようになるようです．
ただしヘルプにはこれに関する記述はがありませんでした．

>>768
私も文字列リストですね．動的配列はたまにしか使いません．

>>769
なるほど！ Copy関数だと動的配列を１行で複写できますね．

>>770
フォローありがとうございますm(__)m
そうなんですよね。ヘルプみても詳しい使用例
みたいのがなかったもので･･･
>>769さんのCopyの方がすっきりした形で出来そうなので、
そちらの方法でやることにします。

>>768
実は、今実際に修正かけてるのがRecord型の動的配列の
要素の一つにRecord型の動的配列が入っているという
構造でして、TStringList使えなかったんです。
TListにおきかえようとも思ったのですがもう時間がなくて。
紛らわしい例出してすいません。

とにかく助かりました、ありがとうございます！!

>>771
（＊実は、今実際に修正かけてるのがRecord型の動的配列の
要素の一つにRecord型の動的配列が入っているという
構造でして、TStringList使えなかったんです。 ＊）

TList使えそうな予感。

　　　　　＿＿＿＿
　　　 ／∵∴∵∴＼
　　 /∵∴∵∴∵∴＼
　　/∵∴∴,（･）（･）∴|
　　|∵∵／　　 ○　＼|
　　|∵ /　　三　|　三　|　　／￣￣￣￣
　　|∵ |　　　＿_|＿_ 　|　＜　うるせー馬鹿！
　　 ＼|　　　＼＿/　／　　＼＿＿＿＿
　　　　＼＿＿＿_／

CSVファイルを読み込んで、その項目にアクセスしたいんです。

Readlnで読み込んで、区切りを探して…、くらいしか思いつかないんですが、
もっと楽な方法ってありますか？

バージョン家

>>774
TStringList を使ってみ、、、

>>774
TStringList.CommaText

>>776
あ！TStringListのヘルプ見てみました！
CommaTextやDelimitedTextを使うんですよね？
これでOKです！ありがとう！

>>777さんもありがとう！

　　　　　＿＿＿＿
　　　 ／∵∴∵∴＼
　　 /∵∴∵∴∵∴＼
　　/∵∴∴,（･）（･）∴|
　　|∵∵／　　 ○　＼|
　　|∵ /　　三　|　三　|　　／￣￣￣￣
　　|∵ |　　　＿_|＿_ 　|　＜　うるせー馬鹿！
　　 ＼|　　　＼＿/　／　　＼＿＿＿＿
　　　　＼＿＿＿_／

>>780
なにをテストしてるの？

粗しテスト。

　　　　　＿＿＿＿
　　　 ／∵∴∵∴＼
　　 /∵∴∵∴∵∴＼
　　/∵∴∴,（･）（･）∴|
　　|∵∵／　　 ○　＼|
　　|∵ /　　三　|　三　|　　／￣￣￣￣
　　|∵ |　　　＿_|＿_ 　|　＜　どんな質問にも答えてやろう
　　 ＼|　　　＼＿/　／　　＼＿＿＿＿
　　　　＼＿＿＿_／

>>783
> どんな質問にも答えてやろう

AA がいかにも頭悪そうに見えるのはなぜですか？

　　　　　＿＿＿＿
　　　 ／∵∴∵∴＼
　　 /∵∴∵∴∵∴＼
　　/∵∴∴,（･）（･）∴|
　　|∵∵／　　 ○　＼|
　　|∵ /　　三　|　三　|　　／￣￣￣￣
　　|∵ |　　　＿_|＿_ 　|　＜　>>784 うるせー馬鹿
　　 ＼|　　　＼＿/　／　　＼＿＿＿＿
　　　　＼＿＿＿_／

>>785
答えになってない罠

　　　　　＿＿＿＿
　　　 ／∵∴∵∴＼
　　 /∵∴∵∴∵∴＼
　　/∵∴∴,（･）（･）∴|
　　|∵∵／　　 ○　＼|
　　|∵ /　　三　|　三　|　　／￣￣￣￣
　　|∵ |　　　＿_|＿_ 　|　＜　どんな質問にも答えてやろう
　　 ＼|　　　＼＿/　／　　＼＿＿＿＿
　　　　＼＿＿＿_／

TRegIniFile.Create() とか、TRegistry.Create() で
試してみたんですけど、Win2K のパワーユーザ権限では
HKEY_LOCAL_MACHINE 以下の値が取得できませんでした。
HKEY_CURRENT_USER 以下は取得できます。

もちろん、コンパイルしたヤツを Admin 権限で動かすと
どこのレジストリも読めるんですけど。

これって仕様なんですか？あ、Delphi6 Personal UP1 使ってます。

知っているヒトよろしくです。

>747
どうやってOggVorbisのライブラリをDelphiに移植したの？

>>789
ttp://www.delphi-jedi.org/Jedi:APILIBRARY:36731
ここにDelphi用のヘッダとサンプルがある。
同梱されてるDLLはRC2ベースだからvorbisの公式サイトからsdkも落として差し替えな。

>790
ありがと。
結構簡単に使えるんだねえ。

>>778
自己レス

OpenKeyReadOnly() で解決。
ツリー内にも色々と権限があるんだね〜、っと。

保守

>>792
regedt32.exe を起動してみればわかる。ファイルと同じような設定項目
があるよ。使ったらログを取るような「監査」もできる。

>>790
OggVorbisのSDKがBSDライセンスなのに、
*.pasがMPLじゃんかよヽ(`Д´)ノ ウワァァン！！

MPLってどんなライセンスだっけ。そんなに使いづらくはなかったと思うが。

TMediaplayerコンポーネントを非ビジュアル化する方法と、
再生する命令の出し方がわかりません。

Left := -1000

>>798
ClientWidthが1024な罠。

>TMediaplayerコンポーネントを非ビジュアル化する方法と、
おまえさ、Visibleプロパティあるじゃないですか

>再生する命令の出し方がわかりません。
Playに例がのってんじゃねーかよヘルプくらい読んでくださいませ
あんたみたいなのがいるからDel厨っていわれんだチクショーでございます

どんな厨房疑問でもやさしく答えます。

果たして「visibleをfalseにする」と、「非ビジュアル化」って言葉は一緒なのだろうか？
つーか、質問者が本当に意図することは？
単に「見えなくしたい」だけ？







そんなら「ヘルプ嫁」

ただいまWINDOWS付属のゲーム「フリーセル」を支援する
アプリを作ってます。　フリーセルの「ゲーム(G)」と
「スタート(N)」を自動的に押してくれる動作を実現したい
のですがパーソナルなので「ゲーム(G)」「スタート(N)」
のクラス名を調べられません..

すみませんが教えて下さい、宜しくお願いします。m(__;)m

>>802
「Nuke++」というツールを使えばパソナルでも見つけられると思います。

>>803

DELPHI使いってこの程度なの？

すみません、呆れました。

>>804
せっかく教えてやったのになんだその言い草は。
お前のような奴はDelphiやめろ。

OSクラッシャーと勘違いした悲しき802

>>806

OSクラッシャー？ はぁ、何のこと？
やっぱりDELPHI使いってこの程度なのか。

呆れて物が言えない。

じゃあもう発言しないでね

spy++使えば解決

>>802
　判った判った。　　暴れてもいいことないよ。

var h:THandle;
begin
h := FindWindow(nil,PChar('フリーセル'));
if h<>0 then begin
　 PostMessage( h, WM_KEYDOWN, VK_F2,0 );
　 PostMessage( h, WM_KEYUP , VK_F2,0 );
end else 窓が開いてないときの処理


これでいいだろ

>802
もう夏休みは終わったんだろ？早く家で勉強してろな。
単位落として留年だからってひがむなよ。

元発言以外の802は私ではないです。

>DELPHI使いってこの程度

私はDELPHI以外の言語を使ったことがありません、
他の言語を使ってる方との比較も出来ません。


>>803
>>809

ありがとうございます。　フリーでこんなツールが
あるなんて思ってませんでした、早速落としてみます。


>>810

Fキーからの入力があったんですね、盲点でした。（汗
これならメニューから始めるより早く始められますね、
ありがとうございます。

＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
みなさんのおかげで思い通りの動作を実現出来そうです、
本当にありがとうございました。

本物の802さんスマソ。
偽者は、アンチDelか・・・。油断も隙も無いな。

有益な情報を得るまで偽者を装って煽るんだから
・・・ホント油断も隙も無いな。

トリップつかえ。

Explorer のように Form 上に TreeView Splitter ListView を置いて、
Form の OnCreate イベントハンドラで TreeView.Width := 0; として起動させても、
Splitter で TreeView の幅を変更させることが出来る方法を教えて下さい。

>>816
AutoSnap := false でなんとかならんかのう

８００超えたので議論したいが、このスレの先はどうする？
前スレでは、相談室に統合ということになったのだが、誰かが
たてたためにずっと続いてきたわけだが。

・統合か
・廃止か

>>805
気分悪い騙りだねぇ。

間違えた。

・統合か
・存続か

間違えた

・廃止か
・暴走か

Delphi相談室のやつらが俺らと統合したがっているぞ。

向こうはパート7、こっちはパート8。
こっちの方が伝統ある本スレだ。

潰すんならフサスレ

Delphiは最強なんだよ
本当ならDelphiスレで埋め尽くしてもお釣りがくる

じゃあ　DelフサギコとモナのDelphiそうだんしつもんスレ　Ver98　でいい？

モナーとﾌｻｷﾞｺの Delphi 漫談

まあ相談スレは２つあった方がいいよ
どっちか一方がよくフレーム化するから

ここのモナーは答えてくれないからなー

　 ∧＿∧　　／￣￣￣￣￣￣￣￣￣
　（　´∀｀）＜. そんなことないよ。
　（　　　　）　.＼＿＿＿＿＿＿＿＿＿
　｜ ｜ ｜　
　（＿_）＿） 　

　　Λ＿Λ 　 ／￣￣￣￣￣￣￣￣￣￣
　<=( ´∀｀) ＜ 僕は日本人だけど質問待ってるﾆ･･･よ！
　（　　　　） 　　＼＿＿＿＿＿＿＿＿＿＿
　｜ ｜　|
　〈＿フ__フ

質問させてください。
ホームページ作成ソフトのリアルタイムプレビューを
実装したいのですがどうしたらいいのでしょうか？
サンプルとかあったらいいなぁ・・・。
やさしく教えてください。おながいします。

IEで開く

>832
http://cgi19.plala.or.jp/lukewarm/
にある「プレビュー専用ブラウザ(仮)」の仕様を参考にしたら。

VisualBasicから移行しようと思うのですが、
どのような本を買ったらいいでしょうか？

VBユーザーの為の・・・って本があったような

>>835
それは買おうと思うのですが、あと言語の仕様（？）が書いてあるのも一冊買おうかと。

　ミ,,ﾟДﾟ彡ノ⌒http://www.borland.co.jp/bookinfo/delphi.html

　 ∧,,∧
　ミ,,ﾟДﾟﾐ
　ミつ　つ　
　　このあたりを、ご紹介させていただかせ.....

> VBユーザーのための
> Delphi 6 プログラミング
>
> Delphiクイックリファレンス
>
> 基礎からわかる Delphi 6

>>834
これだと、保存しないとプレビューに反映されないようです・・・。
エディタで文字を入力したら、保存ボタンを押さずに、
その文字がプレビュー画面に反映できるようにしたいんですが、
どうやってるんでしょうねぇ・・・。

>>839
ありがとうございます。
その中から選んで買おうと思います。

>>840
別にテンポラリフォルダに保存して、それを表示すればいいやん

・・・と思ったらHTML相対リンクがリンク切れになるな
WYSIWYGのHTMLエディタなみに作りこまないとﾀﾞﾒぽ

WYSIWYGｴﾃﾞｨﾀなコンポーネントありませんでしたっけ？

タッ…　蛸薬（略）

>>832
こんな感じは？
SL.Text := Memo1.Lines.Text; //SL: TStringList;
for i := 0 to SL.Count -1 do
begin
if Pos('</head>',LowerCase(SL.Strings[i])) > 0 then
begin
j := i;
Break;
end;
end;
SL.Insert(j,'<base href=' +Str +'>'); //Str: string;
SL.SaveToStream(MS); //MS: TMemoryStream;
MS.Seek(0,0);
(WebBrowser1.Document as IPersistStreamInit).Load(TStreamAdapter.Create(MS));

>>842->>845
レスありがとうございます。

>>845
このコードはどこに記述すればよいのでしょう？
Memo1のOnChangeでしょうか？
Memo1Changeに書いてみたところ、
実行すると、EAccessViolationの例外ﾀﾞ、ｺﾞﾙｧ！！！って
怒られるんですが･･･（汗。
力不足で、お手数ですがよろしくお願い致します。

>>846
確か
WebBrowser1.Document = nil
だとまずかった気がするから、
フォームのOnCreateとかに
WebBrowser1.Navigate('about:blank');
て書けばたぶんEAccessViolationの例外は出なくなる。

c言語でいう、memchrとmemcmpに値する関数はありませんか？

自作しますた。

>>835
>あと言語の仕様（？）が書いてあるのも一冊買おうかと。

買えば重たいマニュアルが付いてくるよ

>>846
レスありがとうございます。
うぉっ！できました！！感動です。
皆様、ありがとうございました。

Cのヘッダ変換してんだけどさ
size_tってのがあるのよ。
で、適当に検索かけたんだけど

> stddef.h(169): #define __SIZE_TYPE__ long unsigned int
> stddef.h(172): typedef __SIZE_TYPE__ size_t;
long unsigned int……
コレ何？(´д｀)

あ、そうかすまん。
unsigned long intのことか。
しかもlongって単体の型じゃなくて、intにつくのか。
というわけで、LongWordで置き換え可能でいい？

うう。他のソースみたらlongは単体でも型になるじゃん。
もうC言語はいやヽ(`Д´)ノ ウワァァン！！

>>848-849
memcmpはCompareMemがあります〜．

>>852-854
type size_t = LongWord; と定義して
size_tを使うのが良いと思います．
（Delphi3などでも最小限の変更で使えるので）
あと long は同じではありません（符号あり）．

c2pas使え

>>854
えーとね。long は long int の略です。ＯＫ？

すみません。教えてください。
自分の作ったプログラムが不安定でバグさがしています。
１）の記述を２）にすると、コンパイルは通るのに実行時必ずエラーで止ってしまいます。
これって意味は同じだと思うのですが、何か変でしょうか？

１）pBuffS := AnsiStrPos(pBuff,'<');

２）pBuffS := AnsiStrPos(pBuff,PChar('<'));

それとも、全く別の所にバグがあって、たまたまその影響が出ていると
見たほうが良いでしょうか？

>>858
ぜんぜん違うよ。
p: pchar;
p := '<'; // 文字列'<'へのポインタ
p := PChar('<'); // 文字'<'の文字コードをポインタに変換

>>859
どうもありがとうございます。
お恥ずかしい・・・

>>856
h2pつかってるよヽ(`Д´)ノ

delphiはじめたいんですけど、１マソ払ってdel７からはじめたほうがいいですか？
del６でも十分ですか？どう違うんですか？

del7はゴミ、やっても無駄。

Del6に使ってみてコリャいいや、と思ったらプロ版を買おう

Del6に使ってみてコリャいいや、と思ったらＣ／Ｓ版を買おう
って Ｃ／Ｓ版なんてあんのか（ｗ

イントラネット

質問：Tqueryで取得した検索結果をTDataSetに関連付けるにはTDataSetの
なんの属性にセットしたらよいのですか？

Del6に使ってみてコリャいいや、と思ったらTurboPascalを買おう

Del6に使ってみてコリャダメや、と思ったら.NETを買おう

TreeViewで、選択されている子ノードから親ノードのTextを取得
するにはどうしたらいいんでしょう？

Item1
││
│└─┬SubItem1
│　　　│
│　　　└SubItem2
│
Item2
　│
　└─┬SubItem3
　　　　│
　　　　└SubItem4

このときに、SubItemをダブルクリックしたときに
親ノードのText（Item1かItem2）を取得したいのですが。

>870
TTreeNode
Parentプロパティ

>>871
おお！できました。
ありがとう。

>>869
.NETはどこに売ってますか？

>>873

マイクロソフトが 出してます。

>>873
ゲイツ屋さん

http://list.auctions.yahoo.co.jp/jp/2084022993-category-leaf.html

ここも
http://list.auctions.yahoo.co.jp/jp/2084022995-category-leaf.html

> Del6につかってみて
「Del6をつかってみて」の間違いだよぉ
さらすなよぉヽ(`Д´)ノ ウワァァン！！

Del製のexeって、解析されやすいそうですが、どの程度のことまでわかりますか？

>>879
DNAまで。

DNAてなんの略？

ドコサヘキサエン酸

ANDの逆読みかと思てたよ

>>879
0と1まで

>>879
RTTIのためかクラスや列挙型の名前なんかはまんま残るみたい。

外の比較的マイナーな文学作品を翻訳出版する
小さな出版社がある。そして文学ファンはこういった出版社を
潰さないため、今後も翻訳を続けてもらうために
１人で同じ本を２・３冊買うことが良くある｡

我々もこういう時だからこそDelphi7を買って
ボーランドを支えるべきなんじゃないだろうか。
Delphi7の売り上げはDelphi8以降の開発資金となるし、
ボーランドジャパンの今後に大きな影響をもたらすだろう。

Delphi7の出来のみを云々するのは
あまりにも近視眼的ではないだろうか？　

MSが房若武人に振舞わないように牽制してるDelphiに感謝すべきVB厨こそDelphiを1ダースほど買うべき

なぜ 886はこんなスレをつけるのか。

その謎は以下のスレに,,,
http://pc3.2ch.net/test/read.cgi/tech/1031668744/536-538

ここにかかれている内容を信じるかどうかはあなた次第。
Delphi7 を注文してしまった人は、すぐに答えが出るでしょう。

☆★☆★☆ アンチに朗報！ ☆★☆★☆

VS.NET 7.0と.NET 1.1は連携できません！
.NET 1.1を導入すると、VS.NET 2003を買わされる羽目になります！

>>885
フォームファイルの情報がそのまま入っているようですね．
某ツールを使うとフォームファイル（.dfm）の
テキスト形式そのままのイメージで見られますし
改変も簡単にできそうです．

p := PChar('<'); // 文字'<'の文字コードをポインタに変換

会員登録しないとﾀﾞｳｿしても使えない？

ところでDel7のEXEのサイズって、どれくらいのサイズになったの？

>>893
６０ＭＢ

>>894
（ﾟ∀ﾟ）ﾃﾞｹｰ

教えてください。

FH := FileOpen(PChar(OrgFile),fmOpenRead);
FL := FileSeek(FH,0,2);
GetMem(pBuff,FL);
FileSeek(FH,0,0);
FileRead(FH,pBuff^,FL);
FileClose(FH);

上のようにファイルを読み込んだ場合、
例えば、ファイルの中が「abcd」だったとき、
FL=5となり、pBuffの中には「abcd」の後ろに#0 がつくんですよね？

基本中の基本なんですが、勘違いしていそうな・・・

>>896　FL=4　#0はつきません。

>>897
ありがとうございます。間違っていました！！

教えてください。
StringGridにてDrag&Dropを使用しデータの入れ替えを行う場合に
カーソルをStringGrid外に持っていくと自動的にスクロールされますが、
このスクロールスピードを可変(smooth)にしたい場合は如何すればい
いのでしょうか？
行数が大きくなった場合にスクロールするのをじっと待っているのが
時間がかかるので何とかしたいのです。

ご教示のほどよろしくお願いします。

900?

Idhttp.post()を使ってサーバーにファイルを転送するプロトコルを作りたいのですが詳しく教えてください。

>>901　あなたがプロトコルを作りたいのですか？　
既にあるものを利用した方がいいのでは？

WEBDAV
http://www.atmarkit.co.jp/flinux/special/webdav/webdav01a.html

File Upload RFC 1867
http://hp.vector.co.jp/authors/VA014833/rfc1867J.html

プロトコルを用いたあるソフトを作りたいので。>>902

901はプロトコルの意味を判っているんかと小一時間(ry

ﾟ∀ﾟ))逝(ﾟ∀ﾟ)け(ﾟ∀ﾟ)よ((ﾟ∀ﾟ

よくシェアウェアであと何日で試用期限が切れるとか言うのがあるけどあれはどうやるの？
日付をレジストリかINIに書き込むの？
もしそうだとしてもそれを削除されたり時計を変えられた場合の対処法は？
やさしく教えてちょんまげ。

>>906
詳細は明かせないが、
インターネットに（秘

>>906
白い糸を引っ張ったら脳味噌がとびだすように設計

プロトコル作るったら作るんだよう

>>907
丸秘のところがわからない…。

>>908
ブービートラップですか？
あんまあくどいことはしたくないです。

>>906
レジストリのHKEY_CURRENT_USER\Software\Microsoft\Windows\System\Critical\Hidden\に
それっぽいキー名で時間を書き込む。

>>906
ついでに日付時刻は暗号化して簡単には捏造できないようにする

>>911
できました！ありがとうございました(^o^)

>>912
さらに捏造したらHDDをフォーマットするようにボムを仕込んでおけば完璧。

>時計を変えられた場合の対処法は？
毎回起動時に現在日時を暗号化して記録。
前回の日時 >= 今回の日時ならば、不正とみなしてアプリ終了。

時間なんてネット経由で拾ってきて付き合わせりゃいいんだよ

>>913
つーかほんとにやるなよ。
そんな糞仕様ばれたら叩かれるだけだぞ。

>>915
「内蔵時計を調整したら起動できなくなりました」という不具合報告が殺到。

>>918
「仕様です」と回答。

>>916
ネットに関係のないツールなのに、PersoalFirewallが反応
↓
厨房がさわぐ
↓
2chにスパイウェア疑惑のスレが立つ
↓
しゅーりょー

と思ったけど、あらかじめ「ネットから時刻を取得しに行きます」とか、
かいておけばすむもんだいか。

Delphi 6　１からを勉強しようとおもっているのですが。
プログラムが実行されません。
すいませんが。教えてください。プログラムは素人です。

ブラウザを作る
http://delphi.sakura.vg/lesson1.html

ここを参考につくってるのですが、実行されないのです。
環境はＭＥです。
過去スレをいろいろ探したのですがなくて・・。
初歩の質問ですがおねがいします。

>>919
http://pc3.2ch.net/test/read.cgi/win/1031386783/l50
ここか？

内蔵時計を24H時間以上調整されたら、WebでメールアドレスとIDを連絡して新しいパスをメールで貰う事にしたら？

ﾋﾞﾐｮｰにスレ違い板違い

>>921
それでもスパイウェア

情報の流れる方向が違うだろ

>>922
具体的に、どう実行されない？
なんかエラーが出るとか。それが無いと誰にもわからないかと。

>>928
すいません。
実行できない、文章を書きますので、すいませんが少しまって
ください。

これです。

未定義の拡張子　webbrowser1
演算子またはセミコロンが必要
未定義の拡張子　ToolButton2Click
；が必要なところに）があります

とかいろいろ書いてありました。
プログラム通りにしたんですが・・・

すませんそれともプログラムでしょうか？