易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi idhttp1 是否可以模拟鼠标点击某个区域

delphi7 idhttp1 是否可以模拟鼠标点击某个区域

我不打算用 webbrowser1 打算用idhttp1 来实现 小弟求助
看不懂,哪种模拟鼠标点击?



1,使用 火狐浏览器2.0在工具-页面信息-表单- 获得所有表单信息
2,把表单 字段名称和当前值 都写进去

procedure TForm1.Button1Click(Sender: TObject);
var
postList: TStrings;
Response: TStringStream;

begin;
      Response := TStringStream.Create('');
      postList := TStringList.Create;
      try
          IdHTTP1.Request.UserAgent:='Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0; Maxthon)';
          postList.Add('__EVENTTARGET=');
          postList.Add('__VIEWSTATE=/wEPDwUJLTI5NjAzODk2ZBgBBR5fX0NvbnRyb2xzUmVxdWlyZVBvc3RCYWNrS2V5X18WAQULY2hrUmVtZW1iZXKHW0DW4nQrSrBHBomKrt3/MjtBLA==');
          postList.Add('__EVENTVALIDATION=/wEWBQKE2u7lCQLyj/OQAgK3jsrkBALR55GJDgKC3IeGDO8x1Jd0k/hBY1a/6Yl9fTpP16ti');
          postList.Add('tbUserName=用户名称');
          postList.Add('tbPassword=用户密码');
          postList.Add('chkRemember=');
          postList.Add(&#


相关问答:

delphi代理问题 求解 在线等

delphi代理问题 求解 在线等
procedure TForm1.Button3Click(Sender: TObject);
var
  info : INTERNET_PROXY_INFO;
  reg  : TRegistry;
begin

  reg := TRegistry.Crea ......

如何使DELPHI程序出现UAC盾牌?

因为是WIN7系统,程序运行时有的设置需要触及到UAC。

但是网上找的方法都不行,有的方法使用了根本没反应;另外虽然能产生uac盾牌,但在编译时会出现一个错误:

[DCC Error] E2161 Warning: Duplicate ......

delphi 接收

两台机器  第一台 delphi程序接收 (接收一个name)  第二台 php页面发送信息(如  发送一个name)
谁能给我一些相关程序??谢谢
来人啊 救命呢 


如需要阅读该回复,请登录或注册CS ......

delphi的dll中自定义的类如何在调用程序中实例化?

Delphi(Pascal) code:
unit Unit1;
interface
type
Module=class
published
function ReadTest: integer;
procedure WriteTest(const Value: integer);
published
property Test:integ ......

Delphi可以不写类只写方法吗?

Delphi可以不写类只写方法吗?


就是只写一个方法

然后去实现这个方法?

如何可以的话该如何写?
又是你呀,可以的,如:
unit Base64;

interface

uses SysUtils, Classe ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号