![]() |
AW: String('8.0.0').toInteger
Ich verwende für fehlertolerante String to Integer so eine Funktion
Code:
function QDStrToInt(const str : String) : Integer;
var i : Integer; begin Result := 0; for i := 1 to Length(str) do if (str[i]>='0') and (str[i]<='9') then Result := Result * 10 + Integer(str[i]) - Integer('0') else break; end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:44 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz