デスクトップにコンポーネントを配置する

ぉっヵゎ 2006-05-07 00:51:08 No: 21387

ボタンを二つ配置して、
片方はエディットをデスクトップに動的に作成。
もう一方はデスクトップのエディットを廃棄したいと思っています。

環境はXP ProSP1+5EnterPrise UP1です。

タバスコ 2006-05-07 01:06:27 No: 21388

http://forum.nifty.com/fdelphi/faq/00117.htm
これを参考にしてできませんか？

ぉっヵゎ 2006-05-07 01:39:56 No: 21389

デスクトップ領域に作成したいのですがわかりませんか？

igy 2006-05-07 02:11:45 No: 21390

フォームのうえに、TEditを置き、
そのフォームを表示させたり、非表示にしたり、
ではだめですか？

TS 2006-05-07 02:56:18 No: 21391

デスクトップとは
http://e-words.jp/w/E38387E382B9E382AFE38388E38383E38397.html
これの事ですか

ぉっヵゎ 2006-05-07 05:12:10 No: 21392

タバスコ様
動的には作成できます。

igy様
フォームに乗せても非表示にすると、
TEditも非表示になってしまいます。

TS様
そこです。判り難い質問ですみません。

igy 2006-05-07 06:13:26 No: 21393

>>フォームのうえに、TEditを置き、
>>そのフォームを表示させたり、非表示にしたり、
>>ではだめですか？

>フォームに乗せても非表示にすると、
>TEditも非表示になってしまいます。

TEditを置くためだけのフォーム（BorderStyle プロパティをbsNoneに）
を用意し、フォームのサイズをTEditと同じくらいの大きさにして、
ボタンの片方で、そのフォームを表示、
もう一方のボタンで、そのフォームを非表示

で、だめですか？

igy 2006-05-07 06:22:27 No: 21394

>>フォームに乗せても非表示にすると、
>>TEditも非表示になってしまいます。

>TEditを置くためだけのフォーム（BorderStyle プロパティをbsNoneに）
>を用意し、フォームのサイズをTEditと同じくらいの大きさにして、
>ボタンの片方で、そのフォームを表示、
>もう一方のボタンで、そのフォームを非表示
>
>で、だめですか？

呼び出し元のフォームを最小化すると、TEditを置いたフォームも非表示に
なってしまいますね。

forever 2006-05-07 07:00:10 No: 21395

https://www.petitmonte.com/bbs/answers?question_id=3853
「デスクトップの表示」でも消えないウィンドウを作るには？

と似てる気がする。

type
winctrl = class (TWinControl);

procedure TForm1.Button1Click(Sender: TObject);
var
    h: integer;
    e: TEdit;
begin
  h:=FindWindow('Progman','Program Manager');
  if h<>0 then
  begin
    MessageBeep(MB_ICONEXCLAMATION);
    //e:=TEdit.CreateParented( h);
    e:=TEdit.Create(Self);
    e.Text:='TEST1 TEST1 TEST1';
    e.ParentWindow:=h;
    e.Left:= 0;
    e.Top := 0;
    e.Width:= 100;
    e.Height:= 40;
    e.Show;
    winctrl(e).SetZOrder(True);
  end;

で、駄目ですか？

これって 2006-05-09 07:59:26 No: 21396

ひょっとして「付箋」みたいなヤツかな？
そうなら、タイトル・バー無しとかのミニフォーム作って、Edit をクライアントにするとかではダメ？