- 1 名前：デフォルトの名無しさん [2011/12/28(水) 08:23:15.61 ]
- Delphi(デルファイ)について、他のスレッドでは書き込めない超低レベル、
もしくは質問者自身何が何だか分からない質問を
勇気を持って書き込むスレッドです。
Delphi使いが優しくコメントを返しますが
お礼はDelphiの布教と初心者の救済をお願いします。
<前スレ>
くだすれDelphi(超初心者用)その53
toro.2ch.net/test/read.cgi/tech/1309101455/
<過去スレ>
DelWiki避難所（Delphi 関連の過去スレッド）
delwiki.info/?%E3%83%AA%E3%83%B3%E3%82%AF%2F%E3%82%B3%E3%83%9F%E3%83%A5%E3%83%8B%E3%83%86%E3%82%A3%2FDelphi%20%E9%96%A2%E9%80%A3%E3%81%AE%E9%81%8E%E5%8E%BB%E3%82%B9%E3%83%AC%E3%83%83%E3%83%89
- 830 名前：826 mailto:sage [2012/07/19(木) 00:46:40.40 ]
- 派生元での値って書いてあるんですが…
>>828
Loadedだと、inherited実行前とかで見てみましたが、新しい値しか取れませんでした。
- 831 名前：デフォルトの名無しさん mailto:sage [2012/07/19(木) 02:46:02.21 ]
- 同名のプロパティやらを追加したってことなら T親クラス(Self).Hoge で取れなかったっけ
>>827はバカだが>>826も分かりにくい
- 832 名前：デフォルトの名無しさん mailto:sage [2012/07/19(木) 07:40:57.12 ]
- >>826,828,831
アホ、>>827の言うようにOOを一から勉強しろ。
- 833 名前：826 mailto:sage [2012/07/19(木) 09:02:24.55 ]
- >>831
828氏の指摘の通りです。
オブジェクトインスペクタでの「敬称元の値に戻す」のように、元の値を取得したいんです。
- 834 名前：826 mailto:sage [2012/07/19(木) 09:31:37.40 ]
- 自己解決しました。
- 835 名前：826 mailto:sage [2012/07/19(木) 12:34:52.53 ]
- 自己解決したんだ。よかったね。
アホは>>832だったというわけだ。
- 836 名前：デフォルトの名無しさん mailto:sage [2012/07/19(木) 12:41:02.74 ]
- 継承した値とか言ってるけど、TForm1に指定してあったClientHeightってことはオブジェクトインスペクタ等で指定したもの（dfmの値）だろ？
あれはOO的に言えばクラスの初期値じゃなくてインスタンスに代入される値だから、継承はそこまで関係ないと思うんだが
OOの仕組みが分かってないというより、VCLの仕組みが分かってないと言った方が正しい
- 837 名前：デフォルトの名無しさん mailto:sage [2012/07/19(木) 13:11:39.28 ]
- >>836
じゃあ親クラスのClientHeightってどうやって知るのかコード書いてよ。
- 838 名前：828 mailto:sage [2012/07/19(木) 13:37:09.34 ]
- ちょっろっと追ってみたけど、一般論的にはうまくやる方法はない。
ユニットローカルな関数とかその内部関数とかで処理されているので。
あとはそのプロパティのSetメソッドをoverrideして書き込みを捕捉する、という手は考えられるかなぁ。
- 839 名前：デフォルトの名無しさん mailto:sage [2012/07/19(木) 17:56:01.41 ]
- >>837
リソースからTForm1のClientHeightにセットされている値を読み出せば良い
- 840 名前：826 mailto:sage [2012/07/19(木) 17:59:28.03 ]
- まだできてない人いるんですね（笑）
- 841 名前：デフォルトの名無しさん mailto:sage [2012/07/19(木) 19:19:56.02 ]
- __､、 , ___
,≠=ミYﾑｪ､｀
,r'ｧ'x='く彡'ハﾐ}
/ '//,ｲl!lﾊ.ヽノﾊﾍ}
i|ｲiｋ!川l|!|| !|〃,!`l! 夏だねぇ・・・・
}i!l'ｔ､ _ヽ!l!|'ｨi |
|ｌiヽ '._ ｀’川<ヽj
. |!|! ｰ 1ｲ!ﾘ, ﾆヽ
/:'/ｲ:::::.:. :.:ヽ
j:l:.i:.:ｌ:j:::::.:. :.:}ﾊ,rｧ-､
. ＿ ,∠ﾝ‐､:.〉:::::.:, :.:.i:_;ﾏﾊ/
, ‐ ´ ,、｀ア´__{:.:. :.:.:＼::::{: 〈:.l／〉心､
ｒ,iﾋ.ｨｆ´ Y .ｨ´ ￣T:ｰ-: ﾆヽ_:.:!./. V 〉}
l! ｀ 〈,ﾘ'! 丶|:､:.. : :.｀ﾆ_:.:!-イl下ヽ
`､ｯ|,㍗ｨ /l!: 丶. |:.:ヽ:..:_:ィ:／.:.:ﾉ:::Yヽ 〉
”㍉'淼㌻，i:.l! : :i::.::＼ |:.:;:ｉ:.:｀￣::.::／:::::.:.i￣
,*'j㌫ゞ｀ |:lｌ: : :l::.::::ｉ:.:|::.i:.|:ｌ:.:.:.:,∠_:::::.:.:ノ
. |:ll: : :.l:;r' ￢__,rL: ィ ヽヽ￣
ヽ-- ' _〉 ; ヽ}
,rf,‐,-ｭ-ｲ｣
ゞ=＝ "￣
- 842 名前：デフォルトの名無しさん mailto:sage [2012/07/19(木) 19:28:15.43 ]
- >>834,835
アホすぎる、自作自演がばれているｗ
- 843 名前：デフォルトの名無しさん mailto:sage [2012/07/29(日) 12:48:28.53 ]
- HTML+JavaScriptでよく半透明のDIVを画面全体に広げて、
その上に別の要素を置くことでモーダルダイアログ的な操作を実現していますが、
Delphiで似たようなこと（他のコントロールを半透明のコントロールで覆う）はできますか？
- 844 名前：デフォルトの名無しさん [2012/07/29(日) 13:13:21.38 ]
- できません。
- 845 名前：デフォルトの名無しさん mailto:sage [2012/07/29(日) 13:29:21.10 ]
- alphaを128とかにした真っ黒フォームを表示して、さらにその上にフォーム
- 846 名前：デフォルトの名無しさん mailto:sage [2012/07/29(日) 17:18:45.35 ]
- そのモーダルダイアログ風のインターフェース嫌い
- 847 名前：デフォルトの名無しさん mailto:sage [2012/07/29(日) 23:31:45.57 ]
- 質問に回答ではなく好き嫌いで返す頭の湧いた人がいると聞いて
- 848 名前：デフォルトの名無しさん mailto:sage [2012/07/30(月) 08:11:18.60 ]
- 845で十分だろw
- 849 名前：デフォルトの名無しさん mailto:sage [2012/07/31(火) 11:32:25.65 ]
- 誰も十分じゃないとは言ってないけど
- 850 名前：デフォルトの名無しさん mailto:sage [2012/07/31(火) 14:32:55.99 ]
- Delphi XE starterで勉強し始めたものですが
ちょっと教えてください。
訳あってプロジェクトを保存したフォルダを
リネームしたいんですが、単にリネームする
だけじゃダメですよね。
プロジェクトの一部の設定ファイルに絶対パスが
書き込まれてるみたいですが、リネームした後、
どうすれば、新しいフォルダでDelphiの開発を継続できますか？
- 851 名前：デフォルトの名無しさん [2012/07/31(火) 18:16:46.71 ]
- >>850
できません。
- 852 名前：デフォルトの名無しさん mailto:sage [2012/07/31(火) 19:02:24.61 ]
- >>850
*.localと*.identcacheを消せばそれ以外は問題ないと思うが。モデリングとかは別だろうけど。
- 853 名前：デフォルトの名無しさん mailto:sage [2012/07/31(火) 20:38:45.36 ]
- >>852
ありがとうございます。
試してみます。
サンプルなんかにプロジェクト単位のがあるから
可能だと思っていたんですが、何を消していいのか
分からなくて．．．
- 854 名前：デフォルトの名無しさん mailto:sage [2012/08/01(水) 13:33:20.05 ]
- 主に設定ファイル用の、テキストエディタでも手書きしやすい
listとhashの複合データ構造のフォーマットで何か良さ気なのってないですか。
今のところJSON,YAML,luaのテーブルコンストラクタあたりを候補に考えているんですが。
- 855 名前：デフォルトの名無しさん mailto:sage [2012/08/01(水) 13:43:47.12 ]
- じゃあその中から用途にあったものを選べばいいんじゃね？
- 856 名前：デフォルトの名無しさん mailto:sage [2012/08/01(水) 16:14:25.32 ]
- YAML
- 857 名前：デフォルトの名無しさん mailto:sage [2012/08/01(水) 20:26:45.25 ]
- YMCA
- 858 名前：デフォルトの名無しさん [2012/08/01(水) 20:31:40.06 ]
- YAMEL
- 859 名前：デフォルトの名無しさん [2012/08/01(水) 20:33:39.34 ]
- ,.へ
___ ﾑ i
「 ﾋ_i〉 ゝ 〈
ﾄ ノ iニ(()
i { ＿＿＿_ | ヽ
i i ／__, , ‐-＼ i }
| i ／（●) ( ● )＼ {､ λ
ト－┤. ／ （__人__） ＼ ,ノ ￣ ,!
i ゝ､_ | ´￣` | ,. '´ﾊ ,!
. ヽ、 ｀` ､,__＼ ／" ＼ ヽ／
＼ノ ﾉ ﾊ￣r/:::r―--―/::７ ﾉ ／
ヽ. ヽ::〈； . '::. :' |::/ / ,. "
`ｰ ､ ＼ヽ::. ;::：|/ ｒ'"
／￣二二二二二二二二二二二二二二二二ヽ
| 答 | YAMEL │|
＼＿二二二二二二二二二二二二二二二二ノ
- 860 名前：デフォルトの名無しさん [2012/08/01(水) 20:34:18.39 ]
- >>210
,r'＾''=ｧ-
, -､ , -''´_,,r ''"
＿＿＿＿＿＿＿.. ､､-ｧr| i´_ ,r'_´＿＿ _ _
￣¨``…=''|-─ﾋ!--－… '' "゛´
il｢~lii ｒ亠､ |
''rへ,、 |･._ |
_＿.. ､､---‐─…! ├^ー‐_: ===＝＝━… , -| `´ |
￣ ￣￣ ￣二ﾆ!￣ |｀¨￣ _,. -１ |¨¨ｉ | _
| ｡ ⌒L、 ＿ , ､-_''´‐''" _,ゝ._| /7 / ｀l
| rz─=,ﾆ=-─==＝z二￣ _＜ _,. - ''" _｣ ＝ ｢´ / .|
. | （ '￣// ￣｀l¨`i ｀`T'F￣ ￣丶. -＜´ l凹 | / |
｜ ／´￣rｭ`'ｰ┘ ° L0!＿ r‐､ ｀ ''┴==-┴－-､＿_/ |
…＝=ｉ=（＿ o ｡ ° ﾛ ￣ ‐┴-⊥., -‐- ､ ＿≦'､_ |
|┘ﾞｺド"－-､- - ＿ ／F､-､ ）イ￣ ￣´
￣ (Ｏ ￣￣"｀`ｰ- 二 ＿ ￣ __王ﾆ-‐ ´￣´
r !!､￣ ¨¨￣(.○ﾞ
ﾞ‐'-'
//Λ＿Λ | |
| |（ ´Д｀）// ＜うるせぇ、オスプレイぶつけんぞ
＼ |
- 861 名前：デフォルトの名無しさん mailto:age [2012/08/03(金) 18:03:32.37 ]
- Ｄ６です。
動画合成用の素材動画データを作りたく
数値データから文字を avi ファイル（1 ～10 fps）に出力するプログラムを組みたいのです
どういう手順がベストでしょうか？
作業目的の全体像は
（１）テキストの計測文字データを時間軸で動画にして
～.txt（例）
09:59:58 計測値1
09:59:59 計測値2
10:00:00 計測値3
10:00:01 計測値4
↓出力
～.avi
┌────────┐
│09:59:59 計測値2
└────────┘
（２）同時間実写ビデオ映像 と 時間＋数値などの（１）を合成する。← これはフリーの動画合成を探します。
- 862 名前：861 mailto:age [2012/08/03(金) 18:04:30.28 ]
- procedure TForm1.～ (.txt は読み込んであるとして)
Var Bmp : TBitmap;
begin
BMP :=TBitmap.Create;
｛ Bitmap の範囲を決めて文字情報を描画
｛ avi データに Bitmap バイナリを書き足す
｛ 繰り返し
BMP.Free;
end;
このような流れですか？
- 863 名前：デフォルトの名無しさん [2012/08/03(金) 18:36:41.16 ]
- えくりぷす
gamers-park.com/node/147
- 864 名前：デフォルトの名無しさん mailto:sage [2012/08/03(金) 21:49:33.04 ]
- >>861-862
聞く必要あるんですか、それ？
- 865 名前：デフォルトの名無しさん mailto:sage [2012/08/03(金) 22:02:21.50 ]
- >>861
こういうのでやった方がよくないか？
ttp://www.avisynth.info/?%A5%B5%A5%F3%A5%D7%A5%EB%A5%B9%A5%AF%A5%EA%A5%D7%A5%C8%2F%A5%C6%A5%ED%A5%C3%A5%D7%A4%CE%C1%DE%C6%FE
- 866 名前：861 mailto:age [2012/08/04(土) 17:48:22.23 ]
- >>865
テキスト加工出力の方が楽なので、ソレを調べてみます。
ありがとう
他のツールや方法があればご指摘ください。
- 867 名前：デフォルトの名無しさん mailto:sage [2012/08/19(日) 21:01:01.31 ]
- ほ
- 868 名前：デフォルトの名無しさん mailto:sage [2012/08/22(水) 03:44:59.63 ]
- オートパイロット・自動操作ツールを作っています
対象ウィンドウにWM_LBUTTONDOWN/UPを送ることでクリックの再現には成功したのですが
その際に、そのウィンドウがアクティブになってしまい、フォーカスが奪われます。
フォーカスさせないでクリックさせることは可能ですか？
フォアグラウンドにしない方法というのはググったら見つかって
Get/SetForegroundWindowで直前のウィンドウを呼び戻したり
hPMHandle := FindWindow(null, PChar('Program Manager')); SetParent(hTargetHandle,hPMHandle);
というようにProgram Managerの養子にするという方法で実現できました。
が、フォーカスは相変わらず奪われます。特に文字入力中にはにゅうりょくがちゅ
うだんされこのようになります。
- 869 名前：868 mailto:sage [2012/08/22(水) 03:57:03.46 ]
- すみません。自己解決したかもしれません。（たまたま今うまくいっているだけかも）
>>868の非フォアグラウンド化とあわせて
Get/SetWindowLongで拡張スタイルのWS_EX_NOACTIVATEを追加指定してやるとうまく?いきます。
それと
fore := GetForegroundWindow();
SendMessage(hoge);
SetForegroundWindow(fore);
SetActiveWindow(fore); <- New!
するといいかも。とりあえず思いつく限りいろいろやったらうまく動いたっぽいです。
□←明日になると(なぜか)動かなくなるスイッチ
どれがキモ、無駄か判明してないけど、もうねるぽ…
- 870 名前：デフォルトの名無しさん mailto:sage [2012/08/22(水) 05:16:44.76 ]
- ここは ぼくの にっきちょう です
- 871 名前：デフォルトの名無しさん mailto:sage [2012/08/22(水) 07:44:50.86 ]
- キモ、い。 >870
- 872 名前：デフォルトの名無しさん mailto:sage [2012/08/22(水) 10:06:14.40 ]
- ここ は ぼく の にっきちょう です。
- 873 名前：デフォルトの名無しさん [2012/08/24(金) 22:07:45.05 ]
- D4でのフォームの継承について教えてください。
あるフォーム（このフォーム自体も多重継承しています）を継承して
新しくフォームを作ろうとしているのですが、
この継承元フォームのコンポーネントを継承先フォーム設計時に
表示するにはどうすれば良いのでしょう。
実行時はコンポが表示されますが、設計時には表示されないので
レイアウトが決めにくく悩んでいます。
<やってみたこと>
継承元のdfmがあるので、それを流用すれば何とかなるのではと
思ってdfmの先頭行を
inherited oldForm:ToldForm → inherited newForm:TnewForm
のように書き換えて新規フォームのdfmと入れ替えてみたのですが
フォーム読み込み中のエラー（中略）読み込み違反がおきました
とメッセージが出て上手くいきませんでした。
- 874 名前：デフォルトの名無しさん [2012/08/24(金) 22:10:31.88 ]
- >>873
_i^i__i^i_ i^i ._i^i_ __, -―- ､___
|＊||＊| ∩＿＿＿∩ i^i _i^i_ | | |@ll|(_/,,,, ,,,, ヽ_) 山で出会った時は
|≡||≡|| ノ ヽ （［］）|;□;|.(≡)|＿| |● ● | とりあえず「こんにちわ」が基本だよな
. 二二/ ● |二二（ （二二二二 彡(_●_ ) ミ
| ミ ) ） ／ ` ''∪'' ／ ヽ
彡､ ＿ノ Gﾉ'ﾌ＝ ___ / /i ` ー '" iヽ |
/ ヽ / / | ! / / | | | .l.
..──|ヽ ヽ/─=＝i─Y-(＿ﾉ──i二i───(⌒)
＿＿_ヽ /ヽノ └-┘ ┴ ..└┘ .￣
| ＿＿＿ i￣ そうだよな。 いきなり銃向けられるって、どこのスラム街だよって話だよな
- 875 名前：デフォルトの名無しさん mailto:sage [2012/08/24(金) 23:58:31.70 ]
- >>873
D4より新しいバージョンを使って下さい
- 876 名前：873 [2012/08/25(土) 07:36:12.38 ]
- >>875
ありがとうございます。
個人的にももっと新しいバージョンを使いたいのですが
業務関係でD4しか使用出来ない状況です。
D4では無理なのでしょうか。
- 877 名前：デフォルトの名無しさん mailto:sage [2012/08/25(土) 09:52:14.97 ]
- >>873
１．継承元フォーム上で右クリックして「リポジトリに追加」を選択
２．「リポジトリに追加」ダイアログで「タイトル」に「Hoge」と入力して「OK」クリック
３．メニュー「ツール」「リポジトリ」を選択
４．「オブジェクトリポジトリ」ダイアログで「ページ」リストから「オブジェクトリポジトリ」を選択
５．「オブジェクト」リストから「Hoge」を「ページ」リスト内の「フォーム」へドラッグ
６．「ページ」リストから「フォーム」を選択し「Hoge」が追加されているのを確認して「OK」クリック
--- ここまでが準備 ---
１．適当なプロジェクトでメニュー「ファイル」「新規作成」を選択
２．「新規作成」ダイアログで「フォーム」タブを開く
３．「Hoge」を選択し「継承」を選択したら「OK」をクリック
- 878 名前：873 [2012/08/25(土) 16:18:44.69 ]
- >>877
週明けに記載の通り実行してみます。
詳細な手順まで書いていただいて
本当にありがとうございます。
- 879 名前：874 mailto:sage [2012/08/25(土) 22:14:43.48 ]
- いえいえ、どういたしまして
|
 |
