paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 21:09:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ Fix for WideString props

Browse Source
This commit is contained in:
michael 2004-12-30 18:11:43 +00:00
parent bdeab14b7f
commit 81ecfd5f2c
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/objpas/typinfo.pp
View File

@ -1037,7 +1037,7 @@ end;
procedure SetWideStrProp(Instance: TObject; const PropName: string; const Value: WideString);
begin
SetStrProp(Instance,FindPropInfo(Instance,PropName),Value);
SetWideStrProp(Instance,FindPropInfo(Instance,PropName),Value);
end;
@ -1496,7 +1496,10 @@ end;
end.
{
$Log$
Revision 1.33 2004-12-28 15:30:04 florian
Revision 1.34 2004-12-30 18:11:43 michael
+ Fix for WideString props
Revision 1.33 2004/12/28 15:30:04 florian
* fixed raw mode for non i386 targets
* fixed some alignment issues