- 浏览: 49558 次
- 性别:
- 来自: 广州
最新评论
文章列表
从资源文件中载入自定义光标并在你的应用程序中使用它们
Loading custom cursors from a resource file and using them in our application
1.创建光标(图片)并把它们加入到一个资源文件中。你可以使用Delphi自带的Image Editor来完成这项工作。
2.在你的任意unit中的Interface代码段声明关于光标的常量。这并不是必须的,但是这样做可以提高代码的可读性,所以强烈建议完成这一步。
3.这些常量必须是大于0的正整数,因为0和负整数被作为默认的光标已经存在了。
例如:const
...
用下面的方法可以很简单地实现用窗口覆盖住整个屏幕:
procedure TfrmMainForm.FormCreate(Sender: TObject);
begin
{ Position form }
Top := 0 ;
Left := 0 ;
{ Go full screen }
WindowState := wsmaximized;
ClientWidth := Screen.Width ;
ClientHeight := Screen.Height;
Refresh;
end;
如果这是一个典型的窗口,你需要考虑用下面的方法 ...