Registriert seit: 9. Sep 2003
Ort: Aachen
126 Beiträge
Delphi 7 Professional
|
Re: Welcher Dienst hinter welchem Port?
5. Mär 2004, 15:28
Zitat von neolithos:
Delphi-Quellcode:
var p : servent;
sTmp : String;
begin
p := getservbyport(22, nil);
if p = nil then
begin
sTmp := p^.s_name; // Kopiere inhalt
Edit1.Text := sTmp;
end;
end;
Mal dumm gefragt, wäre if p <> nil nicht geschickter ?
Grüße
Wolf
Ein Schiff im Hafen ist sicher. Aber dafür werden Schiffe nicht gebaut. (engl. Sprichwort)
|