Wie kann man mit Delphi überprüfen, ob man mittels DFÜ-Netzwerk im Internet ist?
Danke
Mario
Borland sagt man solle die IP auf 127.0.0.0 (oder sowas) prüfen.
Das funktioniert aber nicht, wenn die App auf ner LAN-Workstation die an einem Dial-Up hängt läuft. Dann denkt das Programm es sei immer online. IMHO gibt’s diverse Möglichkeiten soweit ich weis.
Soll es denn in LANs oder nur in „privaten“ Internet-PCs laufen ?
Deplhi
Ich würde es gerne auf meinem privatem PC laufen lassen. Wie kann man dann auf diese IP zugreifen?
Danke
Mario
Vieleicht antwortet über’s weekend jemand…ich kann dir die Infos halt erst am Montag geben, weil diese Docs sind alle in meinem Büro
You can use the TCP component to retrieve the Local IP
address. If it is „0.0.0.0“ then there is no connection.
Example:
procedure TForm1.Button1Click(Sender: TObject);
begin
if TCP1.LocalIp = ‚0.0.0.0‘ then
ShowMessage(‚Your not connected!‘);
end;