为了开发的便利,需要对DelphiX底层代码进行修改的历史(绘画列表中最大的Z值)
1:现在需要获取FDrawList当中最后一个对象的Z值。因为需要对对象的Z值进行控制,需要获取该值。(实现窗体显示在最前面)
//1:添加私有方法:
function GetMaxDrawListZ:Integer;
//2:添加公开属性:
property MaxDrawListZ:Integer read GetMaxDrawListZ;
//3:添加私有方法的代码:
function TSprite.GetMaxDrawListZ:Integer;
begin
Result:=-1;
if Assigned(FDrawList) then
Result:=TSprite(FDrawList[FDrawList.Count - 1]).Z;
end;
function GetMaxDrawListZ:Integer;
//2:添加公开属性:
property MaxDrawListZ:Integer read GetMaxDrawListZ;
//3:添加私有方法的代码:
function TSprite.GetMaxDrawListZ:Integer;
begin
Result:=-1;
if Assigned(FDrawList) then
Result:=TSprite(FDrawList[FDrawList.Count - 1]).Z;
end;
实际编码中发现,鼠标永远是在最顶上的,因此,该方法不再有用。
分类:
DelphiX修改历史
【推荐】国内首个AI IDE,深度理解中文开发场景,立即下载体验Trae
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 如何编写易于单元测试的代码
· 10年+ .NET Coder 心语,封装的思维:从隐藏、稳定开始理解其本质意义
· .NET Core 中如何实现缓存的预热?
· 从 HTTP 原因短语缺失研究 HTTP/2 和 HTTP/3 的设计差异
· AI与.NET技术实操系列:向量存储与相似性搜索在 .NET 中的实现
· 10年+ .NET Coder 心语 ── 封装的思维:从隐藏、稳定开始理解其本质意义
· 地球OL攻略 —— 某应届生求职总结
· 提示词工程——AI应用必不可少的技术
· Open-Sora 2.0 重磅开源!
· 周边上新:园子的第一款马克杯温暖上架