窗体透明?procedure TForm1.CreateParams(var Params:TCreateParams);
Begin
inherited CreateParams(Params);
Params.ExStyle:=WS_EX_TRANSPARENT;
End;procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Brush.Style:=bsClear;
Form1.BorderStyle:=bsNone;
end;
Begin
inherited CreateParams(Params);
Params.ExStyle:=WS_EX_TRANSPARENT;
End;procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Brush.Style:=bsClear;
Form1.BorderStyle:=bsNone;
end;
解决方案 »
- 请教一个D7写的DLL,调用出现Stack OverFlow的问题,谢谢!
- com+服务器如何获取客户端的电脑名称或IP地址?
- 大家来看看这个帖子,BS楼主这种行为!
- 关于一个socket超时的问题,怎样让一个TCP连接永远保持住?
- 求 Delphi XE2 能用的 InfoPower 和 1stClass 控件
- 报表
- 请教报表中QRDBText的显示问题。
- 求助:怎样生成一些账号 新手 急!!!
- r建议:应csdn上论坛资料做成类似大富翁的资料库(如ACCESS)供下载,同意的进来签名!!!!!
- 非DELPHI(打印方面的)高手莫入!请大家帮助!十万火急!
- 请问谁有松下FP0 plc的通信资料,或者代码,在下急需,多谢啦
- 代码编辑器右上角的左右箭头和下拉箭头是干什么的?什么时候能用?
你能發給我一個 簡單的例子嗎..
email: [email protected]
分全給你...
应该是在窗体上放一个timagge~~~~~~~