{Use o componente TCP para fazer isso. } procedure TForm1.Button1Click(Sender: TObject);
begin
if TCP1.LocalIp = '0.0.0.0' then
ShowMessage('Você não está conectado!');
end;
Mostrando postagens com marcador Verificando se já estou conectado na internet. Mostrar todas as postagens
Mostrando postagens com marcador Verificando se já estou conectado na internet. Mostrar todas as postagens
terça-feira, 22 de setembro de 2009
Assinar:
Postagens (Atom)
