DELPHI 创建自己的定时器 定时清理内存

最新推荐文章于 2024-10-22 12:41:02 发布
原创 最新推荐文章于 2024-10-22 12:41:02 发布 · 2.8k 阅读 · 2 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#delphi #timer #windows #google #class

本文介绍了如何在DELPHI中创建一个自定义的TTimer类，该类在定时触发时清理内存。通过继承TTimer类并重写OnTimer事件，当当前进程不是顶层窗口所属进程时，利用Windows API进行内存整理。设置为每30秒执行一次。 
   google代码搜索确实是个好地方，就跟优快云一样，资料真不少。下面这个例子就是自定义时间清理内存空间。
unit TrimWorkingSet;

interface

implementation

uses
  SysUtils, Windows, ExtCtrls;

type
  TTrimmer = class(TTimer) //继承自TTimer定时器类
  public
    procedure TimerTick(Sender: TObject);
  end;

procedure TTrimmer.TimerTick(Sender:
最低0.47元/天 解锁文章
cswangbin
关注
动态创建timer控件的例子
12-16
动态创建timer控件的例子,delphi初学者可以参考下
delphi 内存管理，定期释放
Eric的学习日志博客
08-05 1335
<br />创建一个定时器，设置每隔N秒触发一次，也就是每隔多久进行一次内存清除！！<br /><br /><br /><br /><br />//调用<br /> <br />procedure TfmMain.Timer1Timer(Sender: TObject);<br />begin<br />   TClearMemory.Create(False);<br />end;<br /> <br /><br /><br /><br /><br />ClearMemoryThread单元代码如下：<b
DELPHI写的定时器
07-18
定时器,用DELPHI写的定时软件.特点透明，在桌面随意拖动
动态创建timer
weixin_34185364的博客
05-30 653
Privatetimer:Ttimer;procedureMyTimerDo(Sender:Tobject);procedurecreate;timer:=TtIMER.Create;Timer.Enabled:=True;timer.Ontimer:=MyTimerDo;end;procedureMyTimerDo(Sender:Tob…… 转载于:https://www...
delphi 清理程序内存
12-28
使用delphi开发的程序中，可用来清理程序内存，减少资源占用情况。
精选资源
fzTThreadTimer_delphi定时器_delphi_线程定时器_
10-04
标题中的“fzTThreadTimer”是一个专为解决Delphi自带定时控件局限性而设计的线程定时器组件。描述中提到，Delphi内置的定时器控件（如TTimer）是基于消息机制工作的，这意味着它依赖于应用程序的消息循环来触发事件...
delphi 几个定时器方法的比较
09-13
1. **系统定时器**：Delphi中的TTimer组件是基于Windows API的SetTimer函数实现的，它提供了一个简单的接口来创建周期性事件。用户可以通过调整Interval属性来设置定时器触发的时间间隔。然而，系统定时器的精度受制...
delphi 本地连接定时连接与断开
02-07
综上所述，"delphi 本地连接定时连接与断开"项目涉及到Delphi编程、Windows API接口、定时器机制、用户界面设计、网络通信、错误处理、多线程以及配置文件管理等多个IT技术点。通过这些技术，开发者可以构建一个功能...
Delphi实现的定时关机软件源码详解
下面，我们将详细解析Delphi语言创建定时关机软件所涉及的各个方面。 ### 知识点一：Delphi编程语言基础 Delphi是基于Pascal语言的一种快速应用程序开发工具（RAD），由Embarcadero Technologies公司开发。它提供了...
自己编写的Delphi组件定时器Timer,内支持线程,不会像D原生那样卡顿及界面.
03-09
自己编写的Delphi组件定时器Timer,内支持线程,不会像D原生那样卡顿及界面.
利用Delphi建立精确计数器
javazhuanzai的专栏
01-15 563
====================================================== 注：本文源代码点此下载 ====================================================== 利用delphi建立精确计数器 在windows中的很多场合下编程(例如工业控制、游戏)中需要比较精确的记时器,本文讨论的是在delphi下实现
Delphi WinAPI: SetTimer、KillTimer - 创建与移除高性能定时器
feng12301的专栏
11-24 3553
settimer()重新设置吧，killtimer等于释放了一个timer，如果要再用，你就得重新设置一下 ID:=SEtTimer(0, 1, 1000, @回调函数);//回调  KILLTIMER(0, id)//删除   声明: SetTimer( hWnd: HWND; {与定时器相关联的窗口句柄} nIDEvent: UINT; {指定一个非 0 的定时器标识符}
Delphi——Timer定时器使用及简单实现代码
m0_52389829的博客
03-03 2125
Timer定时器是一个非可视化组件，能够定时触发OnTimer事件，完成模拟时钟、系统延时、倒计时等工作。 Timer 的主要属性 (1)Enable 属性：代表该定时器是否运行。当值为True时，打开定时器，否则关闭定时器。默认值为True。 (2)Interval属性：代表定时器触发的间隔。其单位为毫秒。 2.Timer的主要事件 Timer只有一个OnTimer事件。当Timer打开时，每经过Interval属性指定的时间，Timer就会触发OnTimer事件 ，执行其中的程序 一个简单的实现：
Delphi中定时器组件的自定义程序实现与应用
最新发布
weixin_42298778的博客
10-22 1248
本文还有配套的精品资源，点击获取 简介：在IT领域，定时器自定义程序定时执行是自动化任务管理和系统调度的关键。Delphi语言提供的定时器组件能够实现预定时间触发任务。介绍TTimer组件的使用方法、配置文件操作、主程序构建以及可能的多媒体集成，详细说明如何创建一个能够定时执行任务并具备用户交互界面和日志记录功能的应用程序。 1. 定时器组件在Delphi中的使用...
Delphi 线程Timer (TThreadTimer)
weixin_30727835的博客
04-20 1002
delphi 自带的Timer控件，使用方便，但它的 OnTimer 事件是在主线程中引发的。 如果在事件中执行较耗时的代码，会引起主界面假死。故实现一个线程的Timer就有必要了。 TThreadTimer 基于 TSimpleThread 继承而来。 本例源码下载 1 unit uThreadTimer; 2 3 interface 4 5 us...
解决DELPHI的程序占内存的代码
xhh2001的专栏
05-12 2990
unit SCFastMemory; interface uses   SysUtils, Windows; implementation var   InProc: Boolean;   TimerID: Integer; procedure SaveMemory; begin   if Win32Platform = VER_PLATFORM_WIN32
MFC_9.4_建立线程、多线程同时画线的假象、静态建立线程、设置按钮禁用、Ontimer，动态建立线程
weixin_38593332的博客
09-04 517
响应多线程画线的菜单 void CDrawLineView::OnDrawLineThread() { PARAM *m_pParam[THREAD_NUM]={NULL,NULL,NULL}; //传入线种入口函数的参数，初始化为空 for(int i=0;i&amp;amp;amp;amp;amp;lt; THREAD_NUM;i++) { m_pThread[i]=NULL; m_pParam[...
Delphi 释放内存
人体运动、生物特征、高性能移动计算、人性化智能交互
03-13 1272
方法一：如何利用Delphi释放所占的内存有人写了一个清内存的bpl插件，据他讲用了以后Delphi2005只占3、4兆内存，多次编译后占用内存不会递增，其实这个bpl只有一个pas文件，这个文件里主要的就是一个函数，如有兴趣你看看: { 2004.11.30 wr960204 武稀松(王锐) } unit UnitMMSave;interfaceuses Classes, Windo
delphi 内存清理的好方法
123123121
07-14 6296
 procedure ClearMemory;beginif Win32Platform = VER_PLATFORM_WIN32_NT thenbeginSetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF);application.ProcessMessages;end;end;DELPHI清理释放内存小代码
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值