mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-22 07:09:29 +02:00
* Patch from Евгений Савин to fix missing ansistring conversion in TryCast. Fixes issue #41002
This commit is contained in:
parent
6e73a3b0e1
commit
d96448cfaf
@ -3293,6 +3293,7 @@ begin
|
||||
tkString,
|
||||
tkWChar,
|
||||
tkLString,
|
||||
tkAString,
|
||||
tkWString,
|
||||
tkUString,
|
||||
tkChar : CastStringToString(aRes,aDest,aDestType);
|
||||
@ -3409,6 +3410,7 @@ begin
|
||||
tkEnumeration : CastFromEnum(aRes,aDest,aDestType);
|
||||
tkFloat : CastFromFloat(aRes,aDest,aDestType);
|
||||
tkLString,
|
||||
tkAString,
|
||||
tkWString,
|
||||
tkUstring,
|
||||
tkSString : CastFromString(aRes,aDest,aDestType);
|
||||
|
Loading…
Reference in New Issue
Block a user