最小化について。

解決

メルル 2006-04-24 07:57:17 No: 21156 IP: 192.*.*.*

最小化について。

下記状態です。最小化のまま起動するアブリです。
ボタンを押しても普通の最小化にしたいのですが・・。
Hide も試してみましたが、Ｂタイプではまったく変なことになるし・・で
それでは・・とＣタイプにすると開かなくなるし・・で困ってます、

Ａタイプで、画面左下にMDI 子窓の最小化風にならない方法が知りたいのです。
Windows Me
Delphi 4

// Ａタイプ
procedure TForm1.FormCreate(Sender: TObject);
begin
  WindowState := wsMinimized; // こちらは普通の最小化。問題なし。
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  WindowState := wsMinimized; // これだと、画面左下にMDI 子窓の最小化風になる。
end;

// Ｂタイプ

procedure TForm1.FormCreate(Sender: TObject);
begin
  Hide;  // 最小化のまま起動できない。標準の起動画面。
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  Hide;  // プログラム・バー？から消えてしまう。
end;

// Ｃタイプ
procedure TForm1.FormCreate(Sender: TObject);
begin
  WindowState := wsMinimized; // これは問題なし。
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  Hide;  // プログラム・バー？から消えないけれども
         // プログラム・バー？をクリックしても
         // 標準サイズに戻せず、最小化したまま。
end;

編集削除

deldel 2006-04-24 08:57:47 No: 21157 IP: 192.*.*.*

Application.Minimize; では？

編集削除

メルル 2006-04-24 11:53:25 No: 21158 IP: 192.*.*.*

ボタン時に、
Application.Minimize; では？
・・・をするとできました。こんなのがあったんですね。

それにしても、上の各タイプは挙動が不自然で理解に苦しみます。
Delpji は、隠し親ウィンドウが存在するらしいのでややこしいです。

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

編集削除

メルル 2006-04-24 12:29:32 No: 21159 IP: 192.*.*.*

プログラム・バー・・
ツール・バーですね。やっと思い出せました。

編集削除

メルル 2006-04-24 13:56:23 No: 21160 IP: 192.*.*.*

失礼失礼、最近度忘れが・・・。
タスバーですね。
ツール・バーだと、アプリ側のをイメージさせるので、書いたあと、
変だなぁ？と・・。

編集削除