Delphi的拨号连接类

•     end;
    end;
    if FRasEntries.Count>0 then EntryName:=FRasEntries.Strings[0];
    Result := FRasEntries;
  end;

  constructor TRASConnection.Create;
  var
    OS: OSVersionInfoA;
  begin
    inherited;
    OS.dwOSVersionInfoSize:=sizeof(OSVersionInfoA);
    GetVersionEx(OS);
    FPlatForm:=OS.dwPlatformId;
    FRasEntries := TStringList.Create;
    GetRasEntries;
  end;

  destructor TRASConnection.Destroy;
  begin
    FRasEntries.Free;
    inherited;
  end;

  procedure TRASConnection.CreateRasEntry;
  begin
    RasCreatePhonebookEntry(Application.Handle,nil);
  end;

  procedure TRASConnection.DeleteRasEntry(AEntryName: string);
  var
    i: integer;
  begin
    i:=FRasEntries.IndexOf(AEntryName);
    if i=-1 then Exit;
    FRasEntries.Delete(i);
    if AEntryName=EntryName then
      if FRasEntries.Count>0 then EntryName:=FRasEntries.Strings[0]
      else EntryName:='';
    RasDeleteEntry(nil,PChar(AEntryName));
  end;
  
  Api声明：
  

  function RasDial(
    lpRasDialExtensions: PRASDIALEXTENSIONS;
    lpszPhonebook: LPCTSTR;
    lpRasDialParams: LPRASDIALPARAMS;
    dwNotifierType: DWORD;
    lpvNotifier: Pointer;
    lphRasConn: LPHRASCONN): DWORD;
  stdcall; external 'RASAPI32.dll' name 'RasDialA';

  function RasHangUp(rasconn: HRASCONN): DWORD;
  stdcall; external 'RASAPI32.dll' name 'RasHangUpA';

  function RasGetEntryDialParams(
    lpszPhonebook: LPCTSTR;
    lprasdialparams: LPRASDIALPARAMS;
    lpfPassword: LPBOOL): DWORD;
  stdcall; external 'RASAPI32.dll' name 'RasGetEntryDialParamsA';

  function RasEnumEntries(
  

• 上一页 [1] [2] [3] [4] [5] [6] [7] [8] 下一页 
• 复制本页网址和标题，发送给你QQ/Msn的好友一起分享
  
  
• Delphi的拨号连接类 相关文章：
• ·调整CSS类型的顺序改变链接翻滚
• ·css属性之媒体（Media）类型
• ·视频下载不求人 突破封锁保存各类视频资源
• ·Static和Final修饰类属性变量及初始化
• ·Flickr允许按地名分类浏览照片
• ·如何应用ASP操作数据库的类
• ·另类方法恢复XP系统用户登录密码
• ·建站一定要选择适合自己的网站类型
• ·ASP操作数据库的类
• ·挖掘各类显示器的无限潜能
• Delphi的拨号连接类 相关软件
• ·动作类街机游戏　三国战记
• ·空战类街机游戏《雷电》模拟器
• ·球类技术：《奇妙碰碰球》游戏试玩
• ·枪战类《恐龙战士》街机模拟器
• ·休闲类街机《嘻哈飙车族》模拟器
• ·枪战类街机《高级战争2金手指》模拟器
• ·格斗类街机《七龙珠英雄列传》模拟器
• ·格斗类街机游戏《豪血寺外传》模拟器
• ·空战类街机《航空霸业》模拟器
• ·另类抗战小说：《零炮楼》

上一篇:所见及所得的类分析跟踪器

下一篇:delphi多层应用程序的实现

• 特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
• 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
• 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

精品推荐

热点TOP10

特别推荐