くだすれDelphi(超初� ..
[2ch|▼Menu]
178:デフォルトの名無しさん
08/11/17 14:52:48
>>175
WM_ENTERMENULOOPでフラグ立ててWM_EXITMENULOOPでフラグ降ろす

179:174
08/11/17 14:56:10
>>176 >>177
バックアップのと照らし合わせたら同じでした、と言う事は
インストール番号とキーは今のＯＳでは使えない(インストールだけは出来る)ので
メールでインストール番号とキーを書いて送って帰ってきた
使用許諾コードも使えないと言う事ですよね、困ったなぁ

＞それでソフト配ってる奴なんか山のようにいる
EXEの中に未許諾の情報とか入ってないんですか

180:デフォルトの名無しさん
08/11/17 15:02:29
>>179
むむ・・・すまん
じゃあもういっその事レジストリ全部上書きでもいいと思うよｗ

> EXEの中に未許諾の情報とか入ってないんですか
Kylixにはあると思う（System.pasにそんなことがちらり）けど、Delphiにはないんじゃないかなあ

181:174
08/11/17 15:56:17
>>180
上書きは項目が沢山あるんで諦めましたｗ
情報はDELPHIの方には入って無いんですか、じゃあそのままにしときます。
一応登録する意思はあるんで、出来ないんじゃどうしようも無いですし。
自分せいじゃあ無いんでしょうがないです。
色々ありがとうございます、ちょっと安心しました。

182:デフォルトの名無しさん
08/11/17 17:21:40
OSとか換えなくてもDel6入れ直しただけで前の使用許諾コード使えなくなったな
俺はそのまま赤いまま

183:デフォルトの名無しさん
08/11/17 19:26:44
Delphiのimplements指令がいまいちわかりません。

下記サイトでサンプルコードがあったのですが、
An Introduction to COM Programming with Delphi (3 / 6)
URLﾘﾝｸ(delphi.about.com)

結局、implementsを書いたクラスは一度interfaceにキャストしないと
メソッドよめないんでしょうか？

var
　Test: TTest;
　Foo: IFoo;
begin
　Test := TTest.Create;
　Foo := Test;
　Foo.Bar;　　// FooにキャストしないとBarに呼べない


184:デフォルトの名無しさん
08/11/17 19:27:26
> メソッドよめないんでしょうか？
メソッド呼べないんでしょうか？

185:デフォルトの名無しさん
08/11/17 20:01:50
>>174
登録コードの数字と使用許諾コードがあればレジストリでLMの最後にある数字を
元の登録コードの数字に書き換えれば登録できる

186:ななしへたぐらま ◆XcB18Bks.Y
08/11/17 22:04:12
>>162
こんな時こそ正規表現ライブラリを使うべし。
正規表現ライブラリはいろいろありますけど今回はskRegExpで。
日本語のヘルプもあるので比較的使いやすいと思います。

そのものズバリのコードも書いてしまったのですが勉強にならないと思うので
今回は変換したい部分を特定するコードのサンプルだけ。

const
　cSample = 'I want to convert "→" and "&#rarr;" into right arrow!';
var
　exp: TSkRegExp;
　Converted: string;
begin
　Writeln('Sample:"', cSample, '"');
　exp := TSkRegExp.Create;
　try
　　exp.Expression := '&#[0-9]+;|&#[A-Za-z]+;'; // 見つけたいパターンは「&#，0から9のどれかが1文字以上，;」または「&#，A～Zかa～zが1文字以上，;」
　　if exp.Exec(cSample) then // 先頭からパターンに一致するところを探せ．もし見つかったなら…
　　　repeat
　　　　Writeln('見つけた！: 「', exp.Match[0], '」 ', exp.MatchPos[0], '文字目から', exp.MatchLen[0], '文字分');
　　　until not exp.ExecNext; // 次を探せ．見つからなかったらループを抜ける．
　finally
　　exp.Free;
　end;
end.

>>168-169
as 演算子によるインターフェースへのキャストはGUIDを付けないと使えないみたいです。
でも今回はそれが原因ではない気もします。


187:デフォルトの名無しさん
08/11/18 01:11:12
>>183
TestはあくまでDelphiのオブジェクトなので実装されていない
メソッドが呼べないのは当たり前じゃないでしょうか。

188:デフォルトの名無しさん
08/11/18 01:28:33
>>181
・SerialNumber：インストール番号と
・AuthorizationKey：インストールキーは、そのまま使える
ってか使えるからインスコ出来る訳で

インスコし直し（とかD6RegClean.exe実行）すると
・RegistrationKey：登録コード　が変わる

その登録コードで有効な許諾コードを取得
URLﾘﾝｸ(reg.codegear.com)

メアドはDeveloper Networkのアカウントにログインして変えれば良い

Borlandの時の返信Mailは登録コードも書いてあったけど
Embarcaderoのには書いてない。
念のため事前に数字メモっとかないと。。。

189:デフォルトの名無しさん
08/11/18 05:07:48
OOPについての基本的な質問なのですが・・・
オブジェクト"objA"からオブジェクト"objB"を生成するとします。

procedure TMain.foo();
begin
　objA := TObjA.create();
　objA.foo();// objBを生成
end;

procedure TObjA.foo();
begin
　objB := TObjB.create();
end;

この場合、objAからobjBにメッセージを送ることはできますが、
その逆（objBからobjAにメッセージを送る）はできないと思います。
（objBは、どのオブジェクトから生成されたか知らないため）

objBが、生成元のオブジェクトobjAにメッセージを送れるようにするには、
どうすればいいでしょうか？

190:デフォルトの名無しさん
08/11/18 05:09:52
コンストラクタで生成元を渡すような仕様にしたらいいんでは？

191:デフォルトの名無しさん
08/11/18 05:16:04
メッセージが何のことやら

192:189
08/11/18 05:16:24
>>190
ありがとうございます。

procedure TObjA.foo();
begin
　objB := TObjB.create(self);
end;

などとして、引き回すということですよね？
この方法が一番スマートですかね…？

193:174
08/11/18 05:55:54
>>182 >>185 >>188
返事遅れてすいません、>>185 さんの方法で上手く出来ましたｗ
ＯＳの違いじゃなくて登録コードが合ってなかったんですね。
入力欄に入れようとしても変えられなかったんで関係ないと思ってました。
いや本当に助かりました、これでスッキリとDELPHI6を使い続ける事ができます。
本当にありがとう御座いました。

194:デフォルトの名無しさん
08/11/18 11:36:24
これはいいライブラリになるかも。試してないけど。

309 名前：View ◆AcQTmXmylo [sage] 投稿日：2008/11/18(火) 05:25:01 ID:bqCSxa7a
今回導入した鬼車もオープンソース(BSDライセンス)なので、それに対する貢献はなんだろうと考え、
delphiから鬼車を使うためのラッパークラスTOnigRegExpのソースを公開しました。

URLﾘﾝｸ(www.geocities.jp)

OnigRegExpは、Km氏が作成したdllラッパーのoniguruma.pas, onig.pasの改造品を
さらにラップしてクラス化したものです。
URLﾘﾝｸ(homepage2.nifty.com)

195:デフォルトの名無しさん
08/11/18 12:39:51
人によってクセがあるので自分で書いたほうが
使い易かったりもするけどね

196:デフォルトの名無しさん
08/11/18 12:55:40
>>189　なんでそんな面倒なことするの？　メンバ変数で記録すればいいじゃないか

procedure TMain.foo();
begin
　objA := TObjA.create();
　objA.foo();// objBを生成
end;

↑これobjB作れてないじゃん　objAとかobjBは結局ポインタなんだけどわかってる？

197:デフォルトの名無しさん
08/11/18 15:50:45
procedure TForm1.Button2Click(Sender: TObject);
var
lp: PChar;
str: String;
ch: Char;
begin
ch := 'A';
str := 'A';
lp := PChar(str);
if lp = ch then begin
Caption := 'equal';
end;
end;

delphi2009だと、lp = chでstring->ShortStringな警告が出るんですが、
そういうものでしょうか？思いっきり、'A'を文字数だと思って比較しています。


198:デフォルトの名無しさん
08/11/18 16:33:58
>>196
全部読めよ

199:デフォルトの名無しさん
08/11/18 16:36:05
>>197
lp^じゃねぇの？

200:デフォルトの名無しさん
08/11/18 17:35:53
>>199
漏れもそう思ったんだが、両方文字列に変換してから比較るらしい。
D5だとequal言うんよね。

201:デフォルトの名無しさん
08/11/18 17:43:46
あの、流れ無視でごめん。
所でDelphi2009は.Net対応？
みんなは.Netに移行するんですか？Win32維持ですか？
Delphiはその流れに付いて行っているんですか？


202:デフォルトの名無しさん
08/11/18 18:48:36
いまのDel使いは.NETに乗り遅れた人達なんだよ・・

203:デフォルトの名無しさん
08/11/18 19:07:13
oniguruma.pasに接頭辞Tで始まるデータタイプを定義してほしい。
もうね、
var
RegExp: OnigRegExp;
Windows.pasも例えばTLogFont = tagLogFont;と別名定義してんだし、
合わせろよ。
と、>>195に同意。


204:デフォルトの名無しさん
08/11/18 20:16:57
>>188
ありがとう
居座ってた赤いの消すことが出来た

205:デフォルトの名無しさん
08/11/18 21:19:06
VBSなRegExp風にラップしてくれ～
あれが一番使いやすい。
ついでにコールバックによる置換なんかに対応してくれれば言うことない。

206:デフォルトの名無しさん
08/11/18 21:26:00
「VBSなRegExp」がどんなのか分かったら暇なときにやらないこともない

207:197
08/11/18 21:56:01
>>197
del5でもShortStringに変換して比較してた>AStrCmp
WideCharの比較でなんでShortStringが出てくるのかわからないけど、仕様ならしょうがないか。


208:デフォルトの名無しさん
08/11/18 21:58:34
UnicodeStringへの添え字でのアクセスはShortStringになるのが関係ありそうでなさそうでありそう

209:デフォルトの名無しさん
08/11/18 21:58:57
>>187
まあそれはそうなのですが、単純にブリッジ処理書くのが省ければなあ、
という用途で使おうと思ったら、
面倒くさい仕様なので残念！といったところなのです。

210:デフォルトの名無しさん
08/11/18 22:01:53
Ordをかましたらどうだろ

211:デフォルトの名無しさん
08/11/18 23:44:44
Orz

212:デフォルトの名無しさん
08/11/19 01:18:28
delphiで、一部の文字の色を変えるエディタって簡単に作れるの？

213:デフォルトの名無しさん
08/11/19 01:21:26
>>212
そんなこと聞いてるあなたには簡単ではないでしょうね

214:デフォルトの名無しさん
08/11/19 01:33:40
richeditで出来るだろ

215:デフォルトの名無しさん
08/11/19 10:12:46
Delphi2009のバージョンアップ版ってインストール時に
前バージョン(Delphi4持ってる、2は行方不明)の確認ありますか？
VBとの比較検討用だったんでユーザー登録もしてないんだけど...


216:デフォルトの名無しさん
08/11/19 11:05:41
おそらく前バージョンのユーザー登録してないならアクティベーション通らないんじゃないかな？
CDNのアカウントで認証してるみたいだし。サポートに問い合わせた方がいいかと。


217:デフォルトの名無しさん
08/11/19 21:33:50
>>192
TObjBでイベントを定義して、ObjBを生成したときに
イベントハンドラとしてObjAのメソッドをを代入するのがいい。

ObjAの参照を持たせるよりも結合度を小さくできる。

218:デフォルトの名無しさん
08/11/19 23:19:20
特定のオブジェクトの参照を保持するのと、そのメソッドを保持するのと
結合度に差があるの？　メッセージを送りたいんだから TObject の Dispatch()
を使えるし、だからすべてのクラスで参照を保持できたほうが汎用性の意味では
よりいいんでは？

219:217
08/11/21 01:04:58
んー、どうだろね。
メッセージというのがwindowsメッセージやdelphiのディスパッチのメカニズムを
利用する話なら>>218で正しいと思うけど、>>189にはOOPの話と断りが入ってる。

OOPでのメッセージという用語はオブジェクト間のやりとりの総称なので、
メソッドの呼び出しなども当然に含まれる。俺はそういう理解で解答してる。

220:デフォルトの名無しさん
08/11/22 08:52:35
>>186
なんかりんごの皮をチェンソーで剥いてる様な気がするのは俺だけ？

221:デフォルトの名無しさん
08/11/22 10:57:03
そりゃ金の取れる芸のレベルだよ

222:デフォルトの名無しさん
08/11/22 10:58:45
正規表現コンポに金使えばいいのか

223:デフォルトの名無しさん
08/11/22 11:12:54
FreeMemにサイズを指定するメリットってあるんでしょうか？
Sizeが無指定だとちゃんと全部開放されないとかあるんでしょうか

224:デフォルトの名無しさん
08/11/22 16:37:35
Delphi6 Personal使ってます。
manifest適用時にTComboBoxのSelText、SelStart、SelLengthの値が
正しく取得できなくて困ってます。

Textに「あいうえお」と入力して「うえ」を選択したとき

SelText: 
SelStart: 1
SelLength: 1

という結果が返ってきます。
半角だと問題ないのですが全角だとおかしくなります。

正しい値を取得するにはどうすればいいでしょうか？


225:デフォルトの名無しさん
08/11/22 17:31:56
Delphi 2007でも同様の結果になるようですね。

226:デフォルトの名無しさん
08/11/22 18:26:08
manifest適用しなければおｋ

227:デフォルトの名無しさん
08/11/23 12:04:15
ユニコード対応のD2009じゃね？

Tntは修正が不完全だけど、一応使えるレベルだと思う。

228:225
08/11/23 13:08:12
TNTComboBoxならSelStart/SelLengthは正常に取得できる。SelTextはTextをAnsiStringに
変換後に自前で変換すればいい。
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := Format('SelStart=%d SelLength=%d SelText=%s',
[ComboBox1.SelStart,ComboBox1.SelLength,
Copy(AnsiString(ComboBox1.Text),ComboBox1.SelStart + 1,ComboBox1.SelLength)]);
end;


229:デフォルトの名無しさん
08/11/23 13:16:48
TNTって無料版の開発終わったよね

230:225
08/11/23 13:34:43
まーでも古い版はダウンロード可能だし。mh-nexusさんとことか。でもDelphi 6 Personalは別版が必要かも？

231:225
08/11/23 14:01:52
TNTは現在はTMSで売ってる。
URLﾘﾝｸ(www.tmssoftware.com)
個人なら30Euro(3600円くらい)。

232:デフォルトの名無しさん
08/11/23 15:08:16
有料版でも直ってないそうですね
まあ、英語圏の人は他言語IMEなんて使ってないだろうし

FastCodeの中の人なんて、LowerCaseのTable作りに
CharUpperBuff使っただけで、「Ansi」StringReplaceとか言っちゃってるしなぁ

233:デフォルトの名無しさん
08/11/23 15:10:37
いけね、UpcaseのTableだ

234:デフォルトの名無しさん
08/11/24 21:47:14
>>230
そのままだとコンポが足りないのでエラーが出るけど
ちょっと書き換えればD6Perでも動くよ

235:デフォルトの名無しさん
08/11/24 22:45:46
DBとBandｱｸﾁｮﾝ削ればOKだったかな
で、必要な人はsoft-gemsのThemeManager入れる、と

236:デフォルトの名無しさん
08/11/25 18:14:27
特待販売の葉書が来た。
久々にバージョンアップしてもいいかなぁと思ってるところ。
今C#を主に使用しているんだけど、Delphiならではのメリットっていうと、
VCLとネイティブコンパイルぐらい？

237:デフォルトの名無しさん
08/11/25 20:39:27
バージョンアップしなくても「Delphiならではのメリット」は変わらんだろ・・

238:デフォルトの名無しさん
08/11/25 22:22:05
昔、Delphi 7 では、デバッグでカーソルを変数に合わせるだけで値をインスペクトできた。

先日、Delphi 2006 を借りて使ってみたら、それができないじゃん。

新しい Delphi ではどうなっているのか知ってる人、どーか教えてくだしゃい。


239:デフォルトの名無しさん
08/11/25 22:40:42
>>236
おれんとこにも来たな、特待販売の葉書。
見たら会社名に「エンバカデロ・テクノロジーズ」って書いてある。

　エン　バカ　デロ

は、日本じゃアウトだろフツー。

C++Builder でまともなプログラム組めたことなかったし、
Delphi 2005, Delphi 2006 も安定しなかったんでまともに使ってなかったし、
エン「バカ」デロ　Delphi と C++Builder はマジで悩む。



240:デフォルトの名無しさん
08/11/25 22:42:04
えっ？できますよ？

241:デフォルトの名無しさん
08/11/25 22:50:35
>>239
うわぁ・・・

242:デフォルトの名無しさん
08/11/25 22:54:41
>>239
安定しなかったってどういうこと？
ちなみに、Delphi7で業務アプリ作ったけど、その時は割と安定してたけどな。

Delphiで気になるのは、ネイティブコンパイルと、VCLかな。
ビジュアルコンポーネントの使い勝手は優秀だと思った。
StringListとかObjectListなどの非ビジュアルコンポも優秀だけど、

いまじゃC#でもList<String>とかで代用できてしまうし、
コンポーネントもVCLライクに仕上がって遜色ない出来になってるしなぁという感じで悩む。
ま、.NETFrameworkがないと動作しないのは相変わらずなんだけど。



243:デフォルトの名無しさん
08/11/25 23:33:59
Delphi7は安定していたが、Delphi 2005は統合環境がなぜかフリーズしまくり。

Delphi 2006 はコードエディタな若干不安定で、箱形コピペなどすると、ずれ
てペーストされる。また、何もしなくとも、しばらくするとＣＰＵを食うよ
うな処理が統合環境内部で起こる。そして、Delphi7より何か重たい。
また、>>238 のように、デバッグでカーソルを変数に合わせるだけで値を
インスペクトできない。（あれは便利だった！！！！）

これらの現象は、コードギアが提供したパッチを当ててもダメだったんだな。
そんで、今もDelphi7を使っているんだよな、おれ。

ただし、どこかにあったGoogleMap を組み込んだデモだけは、Delphi7では
コンパイルできなかったのでDelphi 2006 で試したらうまくいった。

ハーア、何かうまくゆかないもんだな。

244:デフォルトの名無しさん
08/11/25 23:38:21
>>240
>えっ？できますよ？
えっ？できるの？


245:デフォルトの名無しさん
08/11/25 23:46:46
>244
>238のことですよね？できますよ。もちろんローカル変数ウィンドウでも評価ウィンドウでも見られますけど、
変数にカーソルをあてるだけでインスペクションできるし、最近のものでは構造体のメンバやポインタの
示す先を追っていくこともできます。できないバージョンは(Personal/TurboExplorerを除けば)ないんじゃないかな？

246:デフォルトの名無しさん
08/11/25 23:47:58
× できないバージョンは(Personal/TurboExplorerを除けば)ないんじゃないかな？
○ Delphi5以降でできないバージョンは(Personal/TurboExplorerを除けば)ないんじゃないかな？


247:デフォルトの名無しさん
08/11/26 00:00:42
>>238 >>244
「メニュー」ツール　→　オプション　

「オプションダイアログ」　エディタ設定　→　支援機能　→　ツールチップ式評価　をチェックでＯＫ

デバッグの機能なんだけど、「デバッガオプション」ではなく「エディタ設定」にあるのがミソ


248:デフォルトの名無しさん
08/11/26 12:33:02
IDEが不安定ってことなのか。
いつからかIDEが.NET上でしか動作しないようになったんかな。
若干、重いイメージは確かにあったけど。
ネイティブで動作させることを目的としなければ、VS2005移行で十分に
Delphi並のRAD環境になってるから、選択に難しいところではあるよね。

249:デフォルトの名無しさん
08/11/26 12:58:37
IDEは.Netだけど、コンパイルされるコードはネイティブ。

250:デフォルトの名無しさん
08/11/26 14:05:53
D2009はIDEはネイティブでそ？
ヘルプのために.NETがいるだけで

251:デフォルトの名無しさん
08/11/26 14:30:54
Delphiって算術シフトの演算子ってないの？？？


252:デフォルトの名無しさん
08/11/26 14:35:28
shlとshr

253:ななしへたぐらま ◆XcB18Bks.Y
08/11/26 17:34:36
>>251
ビットシフトこのとでしたら shl、shr で。
綴りで分かるかもしれませんがそれぞれ左シフト（SHift Left）と右シフト（SHift Right）。


254:ななしへたぐらま ◆XcB18Bks.Y
08/11/26 17:35:51
って一番下の252が見えてなかった…すいません


255:デフォルトの名無しさん
08/11/26 18:56:32
ファイルの先頭からあるバイト目からをMemoに読み込むにはどうしたらよいのでしょうか？

というのも、ファイルの先頭にいらない物が付いていてそのまま


256:デフォルトの名無しさん
08/11/26 18:59:58
途中送信してしまった・・・orz
ファイルの先頭からあるバイト目からをMemoに読み込むにはどうしたらよいのでしょうか？

というのも、ファイルの先頭にいらない物が付いていてそのまま
Memo1.Lines.LoadFromFile(Filename);
とやっても文字化け？して読めないんです。
でもその無駄なのを取り去ってやるとMemoに読み込めます。

257:デフォルトの名無しさん
08/11/26 19:14:15
>>256
それはウニコードだね

258:デフォルトの名無しさん
08/11/26 20:13:55
>>256
TFileStreamとかAssignFile・Seek・Readで読み出せばいいはず
TFileStreamの方が簡単・VCL的なのでおすすめ
procedure TForm1.ButtonClick(Sender: TObject);
var
Stream: TFileStream;
begin
Stream := TFileStream.Create(Edit1.Text, fmOpenRead or fmShareDenyWrite);
try
Stream.Seek(10, soFromBeginning);//10バイト飛ばして読む
Memo1.Lines.LoadFromStream(Stream);
finally
Stream.Free;
end;
end;

>>257
うんこーどと断定できるとかすげえな

259:デフォルトの名無しさん
08/11/27 01:16:21
Delphi 2006でコンポーネントのインストールをしたい。

だが、「コンポーネントのインストール」がメニューから消えており、
ＨＥＬＰで「コンポーネントのインストール」を検索すると

　　『コンポーネントコンポーネントのインストール』
　　このダイアログボックスでは，コンポーネントを新規パッケージ
　　または既存のパッケージにインストールします。

とある。
いったい、どうやってダイアログボックスまでたどり着くのだろう？
どなたか教えて下され。


260:デフォルトの名無しさん
08/11/27 01:47:15
>>259
2006のヘルプを見ろよ
>すべてのコンポーネントはパッケージとして IDE にインストールされます。したがって，
>ユーザー自身がコンポーネントを作成するときには，まずそのコンポーネントを入れる
>パッケージを 作成してコンパイル する必要があります。コンポーネントのソースコードは，
>コンポーネント作成の概要 で説明されているモデルにしたがって記述する必要があります。

261:デフォルトの名無しさん
08/11/27 10:21:20
>>260
なるほど、Delphi2006は　｢ﾌｧｲﾙ｣ﾒﾆｭｰ　から辿ってﾊﾟｯｹｰｼﾞを作るようになってたんだ。

Delphi7では　｢ｺﾝﾎﾟｰﾈﾝﾄ｣ﾒﾆｭｰ　からいきなり「ｺﾝﾎﾟｰﾈﾝﾄのｲﾝｽﾄｰﾙ」ができ、そこで
ﾊﾟｯｹｰｼﾞを新規に作成してたんで（これには）気付かなかった。Delphi2006のように
ﾊﾟｯｹｰｼﾞ･ﾌﾟﾛｼﾞｪｸﾄとして開発する方が、Delphi7のときよりも少しだけ楽だね。
助かった。ありがとうございました。

262:デフォルトの名無しさん
08/11/27 12:57:36
Turbo DelphiでFastMM4.90を利用しています。

デバッグ時にステップ実行していると、メモリの確保や解放時などFastMMのソースに飛ばされます。
これを無視したい(デバッガがFastMMのコードまで追わないようにしたい)のですが、どうすればいいのでしょうか。

263:262
08/11/27 13:03:36
とりあえず、コンパイラ指令の{$D-}をFastMMのソースに加えることで抑制しました。

264:デフォルトの名無しさん
08/11/27 13:33:23
ソースに飛べないようにすればいいじゃない
削除するなり移動するなり

265:デフォルトの名無しさん
08/11/28 12:38:27
>>264
そーすると、例外が起きるたびにソースを要求されるそーすよ。

266:デフォルトの名無しさん
08/11/29 13:19:11
そーすね

267:デフォルトの名無しさん
08/11/29 14:04:42
　　　　　　　　　　　　＿＿_
　　　　　　 　 　,,ｒ''"´　　 　｀"''-,,
　　　　　　 　／　ノ 　　ヽ、　　　　＼
　　 　 　 　 / （ ● ) 　　( ● )　ヽ　 ヽ
　 　 　　　 i゛　:::⌒（__人__）⌒:::　 ヽ　 ゛i
　　　　　　l　　　　 |r┬-| 　 　 　　l　 ノ　　　　そーなんすかｗｗｗ
　 　 　 　 !　　　　 |　|　 |　　　 　　レ'
　　　 　　l 　　l　　|　|　 |　　 l　　,　l
　　　 　　| 　　l 　 `ー'´　 　 |　　l　l
　 　 　 　 !　　 l　　　　 　 　,!　　|　l
　　　　　　l　 　゛i　　　　 　 /　　l　i゛
　　　　　　゛i　 　ヽ　　　 　/ 　 / /
　　　　　 　ヽ,__,,,ゝ　　 　く　 ノ /
　　　　　　　　ヽ　　 　　　 ゛"　/　　 　　＿_
　　　 　 　＿ 　）　　　　　　、（二"'''ー'"ー'__゛゛ヽ
　　　　　ｒ'　 ￣ 　 　 　 　 　￣ヽ,）‐-,,_ ´┴'ノ
　　　　　ヽ＿＿,,-─-、＿＿,ノ 　


268:デフォルトの名無しさん
08/11/30 10:34:14
FastMMがいつの間にやら新しくなってたので落とそうと思ったらアカウントが必要になってたのね
そう思って登録しようとしても、必要事項書いてRegistration押してもその後何にも起こらん
どうすりゃいいの?メール来るのかと思ったら来ないし

269:デフォルトの名無しさん
08/11/30 10:38:09
とりあえずお前が英語苦手だってことは理解した

270:デフォルトの名無しさん
08/11/30 10:41:19
>>268
ダウンロードにパスなんて必要ないんだけど

271:デフォルトの名無しさん
08/11/30 10:41:46
パスじゃなかったアカウントだ

272:デフォルトの名無しさん
08/11/30 10:52:54
あれー？Download押すとトップページに飛ばされるから
そう思ってた。俺だけ？

273:デフォルトの名無しさん
08/11/30 10:58:33
URLﾘﾝｸ(sourceforge.net)→Download→FastMM 4.92→FastMM492.zipだろ？
どこで踏み外せばいいんだ

274:デフォルトの名無しさん
08/11/30 12:18:31
すぐ上で言ってるとおり、Downloadだよ
俺だけのようだ…会社でも家でも同じだったんだよなあ
なんでだろ

275:デフォルトの名無しさん
08/11/30 12:22:10
ブラウザのせいだったようだ
すまんです

276:デフォルトの名無しさん
08/11/30 12:26:34
どんな糞ブラウザ使ってんだよｗ

277:デフォルトの名無しさん
08/11/30 13:40:11
Turbo Delphiを使用しています。

ローカルバックアップの保持ファイル数の上限を増やすことはできるでしょうか？。
私の環境では、どうも100個くらいしか保持してくれないようです。
これを1000個くらいまで保持してくれれば、個人的にはだいぶ楽になるのです。

よろしくお願いします。

278:デフォルトの名無しさん
08/11/30 13:43:03
あまりそれでがんばらずに素直にバージョン管理システム使ったら。
TortoiseSVN + pdumpfsの組み合わせて使ってるけどソース紛失で泣く事はなくなったな。

279:デフォルトの名無しさん
08/11/30 14:02:22
>>278
どうも。

IDE標準の、変更のたびにバックアップが作成されるというのは、
利点でもあり弱点でもありますね。

トイレに行った後、レジストリの方も調べてみましたが、
BDS-4.0-Editor-OptionにあるFile Backup Levelというキーで、
上限を増やせるようです？(実際に増えるかは未確認)。

当座はこれでしの(げるならしの)ぎます。教えていただいたソフトウェアについても、
調べてみたいと思います。ありがとうございました。

280:デフォルトの名無しさん
08/11/30 22:00:56
かなりくだらない質問なんですが
皆さんbegin...endのbeginをどこにで書いてますか？
例えば
if hoge then
begin
hage;
end;

とか

if hoge then begin
hage;
end;

281:デフォルトの名無しさん
08/11/30 22:07:05
>280
俺は上派だな。elseがある場合は下みたいな感じ。

if hoge then
begin
end else if mage then
begin
end else
begin
end;


VCL内でも統一した書式はないと思う。

282:デフォルトの名無しさん
08/11/30 23:55:55
懐かしい議論だ。俺は下派。

283:デフォルトの名無しさん
08/11/30 23:58:51
使ってるモニタ次第
UXGAでちまちま詰める必要はないし
ノートで縦にだらだら書いてたら確実に生産性が低下する

284:デフォルトの名無しさん
08/12/01 00:02:59
モニタでいちいち書式かえたらよけい生産性が下がるわな・・

285:デフォルトの名無しさん
08/12/01 00:15:54
以下のような書き方してる。
if hoge then begin
end
else if uge then begin
end
else then
end;
って書いてる。
ifのブロックとelseのブロックがend挟んで分離されるので、一目でどこまでがifのブロックか見分けることができると思う。

ただし、hogeが長くなったり複数行になる場合は、例外として、
if (hogeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee)
and (ugeeeeeeeeeeeeeeeeeeeeeeeeeeeeee) then
begin
end;
としてる。

beginが右の方に行き過ぎて、書いたかどうか分からなくなるから。
もし本当に書き忘れたり、うっかり削除すると、endの対応が一致しないってエラーに悩まされる。あと、思い込みのミスもあるし。
前回のコンパイルから時間が経ってると、どこ直したか忘れて、一カ所ずつ探すはめになるので。
こまめにコンパイルすればいいんだけど、気持ちよく書いている時って、しばしば忘れるんだよね。

また、質問と外れるけど、
if hoge then
syoti1;
syori2;
って書いちゃって、なんでsyori2が常に走るんだって、悩むことになるから、if hoge then Exitのような単純な場合を除いて、ぶら下がりインデントは使用しない様にしてる。
基本的には、自分は間違っていない！という思い込みのミスを避ける方向に書くようにしてる。

286:デフォルトの名無しさん
08/12/01 01:56:00
パスカルの生みの親ビルトが頭弱かったから、汚い　begin　end　がプログラムを醜くしてしまった。
単文、複文なんて、関係ないのにね。
まあ、おいらもバカだが、if 文は次のようなものが分かり易いと思っている。

<else 句がない場合>　　　　<else 句がひとつある場合>　　　　<else句が複数ある場合 ※ef はelseifの意>

if　条件式　then　　　　　　　if　条件式　then　　　　　　　　　　　if　条件式　then
　　文　　　　　　　　　　　　　　　　文　　　　　　　　　　　　　　　　　　　　文
endif　　　　　　　　　　　　　　else　　　　　　　　　　　　　　　　　　 ef　条件式　then
　　　　　　　　　　　　　　　　　　　 文　　　　　　　　　　　　　　　　　　　　文
　　　　　　　　　　　　　　　　　endif　　　　　　　　　　　　　　　　　　ef　条件式　then
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　文
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　else
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　文
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　endif



287:デフォルトの名無しさん
08/12/01 01:59:08

でも、endif　も　ef　も予約語にないから、そこでおいらは次のようにしているんだ

<else 句がない場合>　　　　<else 句がひとつある場合>　　　　<else句が複数ある場合>

if　条件式　then　begin　　　if　条件式　then　begin　　　　　　　if　条件式　then　begin
　　文　　　　　　　　　　　　　　　　文　　　　　　　　　　　　　　　　　　　　文
end　　　　　　　　　　　　　　　end　else　begin　　　　　　　　　　　end　else　if　条件式　then　begin
　　　　　　　　　　　　　　　　　　　 文　　　　　　　　　　　　　　　　　　　　文
　　　　　　　　　　　　　　　　　end　　　　　　　　　　　　　　　　　　　end　else　if　条件式　then　begin
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　文
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　end　else　begin
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　文
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　endif

これで begin　end　に目を奪われにくくなるんで、ちょいバグだしにくくなったかな（って気がしてるだけかも）。

288:デフォルトの名無しさん
08/12/01 02:04:49
>>286 で書き忘れたけど、式の中の「文」は、単文でも複文でもいいと思ってくれ。

289:デフォルトの名無しさん
08/12/01 10:31:39
if 条件 then
begin
end
else if 条件 then
begin
end
else begin
end;

よくこういう議論を見かけるが、俺と同じやり方の奴って
見たこと無いんだよなー

290:デフォルトの名無しさん
08/12/01 10:32:54
お前は俺か

291:280
08/12/01 11:43:21
皆さんありがとうございます。
よくbegin...endの数が合わなくてエラー出てたもんで皆さんはどんな感じで書いているのか気になったんです。
教えていただいたものを色々試してみたいと思います。
とても参考になりました。どうもありがとうございました。

292:デフォルトの名無しさん
08/12/01 11:44:03
それはお前の頭が悪いｗｗ

293:デフォルトの名無しさん
08/12/01 12:02:36
でもさ、前々から思ってたんだけど、
ALT+[とかで対応する括弧は追えるのに
なんでbegin/endは追えないんだろ？

294:デフォルトの名無しさん
08/12/01 12:03:28
>>287
くだらねぇ、気持ち悪いルール使ってんじゃねぇよ。基本はdelphiならVCL、JavaならJavaのクラスライブラリ
のソースに合わせろよ。おまえらなみたいな奴のソースは見苦しくてかなわんわ。



295:デフォルトの名無しさん
08/12/01 12:43:40
こういうのが沸くからアンケートネタはWikiの投票pluginかなんかを使ってやってくれ

296:デフォルトの名無しさん
08/12/01 14:32:29
以下のように記述するのが正式だというのを海外のサイトで読んだことがある。
if 条件 then
文
else
if 条件 then
文
else
文;

if 条件 then
begin
文
end
else
begin
文
end;

文が短い場合は
if 条件 then 文 else 文;
って書いちゃうけどね。

297:デフォルトの名無しさん
08/12/01 15:08:49
書き方に正しいも糞もあるかよｗｗ

298:ななしへたぐらま ◆XcB18Bks.Y
08/12/01 16:29:02
>>286
QuickBASICやVisual Basicではまさにそんな感じの構文になっていて使いやすかったです。

>>293
C/C++の { } ほどの地獄ではないからかもしれません。


299:デフォルトの名無しさん
08/12/01 17:54:25
>>286 のおいらだが、おいらが C++ 使いだったころ、次の#define プリプロセッサで >>286 の構文が
コンパイラー通るようにしていたんだ。

#define　if　　　　 if(
#define　then　　 ){
#define　else　　　}else{
#define　ef　　　　}else if(
#define　endif　　}

てな感じだったけかな（？）。しばらくやってないんで忘れてしまったけどね。その他　for(;;)　構文なんかも
「 for 初期値　to　終了条件　step　増加式　do　文　endfor 」とか　if　と同じ要領でやっていた。
プログラムがスッキリしてたね。なんせ、おいら　if　や　for　の後の　(　)　が大嫌いだったからね。
これいらないと思う。C言語作った男もおいらに負けず相当オタンコナスだね。
まあ、この構文（>>286）でソースコードを渡すと、相手はビックリしてたっけ。おいらもかなりバカだね。


300:デフォルトの名無しさん
08/12/01 19:05:19
融通が利かない人はどんな職業でもいい発想ができない。


301:デフォルトの名無しさん
08/12/01 19:30:57
case ofのかっこいい書き方を教えれ
どうもelseだけしっくりこなかったりする

302:デフォルトの名無しさん
08/12/01 19:43:44
たしかにcase文はうざい

303:デフォルトの名無しさん
08/12/01 19:50:59
case n of
　 　 1:
　 　 　 　 foo;
　 　
　 　 2:
　 　 begin
　 　 　 　 bar;
　 　 end;
　 　
　 　 else
　 　 　 　 baz;
end;

304:デフォルトの名無しさん
08/12/01 20:13:24
case n of
1:
foo;

2:
begin
bar;
end;

else
baz;
end;

305:Delﾌｻｷﾞｺ ◆A6VzDeLphI
08/12/01 21:52:39
　 ∧,,∧∩　 おれ、こんなん。
　ミ,,ﾟДﾟ彡
　ﾐ つ旦.ﾐ 　
　　　if then
　　　begin
　　　end else
　　　if then
　　　begin
　　　end else
　　　begin
　　　end;

if が何個ならんでも、行頭を揃えたい気がするのです。
Caseはいつも悩む。
ifを、caseに変更したときに、begin...endをわざわざ
インデント変更したくないから
　　case A of
　　B:
　　begin
　　end;
　　C:
　　begin
　　end;
　　end; //case

かな。。行が増えすぎと、caseのendとbeginendが分けにくくていやなのだが。。

306:デフォルトの名無しさん
08/12/01 23:27:22
おいらも　case 文は苦手だったな。どうやってもキレイに書けない。しかし、だいたい次のようにやってた。（case の範囲を字下げではっきりさせたいんだな、おいら）

case A of
　　B:　文　　
　　C:　begin
　　　　　　文;
　　　　　　文
　　　　end
　　D,E: 文
　　else 文
end

case 文を 「case A of :値: 文 :値: 文 end 」とビルトが設計すればよかったかもね、次のようにスッキリする。（「文」は単文でも複文でも可だよ）
case A of
　　:B:　 文
　　:C: 文;
　　　　 文
　　:D,E: 文
　　else 文
end


307:デフォルトの名無しさん
08/12/01 23:34:44
気持ち悪い

308:デフォルトの名無しさん
08/12/01 23:42:18
caseの中はcaseより引っ込める
ラベルの中身も引っ込める、begin-endの中も引っ込める
ラベルの後ろにbeginを書くと、対応するendもおなじインデントに書きたい
横に伸び～

309:デフォルトの名無しさん
08/12/01 23:43:14
case～endの間を字下げで解決。

310:デフォルトの名無しさん
08/12/01 23:44:53
typeのクラス宣言内のprivateなprocedureとか、自動生成で変なインデントを付けられた日にはもうー

311:デフォルトの名無しさん
08/12/01 23:47:30
record型のconstの配列の初期化の記述がめんどくさい
コンパイラサボりすぎ

312:デフォルトの名無しさん
08/12/01 23:51:10
>>308
おいらもおんなじ気持ちだけど、これやるとインデント深くなるんだよなあ。
だからおいらはインデントをスペース３文字分にしてるんだが、それでも深くなる。
これがインデントがスペース８文字分で表示された日にゃー目がぶっ飛ぶ。


313:デフォルトの名無しさん
08/12/02 08:08:53
え！Del党ってインデントはスペース2文字でしょ。


314:デフォルトの名無しさん
08/12/02 08:42:41
オレは2文字だな。
if ～ then begin
　文
end else if ～ then begin
　文
end;

case i of
　1 : begin
　　　 文
　　　end;
end;

315:デフォルトの名無しさん
08/12/02 08:51:14
caseとelseとendをそろえてる。
caseに関しては自動インデントを使わずなるべく詰める様にしている。
17インチCRTからの流れで横も縦も圧縮する様な書き方になってしまった。
ifなんかでも改行してbeginの方が見やすいのに。

316:デフォルトの名無しさん
08/12/02 09:22:53
>>305
ifが常に行頭だと、別のif分と区別がつきにくいから嫌だな

case分は無駄にインデントが増えるな

case hoge of
　A:
　　begin
　　end;
　B:
　　begin
　　end;
　else
end;

これでやると、else内だけインデントがずれるのがむかつく

317:デフォルトの名無しさん
08/12/02 09:23:34
if分、じゃなくてif文だし、case分じゃなくてcase文
orz

318:デフォルトの名無しさん
08/12/02 11:01:35
>>313-314
インデント２文字でやってみたことあるんだけど気に入らなかったんだな、おいら。
なぜかっていうと、（一番多用される）if文のときインデント２文字だと

i f a = b then begin
c:= 2;
........

のようになって、この例で説明すると変数 a と c の頭が揃わないので美しくない。それに
if の近くに変数 c がありすぎて if が窮屈に見える。これをインデント３文字にすると

i f a = b then begin
　 c:= 2;
　 ........

となって、こっちの方がスッキリして見えるんだな、おいらの目には。（if文重視なんで）
まあ、バカなおいらの好みだけどね。
そんで、クラス宣言の自動生成がインデント２文字固定なんで、苦労してる。

319:デフォルトの名無しさん
08/12/02 11:05:18
秋田

320:デフォルトの名無しさん
08/12/02 11:07:07
>>318 の最初の例が崩れてたから訂正するね。

if a = b then begin
　c:= 2;
　........

（２ちゃんは左側の半角スペース取っちゃうんだよね.....。）

321:デフォルトの名無しさん
08/12/02 13:14:15
インデントは2文字。
if文は>>305に同じ。
大規模なcase文などではソースを折りたためるようにREGIONを使う。
case hoge of
　A: {$REGION '説明'}
　begin
　end; {$ENDREGION}
　B: {$REGION '説明'}
　begin
　end; {$ENDREGION}
else
end;

322:321
08/12/02 13:19:47
あ、if文は>>305とは微妙に違った。
if then
begin
end
else if then
begin
end
else
begin
end;

個人的には、else（else if） ～endまでの処理を消したり、
begin～endまでの複数行の文を単数行の文に書き換える際に自然だからこれで落ち着いた。

323:デフォルトの名無しさん
08/12/02 18:24:36
どうせソースの書き方なんて十人十色なんだからいい加減飽きろよ

324:デフォルトの名無しさん
08/12/02 18:26:21
新しい話題を提供しろよｗ

325:デフォルトの名無しさん
08/12/02 18:36:34
>324
「CodeGear RAD Studio 2009 日本語版」販売開始だって

326:デフォルトの名無しさん
08/12/02 21:47:10
delphiはなかなか良い言語だとは思うけど
C++ライクに記述できるような仕組みがあれば、いいなぁ。
あと、delphiにC++を埋め込めるようにできれば、なおよし。
begin～endはうざい。
あと、function/procedureと区別する意味がわからん。
C++歴５年、delphi歴３ヶ月より。


327:デフォルトの名無しさん
08/12/02 21:52:56
C++に、Pascalライクに記述できたらいいなあ。
なんて言われたら、ウザッとか思わない？

328:デフォルトの名無しさん
08/12/02 21:55:28
DLLとかC++ Builderとか使えば出来るけどね

329:デフォルトの名無しさん
08/12/02 21:55:43
>>327　そんな需要はないから。
delphiでC++ライクに使えれば、ポインタ使いまくれるし
C++脳の人間にとっては、とても楽。


330:デフォルトの名無しさん
08/12/02 21:56:14
でもちょっと違うか

331:デフォルトの名無しさん
08/12/02 21:56:52
>>329
それは工夫が足りないんじゃね？

332:デフォルトの名無しさん
08/12/02 21:59:10
C++記述するときにはいつも
「もっとDelphiライクなら・・・」
って思っちゃう俺はアホなのかもしれん＾＾；

333:デフォルトの名無しさん
08/12/02 22:00:59
じゃあおまいらどんな記述がいいのよ

334:デフォルトの名無しさん
08/12/02 22:21:56
教えてください。

既存のプロジェクトなのですが、DataModuleのSession,Aliasのアイコンが半透明に
なっています。
実行するとデータベースに接続するところで異常終了します。
つなげるべきデータベースはわかっているのですが、どのように設定したらよいので
しょうか。


335:デフォルトの名無しさん
08/12/02 22:28:21
Pythonが綺麗って言われてるよね。

Delphiと似てるからすぐに使えるようになるよ。

336:デフォルトの名無しさん
08/12/02 22:28:27
begin
end
が
{
}
ならDelphiが無敵

337:デフォルトの名無しさん
08/12/02 22:34:17
if True then {
MessageBox(Handle, 'test', 'test', MB_OK);
};
こうですか分かりません＞＜

338:デフォルトの名無しさん
08/12/02 23:07:14
むしろBegin～endの方が俺は見やすくて好きｗ


変態ですので

339:デフォルトの名無しさん
08/12/02 23:10:48
Begin～endよりbegin～endのがよっぽど見やすい

340:デフォルトの名無しさん
08/12/02 23:48:59
細かいやつって嫌われるよな

341:デフォルトの名無しさん
08/12/02 23:58:26
C++のコードは見づらい

342:デフォルトの名無しさん
08/12/03 00:01:42
>>340
C++は嫌われて無いじゃないですか

343:デフォルトの名無しさん
08/12/03 00:38:28
CoolBarの行を1行固定にしたいんだけどどうすればいいの？
アイコンバンド1、アイコンバンド2、検索窓の3つ設置。
実行してCoolBandを弄ってると必ず2行目が出来てしまう。

344:デフォルトの名無しさん
08/12/03 00:42:07
C++ の :: と -> がウザイ。


345:デフォルトの名無しさん
08/12/03 01:02:04
俺も

346:デフォルトの名無しさん
08/12/03 11:57:27
フォーム上の末代までのコントロール数をカウントする方法ってあります？

347:デフォルトの名無しさん
08/12/03 12:12:58
Form1.ComponentCount
子供の子供まで数えたい時はComponents使って再帰とかすればいい
function CountFunc(Compo: TComponent): Integer;
var
I, Count: Integer;

procedure SaikiFunc(Compo: TComponent);
var
I: Integer;
begin
for I := 0 to Compo.ComponentCount - 1 do
begin
Inc(Count);
SaikiFunc(Components[I]);
end;
end;

begin
Count := 0;
SaikiFunc(Compo);
Result := Count;
end;

348:デフォルトの名無しさん
08/12/03 15:51:56
教えてください。

Nscripterで集積ｴﾌｪｸﾄを使いたいのですが，

lsp 0,"****.jpg",208,32
print 99,3000,"breakup.dll/ulP"

これだと左，中央，右の指定ができず困っています。
どうしたらいいですか？

349:ななしへたぐらま ◆XcB18Bks.Y
08/12/03 18:01:45
>>347
それだと非ビジュアルコンポーネントまでカウントしてしまうので
＞ if Components[i] is TControl then
みたいに絞り込むか ControlCount/Controls を使うと良いと思います。

>>326
Delphiはプログラミング教育用に生まれたPascalの血を引いた言語ですから
わかりやすさを捨てることはないでしょうね。

逆にPascalのbegin～endがうざかった人間が作ったのがCですから
突き放したような結論で恐縮ですが
「Delphiのbegin～endがうざいならCPB使え」
ということになってしまうのではないかと思います。
（…なあんてことを書いたときに限ってDelphi2010あたりで{}が実装されたりして）


350:デフォルトの名無しさん
08/12/03 21:11:09
そういえば昔、SQL Anywhere というデータベースを使ったことがあったが、
そのストアードプロシジャーは if文が
　　if　条件　then　文１　else　文２　end
という構文で、文１と文２は単文でも複文でも begin　end が不要だったな。
ありゃあ見やすいし、書きやすかった。
begin　end　や { }　なんて過去の遺物、消え去るよ。

351:デフォルトの名無しさん
08/12/03 21:19:41
graphics32ってMPL1.1ですけど、改造しないで普通に使用して公開する場合は
ソースを公開する必要はないと聞きますけど
ここの Wikipedia項目ﾘﾝｸ
特徴のところで
バイナリ形式で配布する場合には、ソースをバイナリと一緒に公開しないと
いけないみたいな事かいてるんですけどどっちが本当ですか？

352:デフォルトの名無しさん
08/12/03 21:39:55
>>349

どれのことだ

Wikipedia項目ﾘﾝｸ

CPB

* ビルマ共産党
* キャンベル・スープ・カンパニーのNYSEコード。
* 公共放送機構 (Corporation for Public Broadcasting)
* セントラル・パシフィック・バンク

353:デフォルトの名無しさん
08/12/03 21:57:27
BCBだな

354:デフォルトの名無しさん
08/12/03 22:42:57
>>351

Delphi持ってるならGLSceneを使え
ｽﾚﾘﾝｸ(tech板)

の 25 辺りから見るとよいよー

355:351
08/12/04 04:45:25
>>354
やっぱりソースは公開しなくても良いんですね
おかげでスッキリしました、ありがとうございます

356:ななしへたぐらま ◆XcB18Bks.Y
08/12/04 16:30:30
すいません、思いっきり略称間違えました… orz


357:デフォルトの名無しさん
08/12/05 02:03:30
onKeyDown や onKeyPress などを使って、
『キーの同時押し』を検知する方法ってありますか？

たとえばAlt + Tab を検知するなど。

358:デフォルトの名無しさん
08/12/05 02:36:22
Downならif Shift = [ssAlt] thenで

359:デフォルトの名無しさん
08/12/05 18:41:49
GetAsyncKeyStateはだめ？


360:デフォルトの名無しさん
08/12/06 00:02:20
同時押しの検出ならGetKeyStateかShiftパラメータでは？

361:デフォルトの名無しさん
08/12/06 09:00:10
Del7+Win2000
フォームを半透過指定してフォーム上のコンポーネントは非透過ってのは可能？
Transparentみたいな色指定透過っぽい感じ

362:デフォルトの名無しさん
08/12/06 10:45:21
Pascal を C++ っぽくしろって、
日本語は英語と同じ文法にしろっていうような門やん

次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
暇つぶし2ch
4250日前に更新/151 KB
担当:undef