UniLabel组件:function OnClick(sender, e){ MainForm.UniLabel1.setText('Click!');}function Onmousemove(sender, x, y){ MainForm.UniLabel1.setPosition(x, ... Read More
posted @ 2014-07-02 21:42 findumars Views(1112) Comments(0) Diggs(0)
Delphi中SendMessage使用说明 SendMessage基础知识 函数功能:该函数将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序,直到窗口程序处理完消息再返回。而函数PostMessage不同,将一个消息寄送到一个线程的消息队列后立即返回。 函数原型:LRESULT S Read More
posted @ 2014-07-02 21:17 findumars Views(16035) Comments(0) Diggs(0)
MAX_PATH的解释: 文件名最长256(ANSI),加上盘符(X:\)3字节,259字节,再加上结束符1字节,共260http://msdn.microsoft.com/en-us/library/windows/desktop/aa365247(v=vs.85).aspxhttp://supp... Read More
posted @ 2014-06-30 18:17 findumars Views(18332) Comments(0) Diggs(3)
vc字符串转换处理:(绝对精华,收集所有的例子)1.头文件中要定义宏; #define UNICODE #define _UNICODE////////////////////char buf[128]; memset(buf,0,128); strcpy(buf,"你好"); WCHAR ... Read More
posted @ 2014-06-20 17:48 findumars Views(6133) Comments(0) Diggs(1)
今天第一次主要到Delphi也有goto语法,特别是其奇怪的label声明。估计主要是用来跳出多重循环,而且还真有人使用这种方式。记个笔记: procedure TForm1.btn3Click(Sender: TObject); var I, J: Integer; label label1; b Read More
posted @ 2014-06-19 23:13 findumars Views(2233) Comments(0) Diggs(0)