Welcome to OStack Knowledge Sharing Community for programmer and developer-Open, Learning and Share
Welcome To Ask or Share your Answers For Others

Categories

0 votes
1.9k views
in Technique[技术] by (71.8m points)

delphi - Converting a string to Cardinal / UInt32

I need to convert a string to an unsigned 32 bit integer (Cardinal).

In System.SysUtils unit there are many useful functions like:

  • StrToInt
  • StrToInt64
  • StrToUInt64

But I can't find any StrToCardinal, StrToUInt or StrToUInt32 function.

question from:https://stackoverflow.com/questions/65842281/converting-a-string-to-cardinal-uint32

与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…
Welcome To Ask or Share your Answers For Others

1 Answer

0 votes
by (71.8m points)

To follow Andreas Rejbrand idea posted as comment, I would suggest this:

function StrToCardinal(const S : String) : Cardinal;
var
    I64 : UInt64;
begin
    I64 := StrToUInt64(S);
    if (I64 shr 32) <> 0 then
        raise EConvertError.Create('StrToCardinal invalid value');
    Result := Cardinal(I64);
end;

与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…
Welcome to OStack Knowledge Sharing Community for programmer and developer-Open, Learning and Share
Click Here to Ask a Question

...