摘要：
function FindWindowThroughWindowText(WindowText: string): THandle;var hCurrentWindow: THandle; cnt: Integer; WindowTitle: array [0 .. 254] of Char;beg 阅读全文
posted @ 2016-12-14 22:59
@网上邻居
阅读(560)
评论(0)
推荐(0)
摘要：
一．新建一个应用程序：File->New Applicaton 在Interface部分要放在Uses Message之后，定义一个消息常量：const WM_NID=WM_USER+1000; 系统规定从WM_USER开始为用户自定义消息。二．定义一个全局变量： NotifyIcon:TNotif 阅读全文
posted @ 2016-12-14 22:56
@网上邻居
阅读(122)
评论(0)
推荐(0)
摘要：
基于TCP的Socket连接【Delphi版】 一、Server端 使用的indy控件： idtcpsrvr1: TIdTCPServer; a）设置默认端口 1 begin2 Self.btn1.Enabled:=False;3 idtcpsrvr1.DefaultPort:=2001;4 idt 阅读全文
posted @ 2016-12-14 15:50
@网上邻居
阅读(4145)
评论(0)
推荐(1)
浙公网安备 33010602011771号