windows编程消息应用收集

笨笨啊

<P>哪些人知道啊？收集一些起来。不限语种</P>
<P>呵呵</P>
<P>以下是我做的一个编辑框类的几条内容</P><PRE><B><FONT size=2>.子程序 置编辑框, , 公开</FONT></B>
<FONT color=#0a8ba7>.参数 句柄, 整数型, , 要处理的编辑框句柄
</FONT>
编辑框句柄 ＝ 句柄

<B><FONT size=2>.子程序 取行数, 整数型, 公开</FONT></B>
<FONT color=#0a8ba7>.参数 句柄, 整数型, 可空, 要取编辑框内文本的行数。如果已经设定过句柄，可不写
</FONT>
<FONT color=blue>.如果真 </FONT>(是否为空 (句柄))
    句柄 ＝ 编辑框句柄
<FONT color=blue><I>.如果真结束</I></FONT>
返回 (发送消息 (句柄, 186, 0, 0))


<B><FONT size=2>.子程序 取行, 文本型, 公开, 取得编辑框第N行的内容</FONT></B>
<FONT color=#0a8ba7>.参数 行数, 整数型, 可空, 如果为空则为第1行
</FONT><FONT color=#0a8ba7>.参数 句柄, 整数型, 可空, 如果已经设定过句柄，可不写
</FONT><FONT color=#0a8ba7>.局部变量 临时文本, 文本型
</FONT>
<FONT color=blue>.如果真 </FONT>(是否为空 (行数))
    行数 ＝ 1
<FONT color=blue><I>.如果真结束</I></FONT>
<FONT color=blue>.如果真 </FONT>(是否为空 (句柄))
    句柄 ＝ 编辑框句柄
<FONT color=blue><I>.如果真结束</I></FONT>
临时文本 ＝ 取空白文本 (255)
发送消息1 (句柄, 196, 行数 － 1, 临时文本)
返回 (删尾空 (临时文本))


<B><FONT size=2>.子程序 上卷一行, , 公开</FONT></B>
<FONT color=#0a8ba7>.参数 句柄, 整数型, 可空
</FONT>
<FONT color=blue>.如果真 </FONT>(是否为空 (句柄))
    句柄 ＝ 编辑框句柄
<FONT color=blue><I>.如果真结束</I></FONT>
发送消息 (句柄, 182, 0, 1)


<B><FONT size=2>.子程序 下卷一行, , 公开</FONT></B>
<FONT color=#0a8ba7>.参数 句柄, 整数型, 可空
</FONT>
<FONT color=blue>.如果真 </FONT>(是否为空 (句柄))
    句柄 ＝ 编辑框句柄
<FONT color=blue><I>.如果真结束</I></FONT>
发送消息 (句柄, 182, 1, -1)

<B><FONT size=2>.子程序 置内容, , 公开</FONT></B>
<FONT color=#0a8ba7>.参数 内容, 文本型, 可空
</FONT><FONT color=#0a8ba7>.参数 句柄, 整数型, 可空
</FONT>
<FONT color=blue>.如果真 </FONT>(是否为空 (句柄))
    句柄 ＝ 编辑框句柄
<FONT color=blue><I>.如果真结束</I></FONT>
<FONT color=blue>.如果真 </FONT>(是否为空 (内容))
    内容 ＝ “”
<FONT color=blue><I>.如果真结束</I></FONT>
发送消息1 (句柄, 12, 0, 内容)


<B><FONT size=2>.子程序 添加文本, , 公开</FONT></B>
<FONT color=#0a8ba7>.参数 内容, 文本型, 可空
</FONT><FONT color=#0a8ba7>.参数 句柄, 整数型, 可空
</FONT><FONT color=#0a8ba7>.局部变量 循环变量, 整数型
</FONT><FONT color=#0a8ba7>.局部变量 内容长度, 整数型
</FONT><FONT color=#0a8ba7>.局部变量 代码值, 整数型
</FONT>
<FONT color=blue>.如果真 </FONT>(是否为空 (句柄))
    句柄 ＝ 编辑框句柄
<FONT color=blue><I>.如果真结束</I></FONT>
<FONT color=blue>.如果真 </FONT>(是否为空 (内容))
    内容 ＝ “”
<FONT color=blue><I>.如果真结束</I></FONT>
内容长度 ＝ 取文本长度 (内容)
<FONT color=blue>.变量循环首 </FONT>(1, 内容长度, 1, 循环变量)
    代码值 ＝ 取代码 (内容, 循环变量)
    发送消息 (句柄, 258, 代码值, 1)
<FONT color=blue>.变量循环尾 </FONT>()
</PRE>

[此贴子已经被作者于2005-5-2 20:39:30编辑过]

笨笨啊

<DIV class=quote><B>以下是引用<I>枫</I>在2005-5-28 0:12:33的发言：</B><BR>
<P>笨笨啊，像你这样的一段代码，就像其他语言一样放到一个编译器里就可以运行吗？</P>
<P>还是一种伪代码？</P></DIV>
<P><a href="http://www.0580hy.com/bbs/dispbbs.asp?boardID=20&ID=2775&page=1" target="_blank" >http://www.0580hy.com/bbs/dispbbs.asp?boardID=20&ID=2775&page=1</A>
<P>直接复制进易语言的IDE代码编辑框就行了。这是易语言4.0beta1版本以上的文本型代码形式（直接复制代码就是这种效果），但在易语言的IDE中显示的是流程图形式的。
<BR><BR><BR><BR><BR>

qzsky

顶。学习一下