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

6
components/virtualtreeview-new/trunk/demos/vtbasic/VTEditors.pas
View File

@@ -30,7 +30,7 @@ interface
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;
PPropertyData = ^TPropertyData;
@@ -324,7 +324,7 @@ implementation
var
Data: PPropertyData;
Buffer: array[0..1024] of Char;
S: UTF8String;
S: String;
P: TPoint;
Dummy: Integer;
begin
@@ -431,7 +431,7 @@ implementation
var
Data: PGridData;
Buffer: array[0..1024] of Char;
S: UTF8String;
S: String;
I: Integer;
begin