温柔一刀请进来拿分?!!(150分)

zyy04 · 2000-10-04

有什么捡的么？

zheng · 2000-10-04

在WIN9X下如何获得拨号网络的连接速度，以及“收到的字节数”和 “发送的字节数”；还有能否将WIN系统的拨号网络的图标从系统托盘中隐藏，

zheng · 2000-10-04

老刀：你“原产地”是哪里？

温柔一刀 · 2000-10-05

不回答问题就能拿分吗？ 我是北京人。

wjiachun · 2000-10-05

温柔一刀这回审题不清,哪有那种好事啊.

温柔一刀 · 2000-10-05

to:wjiachun 怎么会呢？我就是想骗点分数嘛！

wangxd · 2000-10-05

我也想知道

温柔一刀 · 2000-10-05

http://www.delphibbs.com/delphi/attachments/rascomp1.zip

悲酥清风 · 2000-10-05

北京人？是不是蓝田的？　：－）

温柔一刀 · 2000-10-05

北京人是山顶洞，你有没有历史知识啊？ :-(

zheng · 2000-10-05

哈哈！三刀是开玩笑的，别介意！ 悲酥清风的历史知识太差了，肯定不及格！

温柔一刀 · 2000-10-05

控件看了吗？应该解决问题吧。 （上次那个问题，答案也在里面

）

zheng · 2000-10-05

温柔一刀: 前面两个问题解决，但是“WIN系统的拨号网络的图标从系统托盘中隐藏”没解决？ 好像有软件能专门将系统托盘的程序图标都弄到其它地方，他是用什么办法作的？ 另在你提供的例子中的“IP Address”下面的两个IP是代表什么，是不是电信 的IP范围?

zheng · 2000-10-05

大富翁的邮件系统是不是坏了，唉！？ 温柔一刀： 麻烦你帮我看一下这里错在哪？老是空值！ GetPhoneNumber('chinanet'); procedure GetPhoneNumber(EntryName: String): String; var RasEntry: TRasEntry;     EntryBuf: PChar;     BuffSize, PropSize, DevSize: Longint;     dwSize: ^Longint;     aa:longint;     C: array[0..100] of Char;{t} begin  BuffSize := 5000;  GetMem(EntryBuf, BuffSize);  PropSize := BuffSize;  Pointer(dwSize) := EntryBuf;  dwSize^ := SizeOf(TRasEntry) ;  DevSize := 0;  aa:=0;{t}  RasGetEntryProperties(nil, PChar(EntryName), PChar(EntryBuf), PropSize, nil, DevSize);  Move(EntryBuf^, RasEntry, SizeOf(TRasEntry));  with RasEntry do begin   if ((dwfOptions and RASEO_UseCountryAndAreaCodes) = RASEO_UseCountryAndAreaCodes) and (szAreaCode [0] >= '0') then    Result := StrPas(szAreaCode) + '-' + StrPas(szLocalPhoneNumber)   else    Result := StrPas(szLocalPhoneNumber);  end;  Freemem (EntryBuf); end;

温柔一刀 · 2000-10-05

to zheng: >>好像有软件能专门将系统托盘的程序图标都弄到其它地方 能告诉我什么软件可以做到吗？ 大富翁的邮件通知确实坏了，别的问题等我有时间仔细看看。

zheng · 2000-10-06

再问一个问题，RasSetEntryProperties是不是可以设置拨号连接“自动重拨”？ 怎样设置？

温柔一刀 · 2000-10-07

要改注册表： HKCU/Software/Microsoft/RAS Phonebook/RedialOnLinkFailure 其他选项也在这里，不属于RAS entry property，也没发现有其他API。

zheng · 2000-10-07

你还没回答我的其他问题!

温柔一刀 · 2000-10-08

>>麻烦你帮我看一下这里错在哪？老是空值！ RASAPI都有特定的调用方式，不可“越雷池一步”

你应该照着我上次哪个例子来写，并且多看Win32 API help，就没问题了 （我写下面这段程序用了3分钟，并且一次调试成功

） function GetPhoneNumber(EntryName: String): String; var    RasEntry: TRasEntry;    dwSize,DevSize :Longint;    hr

WORD; begin  fillChar(RasEntry,SizeOf(RasEntry),#0);  RasEntry.dwSize:=SizeOf(TRasEntry);  DevSize := 0;  hr:=RasGetEntryProperties(nil, PChar(EntryName), @RASEntry, dwSize, nil, DevSize);  if hr>0 then     exit;  with RasEntry do begin   if ((dwfOptions and RASEO_UseCountryAndAreaCodes) = RASEO_UseCountryAndAreaCodes) and (szAreaCode [0] >= '0') then    Result := StrPas(szAreaCode) + '-' + StrPas(szLocalPhoneNumber)   else    Result := StrPas(szLocalPhoneNumber);  end; end;

温柔一刀请进来拿分?!!(150分)

zheng

Unregistered / Unconfirmed

zyy04

Unregistered / Unconfirmed

zheng

Unregistered / Unconfirmed

zheng

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

wjiachun

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

wangxd

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

悲酥清风

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

zheng

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

zheng

Unregistered / Unconfirmed

zheng

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

zheng

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

zheng

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

Similar threads