[RAD] GExperts 의 Debug window 사용하기

DbugIntf.pas 유닛을 추가한다.

StartDebugWin(): Debug window 시작

SendDebugClear(): 메세지 초기화
SendSeparator(): 구분자 표시
SendDebugPause(void): 메세지 받기 정지
SendDebugResume(void): 메세지 받기 재시작

SendDebugEx(const AnsiString Msg, Dialogs::TMsgDlgType MType): 실제 메세지 전송 메소드. 메세지와 TMsgDlgType 을 인자로 받는다.

SendDebugFmtEx(const AnsiString Msg, const System::TVarRec * Args, const int Args_Size, Dialogs::TMsgDlgType MType): 특정 포맷의 특정 메세지 출력. SendDebugEx(Format(Msg, Args), MType);
SendDebugFmt(const AnsiString Msg, const System::TVarRec * Args, const int Args_Size): 특정 포맷의 알림 메세지 출력. SendDebugEx(Format(Msg, Args), mtInformation);

SendDebug("메세지"): 알림 메세지 출력. SendDebugEx(Msg, mtWarning);
SendDebugError("메세지"): 에러 메세지 출력. SendDebugEx(Msg, mtError);
SendDebugWarning("메세지"): 경고 메세지 출력. SendDebugEx(Msg, mtInformation);

SendMethodEnter("메소드 시작"): 알림 메세지 출력 + Indent 증가.
SendMethodExit("메소드 종료"): 알림 메세지 출력 + Indent 감소
SendBoolean("Enabled", Enabled): Boolean 출력
SendInteger("Tag", Tag): Integer 출력
SendDateTime("DataTimePicker1->Time", DataTimePicker1->Time): TDateTime 출력