소스 검색

* Add TEditCharCase

Michaël Van Canneyt 1 년 전
부모
커밋
e48d53a2f5
1개의 변경된 파일3개의 추가작업 그리고 0개의 파일을 삭제
  1. 3 0
      packages/rtl-objpas/src/inc/system.uitypes.pp

+ 3 - 0
packages/rtl-objpas/src/inc/system.uitypes.pp

@@ -623,7 +623,10 @@ const
   igiLongTap       = igiFirst + 8;
   igiDoubleTap     = igiFirst + 9;
 
+// Edit controls
 
+Type
+  TEditCharCase = (ecNormal, ecUpperCase, ecLowerCase);
 
 implementation