| LWord2IPStr Function |
Unit
QESBPCSConvert
Declaration
Function LWord2IPStr(const IPAddr: LongWord): string;
Description
No Padding is applied.
| Parameters |
| IPAddr | LongWord representing an IP Address. |
Category
String/Integer Conversion RoutinesImplementation
function LWord2IPStr (const IPAddr: LongWord): string;
var
I: Integer;
X: LongWord;
begin
X := IPAddr;
Result := '';
for I := 1 to 4 do
begin
if I > 1 then
Result := '.' + Result;
Result := Int2EStr (X mod 256) + Result;
X := X div 256;
end;
End; |
|
|