摘要:Delphi(68) Delphi(68) procedure TForm1.ShowForm2;begin Self.Enabled := False; try with TForm2.Create(nil) do begin try if ShowModal = mrOk then // Ret
        阅读全文
        
            posted @ 2016-07-26 15:51
| 
 | ||
| 随笔分类 - delphi 窗口始终在最上面
摘要:Delphi(68) Delphi(68) procedure TForm1.ShowForm2;begin Self.Enabled := False; try with TForm2.Create(nil) do begin try if ShowModal = mrOk then // Ret
        阅读全文
 
            posted @ 2016-07-26 15:51 
摘要:使窗体Showmodal后可以操作其他窗体 字体大小: 中小 标准 ->行高大小: 标准 中 大 使窗体Showmodal后可以操作其他窗体 字体大小: 中小 标准 ->行高大小: 标准 中 大 01 对话框ShowModal之后不能操作其它窗口,实际上是因为Windows Disable了其它窗口
        阅读全文
 
            posted @ 2016-07-26 15:47 
摘要:unit ufrmSysPubMessage;interfaceuses Windows, Forms, Messages, Classes, ExtCtrls, Controls, StdCtrls;type TfrmSysPubMessage = class(TForm) Image1: TIm
        阅读全文
 
            posted @ 2016-07-24 17:50 
 | ||