当前位置:首页 » 软件开发
开发技术指南» 文章正文
    引言: -------------------Delphi版的:----
 

 

 ·delphi中sendmessage使用技巧    »显示摘要«
    摘要:东南大学 梁云 windows系统是由消息机制驱动的,每个线程如果建立了一个窗口,则由系统分配一个消息队列用于窗口消息的处理。另外,消息也可以不经过消息队列而利用sendmessage函数直接发送给窗口,窗口过程将处理这个消息,但只有当消息被处理之后,sendmessage才能返回到调用程序。下面结合两个delphi程序,讨论如何利用sendmessage向控件发送消息和控件对这种消息的响应。......
    摘要:internet/intranet在九十年代可能是最流行的计算机术语了,不管是计算机行业内的人士还是计算机外的人士,都会使用internet/intranet,有的查资料,有的是宣传自己和公司,甚至有许多以前从没有想到用internet的东西现在也在用internet来解决,比如有的程控数字计算机维护用internet来解决。在这一切应用之中,基于web server的应用程序的开发是基本点,但如......


QQ2000B刷屏机的源码(Delphi)
-------------------delphi版的:--------------

program chat2001; 【程序编程相关:DELPHI图形编辑技巧二则

【推荐阅读:Delphi中用Adsi创建IIS虚拟目

【扩展信息:Delphi中的字符串

uses

 windows,messages,sysutils;

{$r *.res}

const

 crlf=#13#10;

 exename:pchar=刷屏机器人 2001;

var

//----------------------

 wclass: twndclass; //窗口类变量

 msg:   tmsg;     //消息变量

 hinst,         //程序实例

 handle,         //主窗口句柄

 hfont,         //字体句柄

//----------------

 hbuttonstart, //开始按钮

 hbuttonstop,  //停止按钮

 hbuttonhelp,  //帮助按钮

 hbuttonexit,  //退出按钮

 heditemail,  //e-mail编辑

 hlabelemail,  //e-mail提示

 mcount,tempwnd,qqmainw,richedit:integer;

 lp:longint;

 newtime:integer;

//--------------------

//往一个窗口写标题

procedure writecaption(hwnd:hwnd;text:pchar);begin sendmessage(hwnd,wm_settext,0,integer(text));end;

//从一个窗口读标题

procedure readcaption(hwnd:hwnd;text:pchar);begin sendmessage(hwnd,wm_gettext,400,integer(text));end;

procedure buttonhelp;

var s1:string;

begin

 s1:=本软件只用学习用,不可害人+crlf+

    程序向qq2000b的输入框中输入文字并发送!+crlf+

   详细资料,及源码在作者主页上+crlf+

   主页:hotsky.363.net+crlf;

 messagebox(handle,pchar(s1),帮助,0);

end;

//主程序结束

procedure shutdown;

begin


...   下一页
    摘要:随着internet/intranet的飞速发展和普遍应用,对在internet/intranet上的应用程序的需求越来越多,于是java和activex form应运而生,但是,现在internet的带宽还非常低下的情况下,这种基于client端的应用是非常困难的,下载一个非常小、功能非常简单的java applet就需要非常长的时间,而且还存在着用户使用浏览器不支持这种新技术的可能。在这种情况......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE