Searched refs:PSGetUnicodeString (Results 1 – 4 of 4) sorted by relevance
/dports/editors/lazarus/lazarus/components/PascalScript/Source/ |
H A D | uPSRuntime.pas | 900 function PSGetUnicodeString(Src: Pointer; aType: TPSTypeRec): tbtunicodestring; in PSGetUnicodeString() function 3111 Result := PSGetUnicodeString(Src.Dta, Src.aType); 3242 Result := PSGetUnicodeString(@PPSVariantData(src).Data, src.FType); 3307 Result := PSGetUnicodeString(@PPSVariantData(src).Data, src.FType); 3577 function PSGetUnicodeString(Src: Pointer; aType: TPSTypeRec): tbtunicodestring; 3862 result := PSGetUnicodeString(Src, aType); 4505 btUnicodeString: tbtUnicodeString(dest^) := PSGetUnicodeString(Src, srctype); 4943 btUnicodeString: b := tbtUnicodestring(var1^) > PSGetUnicodeString(Var2, var2type); 5011 btUnicodeString: b := tbtUnicodestring(var1^) < PSGetUnicodeString(Var2, var2type); 5214 btUnicodeString: b := tbtUnicodestring(var1^) = PSGetUnicodeString(Var2, var2type); [all …]
|
/dports/editors/lazarus-qt5/lazarus/components/PascalScript/Source/ |
H A D | uPSRuntime.pas | 900 function PSGetUnicodeString(Src: Pointer; aType: TPSTypeRec): tbtunicodestring; in PSGetUnicodeString() function 3111 Result := PSGetUnicodeString(Src.Dta, Src.aType); 3242 Result := PSGetUnicodeString(@PPSVariantData(src).Data, src.FType); 3307 Result := PSGetUnicodeString(@PPSVariantData(src).Data, src.FType); 3577 function PSGetUnicodeString(Src: Pointer; aType: TPSTypeRec): tbtunicodestring; 3862 result := PSGetUnicodeString(Src, aType); 4505 btUnicodeString: tbtUnicodeString(dest^) := PSGetUnicodeString(Src, srctype); 4943 btUnicodeString: b := tbtUnicodestring(var1^) > PSGetUnicodeString(Var2, var2type); 5011 btUnicodeString: b := tbtUnicodestring(var1^) < PSGetUnicodeString(Var2, var2type); 5214 btUnicodeString: b := tbtUnicodestring(var1^) = PSGetUnicodeString(Var2, var2type); [all …]
|
/dports/editors/lazarus-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/components/PascalScript/Source/ |
H A D | uPSRuntime.pas | 902 function PSGetUnicodeString(Src: Pointer; aType: TPSTypeRec): tbtunicodestring; in PSGetUnicodeString() function 3124 Result := PSGetUnicodeString(Src.Dta, Src.aType); 3255 Result := PSGetUnicodeString(@PPSVariantData(src).Data, src.FType); 3320 Result := PSGetUnicodeString(@PPSVariantData(src).Data, src.FType); 3590 function PSGetUnicodeString(Src: Pointer; aType: TPSTypeRec): tbtunicodestring; 3875 result := PSGetUnicodeString(Src, aType); 4518 btUnicodeString: tbtUnicodeString(dest^) := PSGetUnicodeString(Src, srctype); 4956 btUnicodeString: b := tbtUnicodestring(var1^) > PSGetUnicodeString(Var2, var2type); 5024 btUnicodeString: b := tbtUnicodestring(var1^) < PSGetUnicodeString(Var2, var2type); 5227 btUnicodeString: b := tbtUnicodestring(var1^) = PSGetUnicodeString(Var2, var2type); [all …]
|
/dports/editors/lazarus-qt5-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/components/PascalScript/Source/ |
H A D | uPSRuntime.pas | 902 function PSGetUnicodeString(Src: Pointer; aType: TPSTypeRec): tbtunicodestring; in PSGetUnicodeString() function 3124 Result := PSGetUnicodeString(Src.Dta, Src.aType); 3255 Result := PSGetUnicodeString(@PPSVariantData(src).Data, src.FType); 3320 Result := PSGetUnicodeString(@PPSVariantData(src).Data, src.FType); 3590 function PSGetUnicodeString(Src: Pointer; aType: TPSTypeRec): tbtunicodestring; 3875 result := PSGetUnicodeString(Src, aType); 4518 btUnicodeString: tbtUnicodeString(dest^) := PSGetUnicodeString(Src, srctype); 4956 btUnicodeString: b := tbtUnicodestring(var1^) > PSGetUnicodeString(Var2, var2type); 5024 btUnicodeString: b := tbtUnicodestring(var1^) < PSGetUnicodeString(Var2, var2type); 5227 btUnicodeString: b := tbtUnicodestring(var1^) = PSGetUnicodeString(Var2, var2type); [all …]
|