===================================
HoonControl Ver 1.2.79
===================================

(*) : 이번 버젼에 추가된 기능

----------------

MyText (TextBox)

----------------

텍스트를 Vertical Center에 정렬하여 Display 시켜준다.

(MultiLine, 스크롤바 지원안함)

TextType : TText - 일반 텍스트

TCorp - 사업자등록번호 형식 mask "123-45-67890"

TCitizen - 주민등록번호 형식 mask "123456-7890123"

TPost - 우편번호 형식 mask "123-456"

TDate - 날자 형식 mask "2000/02/02"

TNumeric - 숫자형식 mask "1,234,567"

TCash - 통화형식 mask "1,234.56"

TNumCode - 숫자 코드 "0123"

TDecimal - 공학용 소수 "12345.67890"

TPhoneNo - 전화번호 형식 mask 시내,시외,휴대폰 형식

TCredit - 신용카드번호 형식 mask 1234-5678-9012-3456

(*)TIPAddr - IP Address 형식 Mask 255.255.255.255

각 형식에 맞게 Maxlength 자동조정

TText, TNumCode와 숫자형만 Maxlength 수동조정 가능

유효하지 않은 키 입력시 KeyPress 이벤트 발생 안함

KeyDown 이벤트는 언제나 발생함

TNumeric, TCash, TDecimal :

커서위치와 상관없이 "-" 입력으로 부호 전환

최대 자리수 15자리로 제한(소수 자리수도 15)

TCash는 소수자리수 1-4 제한

LenInteger로 정수부분 최대 자리수 지정

TDecimal :

정수 부분과 소수 부분이 따로 처리되기 때문에

입력시에 정수 뒷자리가 소수 앞자리로

자동 스크롤 되지 않음

(!) NumVal 값을 읽어올 때에는 Currency 형태로

읽어오기 때문에 소수 4자리 이하 버림

정밀성을 요하는 작업에는 Text를 읽어서

형변환해서 사용해야함

TDate : 연월 까지만 표기 가능하도록 MaxLength 조정가능

LostFocus 발생시 Text 내용이 "2001/04/" 형태이면

"2001/04" 형태로 자동으로 변환

(조작 키)

Ctrl + vbKeyUp + 1 일

Ctrl + vbKeyDown - 1 일

Ctrl + vbKeyPageUp + 1 월

Ctrl + vbKeyPageDown - 1 월

Ctrl + vbKeyHome + 1 년

Ctrl + vbKeyEnd - 1 년

TPhoneNo - 전화번호

시내 : XXX, XXX-XXXX, XXXX-XXXX

시외 : 02)XXX-XXXX, 0XX)XXX-XXXX

휴대폰 : 0XX-XXX-XXXX, 0XX-XXXX-XXXX

국제전화 및 내선번호 포함한 형식은 지원하지 않음(형식의 표준화 어려움)

ECase : TText에만 해당

영문 대소문자 지정

LenType : TText에만 해당

디비의 필드 길이와 일치시켜 입력받기 위해 추가함

LenByByte - MaxLength를 Byte 단위로 적용시킴

(한글 1 문자는 2바이트로 계산)

LenByCharacter - MaxLength를 Character 단위로 적용시킴

DateDevider : TDate에만 해당

날자 구분 문자를 "/" "-" "." 중에서 선택

LenInterger : TNumeric,TCash,TDecimal 에만 해당

정수부분 최대 자리수 지정

0으로 지정하면 제한 없음

LenDecimal : TDecimal,TCash 에만 해당

소수부분 최대 자리수 지정

TDecimal : 0-15 유효값. 0으로 지정하면 제한 없음

TCash : 1-4 유효값

TextVal : Text에서 "-" "," "/" "." 기호를 제외한 값을 가져온다.

음수표시 "-", 소수점 "."는 유지한다.

TText에는 해당사항 없음.

NumVal : TNumeric, TCash, TDecimal 에만 적용

Currency 형태로 데이터 값을 읽고 쓴다.

숫자형 필드 작업을 할때 스트링과 숫자형 형변환 작업을

생략하기 위해서 만들었음.

CheckSum : TText - "" -> False, <>"" -> True

TCorp - 사업자등록번호 검증코드 정상 -> True

TCitizen - 주민등록번호 검증코드 정상 -> True

TPost - 6자리입력 -> True (보완 지원 예정)

TDate - 유효한 날자 -> True (윤년 계산 모두 함)

TNumeric - IsNumeric(Text) 값 리턴

TCash - IsNumeric(Text) 값 리턴

TDecimal - IsNumeric(Text) 값 리턴

TNumCode - Barcode Check Digit 정상 -> True

(KAN 8, KAN 13, UPC-A만 지원

UPC-E는 항상 True)

TPhoneNo - "" -> False, <>"" -> True

TCredit - 16자리입력 -> True

FocusSel : True - GotFocus 이벤트 발생시 텍스트 전체를 Select

False - 기능 off

AutoColor: Enable - Edit, Enabled, Locked, Disabled

색을 지정하여 자동으로 BackColor를 적용한다.

Disable - 기능 off

AutoCalc : Enable - TNumeric, TCash, TDecimal 인 경우

LostFocus 발생시 Text 값이 "" 이면

"0"으로 자동변환함

(Changed 이벤트 보다 우선함)

Disable - 기능 off

AutoTrim : Enable - LostFocus 발생 시 양쪽 끝의 Space를 제거한다

(Changed 이벤트 보다 우선함)

Disable - 기능 off

AutoMove : Enable - Enter 입력시 다음 인덱스로 포커스 이동

위, 아래 화살표 키로도 포커스 이동

KeyDown(KeyCode), KeyPress(KeyAscii) 이벤트 발생 안 함(Key 값 삭제됨)

Disable - 기능 off

(Enter Key에 대해서 이벤트 발생시키려면 이 기능을 Off 시켜야 함)

IMEMode : 입력 로케이션을 지정한다.

8 : 영문

10 : 한글 1바이트

(8-영문,10-한글만 사용하면 됨)

Margine : 좌우 마진을 설정한다.

ShadowMargine : 그림자 여백을 설정한다.

ShadowColor : 그림자 색상을 설정한다.

DataChanged as Boolean

: Run Time에만 사용가능

컨트롤이 포커스를 가지고 있는 동안에만 유효한 값

포커스를 상실했을 때는 언제나 False 값을 리턴

포커스를 받은 이후에 데이터가 변했는지를 나타내는 Flag

[Function]

SelectAll() : 호출함으로서 텍스트 전체를 선택함

GotFocus 이외에도 입력 중에 데이터 검증하여

재입력 받기 위해 추가한 기능

CheckCorp(ByVal strCorp As String) As Boolean

CheckCitizen(ByVal strCitizen As String) As Boolean

CheckDate(ByVal strDate As String) As Boolean

CheckBarcode(ByVal strBarcode As String, ByVal upceFlag As Boolean)

As Boolean

CheckSum 함수를 Public으로 선언하여 호출 가능하게 했음

"-","/" 와 같은 기호가 포함된 String을 전달해도

자동으로 제거한 후에 검증함

[Event]

Changed :

Private Sub MyText1_Changed(ByVal OldText As String, _

ByVal NewText As String, Cancel As Boolean)

텍스트 데이터의 변화가 생긴 후에 발생한 LostFocus

직후에 발생한다.

Cancel = True 설정하면 이전 데이터 복구

데이터의 변화가 없을 때에도 매번 데이터를 검증해야하는

루틴에서 필요없는 작업을 생략하기 위해서 추가했음

---------------

MyLabel (Label)

---------------

캡션을 Vertical Center에 정렬하여 Display 시켜준다.

ColorDefine : UnSelColor, UnSelForeColor,

SelColor, SelForeColre,

EditColor, EditForeColor

세 가지 짝의 색을 저장해 두고서

프로퍼티 지정으로 저장된 색을 사용한다

Margine : 좌우 마진을 설정한다.

Direction : 캡션의 가로, 세로 쓰기 설정

Direction을 변동하면 모든 CrLf 삭제됨

ShadowMargine : 그림자 여백을 설정한다.

ShadowColor : 그림자 색상을 설정한다.

-----------------------------

GradientLabel (Label + Frame)

-----------------------------

캡션을 Vertical Center에 정렬하여 Display 시켜준다.

LeftColor, RightColor : 두가지 색을 지정하여 점차적으로 변함

Rotation : 색상 시작, 끝 점을 45,90,145도 회전시킨다

Refresh() : 기본적으로 AutoRedraw 이지만

혹시 발생할지 모르는 사태에 대비하여

Public으로 선언하여 호출할 수 있게 하였음

Margine : 좌우 마진을 설정한다.

Direction : 캡션의 가로, 세로 쓰기 설정

Direction을 변동하면 모든 CrLf 삭제됨

Align : 폼에서의 개체 표시 위치를 결정

Container 기능 부여하여 Frame의 역할을 수행할 수 있음

---------------------------------------------------------------------------------