fallout.nj 发表于 2012-2-8 14:19:44

【实例】利用易语言模块源码学习delphi子程序的写法（投递文本），高手莫笑~~

本帖最后由 fallout.nj 于 2012-2-8 15:53 编辑

其实，很多时候我自己不知道API是怎么用的，以前听人说过利用易语言模块的码源学习api是个好方法，这两天碰到难题，突然想起，于是翻查了一下易模块码源，确实受益良多，也学会一些api的用法，更重要的是将这些模块的子程序功能为我所用~~~~~
不说题外话，今天就来举个实例，向notepad发送文本内容，实现类似登录器的文本投递功能。

首先文本投递是怎么实现的？那先来看看易模块里的文本投递是怎么实现的



可以从这段码源看出，文本投递其实就是利用postmessage这个函数来向指定窗口发送文字，可是易语言有字节集这个变量类型，那在delphi中怎样实现呢？


其实不难，字符串变量可以写成这个格式，ay，那么用变量ay:string传递文本就行了，再利用ay进行循环发送，发送前需要将ay转换成asc码后方可进行发送，不然会报错的哦~~


那么代码如下：**** Hidden Message *****






comeheres 发表于 2012-2-8 14:25:58

{:5_95:}易语言最容易入门了，先学学易语言，再来学delphi，很有帮助

kongkong 发表于 2012-2-8 15:46:04

看看                  

偷心无痕 发表于 2012-3-19 21:01:14

谢谢分享Q!~~~~~~`

当断不断 发表于 2012-4-3 01:02:58

学习了~~~~~~~~~~~~~~~

莫非 发表于 2012-4-4 01:40:13

易语言不错，就是报毒

空虚的灵魂 发表于 2012-4-25 22:52:18

看看,学习一下啊

jfaumt 发表于 2012-6-27 13:07:21

真得有真么多

心灵の祝福 发表于 2012-7-26 17:44:20

看下- -..........................

s0512 发表于 2012-7-29 18:38:07

我也来看下。学习学习！;P

cc558 发表于 2013-1-22 16:43:41

看看吧。。。。

gxzje 发表于 2013-2-20 21:46:19

一样的学习想法。

失心失落 发表于 2013-2-24 19:05:36

{:1_1:}:loveliness:1学习了

深度 发表于 2013-3-1 13:56:43

不会delphi，易语言倒是会点

滥杀无辜 发表于 2013-4-8 20:35:50

我真的很感悟……

Root_Null 发表于 2013-4-11 09:56:49

强烈支持楼主ing……

独自面对℡ 发表于 2013-4-11 10:41:34

易语言？ 好像学的人比较多。

Gin 发表于 2013-4-11 20:23:32

强烈支持楼主ing……

学习中-2 发表于 2013-6-30 19:47:56

看看是什么!!!!!!!!!

fishmo 发表于 2013-6-30 21:33:42

不想说什么，我只想顶。。。。。。
页: [1] 2
查看完整版本: 【实例】利用易语言模块源码学习delphi子程序的写法（投递文本），高手莫笑~~