verificar o gateway do windows XP/Windows Server 2003
14/08/2004
0
Olá pessoal!
Gostaria de saber, qual o comando em delphi 5, que verifica ou pega o gateway do windows xp/2003?
OBS: Já consegui pegar o gateway do windows 98/95, vejam o exemplo abaixo:
procedure ........
var
Reg: TRegistry;
begin
Reg := TRegistry.create;
Reg.RootKey:= HKEY_LOCAL_MACHINE;
Reg.OpenKey(´\System\CurrentControlSet\Services\Class\NetTrans\0001, false);
xString := UpperCase(Reg.ReadString(´DefaultGateway´));
Reg.CloseKey;
end;
No aguardo.
Agradeço desde já.
Deus abençoe vcs.
[ ]´s
Luciano R. Moreira
Gostaria de saber, qual o comando em delphi 5, que verifica ou pega o gateway do windows xp/2003?
OBS: Já consegui pegar o gateway do windows 98/95, vejam o exemplo abaixo:
procedure ........
var
Reg: TRegistry;
begin
Reg := TRegistry.create;
Reg.RootKey:= HKEY_LOCAL_MACHINE;
Reg.OpenKey(´\System\CurrentControlSet\Services\Class\NetTrans\0001, false);
xString := UpperCase(Reg.ReadString(´DefaultGateway´));
Reg.CloseKey;
end;
No aguardo.
Agradeço desde já.
Deus abençoe vcs.
[ ]´s
Luciano R. Moreira
Luciano.limeira
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)