tests: test tw7758 assumes that all conversions are made in UTF8 codepage. this change is needed to prevent conversion to system codepage (which also happens while testing with delphi). · 37432368e5 - Gogs

tests: test tw7758 assumes that all conversions are made in UTF8 codepage. this change is needed to prevent conversion to system codepage (which also happens while testing with delphi).

git-svn-id: trunk@19476 -

paul 14 years ago

parent

56ecf146be

commit

37432368e5

1 changed files with 1 additions and 0 deletions

Split View Show Diff Stats

						
							+ 1
							
							- 0
						
tests/webtbs/tw7758.pp
							 
								View File
							
				@@ -17,6 +17,7 @@ var
			
				   w: widestring;
			
				   ss: shortstring;
			
				 begin
			
				+  SetMultiByteConversionCodePage(CP_UTF8);
			
				   c:=#0;
			
				   w:=c;
			
				   if (length(w)<>1) or