pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

* Replace UTF8String by String in all demos

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1107 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum
2009-12-31 14:06:29 +00:00
parent 1843817e9d
commit cfd18f9fb2
23 changed files with 86 additions and 89 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/virtualtreeview-new/trunk/demos/advanced/Editors.pas
View File

@ -31,7 +31,7 @@ type
PPropertyData = ^TPropertyData;
TPropertyData = record
ValueType: TValueType;
Value: UTF8String; // This value can actually be a date or a number too.
Value: String; // This value can actually be a date or a number too.
Changed: Boolean;
end;
@ -276,7 +276,7 @@ function TPropertyEditLink.EndEdit: Boolean;
var
Data: PPropertyData;
Buffer: array[0..1024] of Char;
S: UTF8String;
S: String;
begin
Result := True;