Einzelnen Beitrag anzeigen

Thomas Feichtner

Registriert seit: 30. Nov 2007
Ort: Rum
137 Beiträge
 
Delphi 10.4 Sydney
 
#1

Umstellung D7 -> XE4

  Alt 26. Jul 2013, 06:55
Hallo ich möchte gerne unser Projekt von D7 auf XE4 bringen.
Jedoch scheitere ich schon beim Installieren von einigen Komponenten bzw. von Funktionen die diese beinhalten.


Delphi-Quellcode:
function ScanNumber(Value, FormatChars: String; var I: Integer): Boolean;
begin
   Result := True;
   I := I + 1;
   while (Result = True) and (I <= Length(Value)) do begin
     if Value[I] in ['0'..'9'] then begin
        I := I + 1;
     end else if Value[I] = [ThousandSeparator] then begin
        I := I + 1;
     end else if Pos(Value[I], FormatChars) <> 0 then begin
        I := I + 1;
     end else if Value[I] in [DecimalSeparator] then begin
        Result := ScanDecimal(Value, FormatChars, I);
     end else begin
        Result := False;
     end;
   end;
end;
folgende Meldung bekomme ich:
d7-xe4.jpg

Die Unit SysUtils wäre definiert.

Und warum bekomme ich diese Meldung:
Implizite String-Umwandlung mit potenziellem Datenverlust von...
Welcher Teil ist String und welcher ShortString?


Ich seh derzeit den Wald vor lauter Bäume nicht...
mfg

Thomas Feichtner
  Mit Zitat antworten Zitat