Fórum Saber se maquina esta conectada #214087
14/02/2004
0
Kroki
Curtir tópico
+ 0Posts
14/02/2004
Ccchizolini
procedure TForm1.Button1Click(Sender: TObject);
begin
if GetSystemMetrics(SM_NETWORK) and $01 = $01 then
ShowMessage(´O computador está em rede!´)
else
ShowMessage(´O computador não está em rede!´);
end;
Gostei + 0
14/02/2004
Kroki
Gostei + 0
14/02/2004
Fabio.hc
[url]http://delphiforum.icft.com.br/forum/viewtopic.php?t=30176&start=0&postdays=0&postorder=asc&highlight=[/url]
Gostei + 0
15/02/2004
Kroki
O problema e descpbriri se a porta esta aberta e usei uma Unit HostTest que peguei na net que faz isso em 200mil.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)