-
等级
本版专家分：0结帖率 100% -
如何使窗口、控件等的鼠标指针变为我自己喜欢的喜欢的指针,而且不是原默认的那些指标，如果扩展名为ico的话，可否用上？一定是要cur吗？展开阅读全文
-
等级
本版专家分：7407 -
Screen.Cursor := crHandPoint
-
等级
本版专家分：7407
-
你可以修改project.res文件来加入你自己的图标
-
等级
本版专家分：181759勋章
-
- 进士 2004年 总版技术专家分年内排行榜第六
-
- 银牌 2004年4月 总版技术专家分月排行榜第二
-
-
红花
2006年1月 Delphi大版内专家分月排行榜第一
2005年12月 Delphi大版内专家分月排行榜第一
2005年11月 Delphi大版内专家分月排行榜第一
2005年10月 Delphi大版内专家分月排行榜第一
2005年6月 Delphi大版内专家分月排行榜第一
2004年10月 Delphi大版内专家分月排行榜第一
2004年9月 Delphi大版内专家分月排行榜第一
2004年8月 Delphi大版内专家分月排行榜第一
2004年7月 Delphi大版内专家分月排行榜第一
2004年6月 Delphi大版内专家分月排行榜第一
2004年5月 Delphi大版内专家分月排行榜第一
2004年4月 Delphi大版内专家分月排行榜第一
2004年3月 Delphi大版内专家分月排行榜第一
2003年12月 Delphi大版内专家分月排行榜第一
2003年11月 Delphi大版内专家分月排行榜第一
-
-
黄花
2006年4月 Delphi大版内专家分月排行榜第二
2005年5月 Delphi大版内专家分月排行榜第二
2005年4月 Delphi大版内专家分月排行榜第二
2005年3月 Delphi大版内专家分月排行榜第二
2005年2月 Delphi大版内专家分月排行榜第二
2004年12月 Delphi大版内专家分月排行榜第二
2004年2月 Delphi大版内专家分月排行榜第二
-
-
1.}
procedure TForm1.FormCreate(Sender: TObject);
begin
Screen.Cursors[crMyCursor] := LoadCursorFromFile('c:\mystuff\mycursor.ani');
Cursor := crMyCursor;
end;
{*****************************************************************}
{2.}
{ by Blodgett}
Const
CURSOR_HOURGLASS = 1;
{...}
procedure TForm1.LoadCursors;
var
h : THandle;
begin
if FileExists('..\Images\YourAnimagedCursor.ani') then
begin
h := LoadImage(0,
'..\Images\YourAnimatedCursor.ani',
IMAGE_CURSOR,
0,
0,
LR_DEFAULTSIZE or
LR_LOADFROMFILE);
if h <> 0 then
Screen.Cursors[1] := h;
end;
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
var
FCurrentCursor: Integer;
begin
//1st - Load Cursors Information
LoadCursors;
//2nd - Set FCurrentCursor variable
// to current screen cursor.
FCurrentCursor := Screen.Cursor;
//3rd - Set Screen.Cursor to your CONST Value.
// this is your animated cursor.
Screen.Cursor := CURSOR_HOURGLASS;
//4th - Do something ...
sleep(2000);
//5th - Set Screen.Cursor to original cursor.
Screen.Cursor := FCurrentCursor;
end;
-
等级
本版专家分：3207勋章
-
- 签到新秀 累计签到获取，不积跬步，无以至千里，继续坚持！
-
-
使用cursor属性！
-
等级
本版专家分：0
-
以上的方法都不行啊,各位高手.
-
等级
本版专家分：148 -
ico好像是不可以的，你可以找一个软件，把ico做成cur，ani什么的
- 实现控件的移动，改变大小（DELPHI实现）
实现控件的移动，改变大小（DELPHI实现）主要使用Perform方法 function Perform(Msg: Cardinal; WParam, LParam: Longint): Longint; 只要能够使用类似于win32API的函数SendMessage()，本方法同样可在其他环境里...
- 在Delphi中实现任意形状的窗体
Form的TEXT：object Form1: TForm1 Left = 192 Top = 107 BorderStyle = bsNone Caption = Form1 ClientHeight = 348 ClientWidth = 536 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color =
- c++ builder\delphi中如何改变操作数据库时的鼠标指针形状
c++ builder\delphi中在操作数据库时，默认鼠标指针为一沙漏状，如果频繁操作数据库，会很影响用户体验，可以使用TDataSet的SQLCursor属性置为false，就OK了 TQuery,TTable都有这个属性
- Delphi中鼠标的形状
procedure TForm2.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin Screen.Cursor := -2; end; const crDefault = TCursor(0); crNone = TCursor(-1); cr
- 常用的分析管理工具方法【整理】
常用的分析管理工具方法常用的分析管理工具方法 二八原则 SWOT分析法 鱼骨图分析法 5M因素分析法 5M1E分析法 头脑风暴法 名义群体法 德尔菲法 电子会议分析法 几种决策方法比较 PDCA循环 ...OGSM计划法
- 一套较完整的技术框架
本文将基于目前现有的软件开发架构（以下简称‘架构’）（Packer for Delphi），同时如何合理地引进新技术等问题，进行系统地分析和研究，以指导新架构的研发。 1.2 研发依据 1.2.1 公司发展 1.2.2
- 机器视觉表面缺陷检测综述
转自：http://www.cjig.cn/html/jig/2017/12/20171202.htm#b22 机器视觉表面缺陷检测综述 《中国图像图形学报》 Tang B, Kong J Y, Wu S Q . Review of surface defect detection based on ... vision[J]....
- 激光雷达应用领域
这使得激光雷达能精确测量目标位置（距离和角度）、运动状态（速度、振动和姿态）和形状，探测、识别、分辨和跟踪目标。自1961年科学家提出激光雷达的设想，历经 40余年，激光雷达技术从最简单的激光测距技术开始，...
- 项目风险管理技术与方法
风险管理是对风险的辨识，估计和评价所做出全面的，综合的分析。并且，风险管理与决策密切相关，风险分析正是为了更好的决策。此外，对风险的对策也包括决策内容。...由于图的形状象树枝一样越分越多，所以称为
- 十六种CAD.CAE.CAM软件介绍
一、Unigraphics 软件介绍 UG是美国UGS(Unigraphics Solutions)公司的主导产品，是集CAD/CAE/CAM于一体的三维参数化软件，是面向制造行业的CAID/CAD/CAE/CAM高端软件,是当今最先进,最流行的工业设计软件之一....
- GIS名词解释大全
地理信息系统专业考研 GIS专业考研 名词解释大全 地理信息系统专业考研 GIS专业考研 名词解释大全(自己考研时候搜集的。。晒出来) 1. 地理信息系统（南大95、南大96、南大03、中科院03、中科院04、华东师00、...
- 北京图王软件开发有限公司产品介绍-Visual Graph专业图形引擎
北京图王软件开发有限公司产品介绍 ――Visual Graph专业图形引擎一、产品概述：Visual Graph是一套强大的交互图形开发平台，她能非常方便地建造基于图形的界面、制作各种图形元件、实现图形管理、图形建模、制作...
- 机器学习干货贴
1.Kaggle Ensembling Guide 摘要：Creating ensembles from submission files Voting ensembles. Averaging Ra... 2.[导读]Machine Learning Theory 摘要：机器学习相关理论，Machine Learning Theory - Part 1: ...
- 程序员的思维修炼：开发认知潜能的九堂课
如喜欢本书，请购买正版。
- TeeChart For VCL/FMX V2017使用教程：第一章-准备开始
下一页第一章 准备开始-构建图表和填充数据序列1.1 简介通过代码或Dataset（数据集）访问来构建Charts（图表）和填充Data Series（数据序列） 基本Charts（图表）可以使用Chart Editor（图表编辑器）进行构建和实现...
- 一些界面设计规范
一：遵循一致的准则，确立标准并遵循 无论是控件使用，提示信息措辞，还是颜色、窗口布局风格，遵循统一的标准，做到真正的一致。 这样得到的好处：1：使用户使用起来能够建立起精确的心里模型，使用熟练了一个界面...
- 编程新手导论
第二部分 导论，这一部分主要是关于编程的导论， (要懂得一点思想具备一点常识)《设计，编码，，与软工》（编程与思想）这一章解释了三种思想，原语，抽象，组合，，和软件开发的二个重要过程，，软件工程的相关...
- php 程序设计代码教程
php 程序设计代码 讲到 PHP 的全名就蛮有趣的，它是一个巢状的缩写名称，"PHP: Hypertext Preprocessor"，打开缩写还是缩写。PHP 是一种 HTML 内嵌式的语言 (类似 IIS 上的 ASP)。...它可以比 CGI 或者 Perl 更快
- 程序员生存定律
http://blog.csdn.net/leezy_2000/article/details/29407747#comments 程序员生存定律这书是陆续发的，所以做个目录让想从头读的方便些： 前言：解码程序人生
- 网站项目管理规范指南
1. 概述 关于本指南的目的，大纲描述。1.1 什么是网站项目管理规范指南 《网站项目管理规范指南》读做“网站-项目管理-规范-指南”，顾名思义就是针对网站项目管理，提供规范管理的建议和指导。...
- CISCO技术(1.7万)
0 base|以零为基底\r\n 0 disturbed zero output signal|干扰0输出信号\r\n 0parallel communication cable|平行通讯传输缆线\r\n 1 binary operation|二进制运算\r\n 1 di
- android安卓源码海量项目合集打包-1
下载地址 最后更新共计113个分类5177套源码29.2 GB。 卷 新加卷 的文件夹 PATH 列表 卷序列号为 00000200 5E7A:7F30 ...│ │ Android 实现 标签 拖动 改变位置.rar │ │ android 流式布局和热门标签.zip │ │ ...
- 编程新手导论（转载）
第二部分 导论，这一部分主要是关于编程的导论， (要懂得一点思想具备一点常识)《设计，编码，，与软工》（编程与思想）这一章解释了三种思想，原语，抽象，组合，，和软件开发的二个重要过程，，软件工程的相关...
- 一些界面标准规范
一些界面标准规范 一：遵循一致的准则，确立标准并遵循 无论是控件使用，提示信息措辞，还是颜色、窗口布局风格，遵循统一的标准，做到真正的一致。 这样得到的好处： 1：使用户使用起来能够建立起精确的心里模型，...
- .net组件及控件
.net组件和控件 DevExpress DotNetBar V4.7DevExpress DotNetBar V4.7 注册机DotNetBar是一套Visual Studio.Ne开发环境下的界面扩展框架组件，提供类似Office 2003和OfficeXP的菜单和工具条、OfficeX
- 面向对象技术在开放式数控中的应用
数控（NC，Numerical Control）是一种用数字化的信息（数字、字母和符号）对某一工作过程（如加工、测量、装配等）进行可编程的自动控制技术。数控系统（Numerical Control System）是实现数控技术相关功能的软硬件...
- 项目管理师基础背诵
还有一个月开始项目管理师考试，关于项目管理师基础，我做了些总结，以便背诵，可能知识不是很全，建议大家购买高级项目经理任铄的正版教程。 第一章 信息化和信息系统 1.1 信息系统与信息化 ...
- 阅读笔记《量产必备的毫米波雷达》
在上一次分享中，我对无人驾驶汽车上的激光雷达的原理、数据及功能做了介绍。 激光雷达的普及所遇到的最大挑战是：成本过高。单独一个雷达的价格可能就超过了普通小汽车的价格，因此现阶段还没有大规模量产的可能...
- Delphi 画布对象及其简单应用
TShape组件的属性,事件和方法 TImage组件的属性,事件和方法 Paintbox组件的属性,事件和方法 使用鼠标事件的绘图第 9章 图像图形应用编程 ...在 Delphi 7.0中，专门定义了一组对象和部件用以绘制图形，完
- 浅析小流域综合治理评价指标体系和评价方法
1 引 言水是生命之源，土为生存之本，水土是人类生存和发展的基本条件，是不可替代的基础资源。在中国许多山地丘陵地区，由于自然因素和人口剧增、土地利用不合理和管理不当引起的人为因素的影响，人们的居住地和...