delphi - フォームからアイコンを無効/非表示にする方法は?

Question

閉じるボタンはあるがアイコンがない 2 番目のフォームを作成するにはどうすればよいですか。

score 6 · Accepted Answer

6

フォームのBorderStyleをbsDialogに設定します。

于 2009-08-12T12:02:55.900 に答える

score 2 · Accepted Answer

フォームの BorderStyle を bsDialog に設定し、フォームの作成時にこのコードを使用します。

SetWindowLong(Handle,gwl_style,GetWindowLong(handle,gwl_style) or WS_THICKFRAME);
ClientHeight := Height;
Refresh;

醜いハックだと思いますが、大丈夫だと思うかもしれません。

score 0 · Accepted Answer

これはVCLによって内部的に行われるため、BorderStyleプロパティを試す以外の方法でそれを行うことはできません。

3 に答える 3