소스 검색

* use sametext instead of converting case

Michaël Van Canneyt 5 달 전
부모
커밋
055bd2c653
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      packages/fcl-sdo/tests/test_suite/test_xsdhelper.pas

+ 2 - 2
packages/fcl-sdo/tests/test_suite/test_xsdhelper.pas

@@ -164,7 +164,7 @@ begin
         'isMany()'
       );
       alLs := sp.getType().getName();
-      ok := ( LowerCase(pt.getString(s_Name)) = LowerCase(sp.getType().getName()) );
+      ok := SameText(pt.getString(s_Name),sp.getType().getName());
       alsCount := sp.getType().getAliasCount();
       if ( not ok ) and ( alsCount > 0 ) then begin
         tmpBuffer := LowerCase(pt.getString(s_Name));
@@ -265,7 +265,7 @@ begin
         'isMany()'
       );
       alLs := sp.getType().getName();
-      ok := ( LowerCase(pt.getName()) = LowerCase(sp.getDataObject(s_DataType).getString(s_Name)) );
+      ok := SameText( pt.getName(), sp.getDataObject(s_DataType).getString(s_Name));
       alsCount := pt.getAliasCount();
       if ( not ok ) and ( alsCount > 0 ) then begin
         tmpBuffer := LowerCase(sp.getDataObject(s_DataType).getString(s_Name));