导航

心动吧DELPHI网络书

自发研究:须要多维思想而且要想不可能为可能的人才能做到

[置顶] {下载}本站提供delphi下载

  下载的时候最好不要用迅雷,要不然很容易断线.

  提供多个控件下载:

一句话获取本机 IP 和判断网络是否联通

判断网络是否联通

uses WinInet;

procedure TForm1.Button1Click(Sender: TObject);

begin

  if InternetGetConnectedState(nil, 0) then ShowMessage('已连接');

end;

 

获取本机IP

//添加 TIdIPWatch 控件: IdIPWatch1

...

Delphi程序自动拨号连接网络

 

procedure TForm1.dialogon;    //启动拨号连接
var
fname:string;
myhand:hwnd;
mybutton:hwnd;
begin
fname:='rasphone.exe ';
ShellExecute(0,'open',pchar(fname),'-d 163',nil,sw_show);
sleep(300);
...

网络函数大公开

声明:本文摘自CSDN论坛上网友zsy_good的原作,经过了tomm的一些整理修改.



{=========================================================================

   功  能: 网络函数库

   时  间: 2002/10/02

   版  本: 1.0

...

在程序中获取网络资源信息

在程序中获取网络资源信息  充分利用局域网中的共享资源,无疑将减少用户的硬件和软件投资。在我们的程序中,常常会需要列举局域网络中的共享资源,如在MIDAS多层应用程序中可能要选择上层应用程序所在的服务器的名称、在打印模块中选择可用的网络打印机、在应用程序中选择其它机器上的共享文件等。以一个MIDAS三层数据库应用程序为例子,我们可以用DELPHI制作一个客户端应用程序和一个中间层业务处理程序,由中

分页:[«]1[»]

日历

<< 2013-5 >>

Sun

Mon

Tue

Wed

Thu

Fri

Sat

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

站内搜索

Copyright ⊙ 2004-2009 心动吧 UrL:ABCXD.CoM All RiGhts Reserved