override CreateParams events in delphi

简介:
  使delphi新建的窗体,像msn聊天窗口一样,在任务管理器里显示,并且它的最大化最小化显示不受主窗体的影响。

dot.gifdot.gif
    procedure CreateParams(var Params: TCreateParams); 
override ;
dot.gifdot.gif
procedure TFormDebug.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.ExStyle   :
=  Params.ExStyle or WS_EX_APPWINDOW;
  Params.WndParent :
=  GetDesktopWindow;
end;


    本文转自 OldHawk  博客园博客,原文链接:http://www.cnblogs.com/taobataoma/archive/2007/04/30/733323.html ,如需转载请自行联系原作者
相关文章
|
2月前
|
缓存 Dart 开发工具
解决Flutter报错The method ‘File.create‘ has fewer named arguments than those of overridden method
解决Flutter报错The method ‘File.create‘ has fewer named arguments than those of overridden method
45 3
|
测试技术 PHP
PHP:laravel自定义Model报错:$table must not be defined/$table must be string
PHP:laravel自定义Model报错:$table must not be defined/$table must be string
137 0
|
Java 数据安全/隐私保护
Failed to register native method nativeSetStatusCallback in base.apk
Failed to register native method nativeSetStatusCallback in base.apk
222 0
|
Linux
编译OpenJDK8:error: control reaches end of non-void function [-Werror=return-type]
编译OpenJDK8:error: control reaches end of non-void function [-Werror=return-type]
183 0
|
网络架构
CodeIgniter报错: You must use the "set" method to update an entry
I'm using codeigniter/datamapper to develop an inviocing application and I'm getting an error that i don't understand.
2135 0
How to create CDS view to return Service order item detail data
You are asked to create a CDS view which must return the following information of Service order line item.
How to create CDS view to return Service order item detail data
transaction type popup window when create service order
Created by Wang, Jerry, last modified on Dec 13, 2014
transaction type popup window when create service order