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

如何在delphi里用代码实现创建VPN连接?

我的代码如下,怎么总提示连不成功:
type
  GUID = record //申明调用RAS(创建VPN连接用)函数所需结构体
  Data1: integer;
  Data2: Shortint;
  Data3: Shortint;
  Data4: array[0..6] of byte;
end;

type
  RASIPADDR = record //申明调用RAS(创建VPN连接用)函数所需结构体
  a: byte;
  b: byte;
  c: byte;
  d: byte;
end;

type
  RASENTRY = record //申明调用RAS(创建VPN连接用)函数所需结构体
  dwSize: integer;
  dwfOptions: integer;
  dwCountryID: integer;
  dwCountryCode: integer;
  szAreaCode: array[0..9] of byte;
  //szLocalPhoneNumber: array[0..127] of byte;
  dwAlternateOffset: integer;
  ipaddr: RASIPADDR;
  ipaddrDns: RASIPADDR;
  ipaddrDnsAlt: RASIPADDR;
  ipaddrWins: RASIPADDR;
  ipaddrWinsAlt: RASIPADDR;
  dwFrameSize: integer;
  dwfNetProtocols: integer;
  dwFramingProtocol: integer;
  szScript: array[0..258] of char;
  szAutodialDll: array[0..258] of char;
  szAutodialFunc: array[0..258] of char;
  szDeviceType: array[0..15] of char;
  szDeviceName: array[0..127] of char;
  szX25PadType: array[0..31] of char;
  szX25Address: array[0..199] o


相关问答:

Python中的Unicode在Delphi如何还原成Gb2312?

已知Python 中:
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试

在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢?
找到个方法
......

Delphi 像亡国的南宋,试问这语言还有前途吗?

Delphi 像亡国的南宋,试问这语言还有前途吗?
Win32开发不如C#;
面像对像开发不如JAVA;
系统开发不如VC++6.0;
能用性不如VB6.0;
不支持Web开发。。。
出个Delphi 2010免费一年会有人用吗? ......

小弟不会DELPHI,请大侠们帮个忙

这个是拦截按键消息并测试是否为ENTER键。
  begin
    case wParam of
      WM_KEYDOWN:
      fEatKeystroke := (p.vkCode = VK_RETURN);
  & ......

delphi中select 的 where后面的id=变量怎么写啊

我的程序中有一段更新某一条记录的语句:
var
id:=integer;
begin
id:=strtoint(edit1.text);//edit1.text的值已经取得;
...
...
...
adoQuery1.sql.add('update 计划清单表 set 计划日 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号