본문 바로가기

언어/delphi

Project Source와 Unit Source의 구성 Program Project1; Uses Forms, Unit in 'Unit1.pas' {Form1} {$R *.RES} begin Application.Initialize; Application.CreateForm(TForm.Form1); Application.Run; end; Program 이 예약어는 프로그램 상단에 위치하고 프로그램 이름을 지정한다. Delphi 프로젝트를 저장할 때 주어진다. 프로그램은 Delphi내에서 스스로가 한 유닛이기 때문에 프로젝트는 같은 이름으로 프로그램이나 유닛을 갖지 못한다. Uses Uses 절에서 각 항목은 현재 프로그램이나 유닛에 의해 접근된 함수나 프로시저를 갖는 유닛의 이름을 부여한다. In 이 지시어는 유닛 파일이 프로젝트에 의해 사용된 파일이라기 보다.. 더보기
예외처리 구분 경우 (try/except/finally) 출처: http://byhou.tistory.com/375 Application.MessageBox(PChar('시작'), '정보', MB_ICONINFORMATION); // try문 외부에서 예외발생 경우 raise Exception.Create('예외경우 발생!'); // 아래 finally 구문 미실행 + Exit() // try문 외부에서 Exit()할 경우 if 조건 then Exit(); // 아래 try..finally와 관계 없이 종료 try try ... raise Exception.Create('예외발생!'); // except + finally + next 을 모두 수행 Exit(); // except + finally + next 을 모두 수행(=Exception.Create 와 .. 더보기
delay 1000ms -> 1sec procedure delay(Time: Integer); var PastCount: LongInt; begin PastCount := GetTickCount; repeat Application.ProcessMessages; until ((GetTickCount-PastCount) >= LongInt(Time)); end; 더보기
Form 생성에서 종료까지 사이클 OnCreate 이벤트 폼이 생성될 때 발생하는 이벤트로서 주로 화면의 초기처리 작업을 위한 이벤트로 사용한다. OnShow 이벤트 폼이 표시될 때 발생하는 이벤트이다. OnActivate 이벤트 폼에 포커스가 넘어와 활성화될 때 발생하는 이벤트이다. OnDeactivate 이벤트 OnActivate 이벤트와 반대로 폼이 비활성화될 때 발생하는 이벤트이다. OnCloseQuery 이벤트 OnClose 이벤트 발생전에 윈도우에 Close 해도 되는지를 확인하고 싶을 때 사용하는 이벤트이다. OnClose 이벤트 폼을 닫을 때 발생하는 이벤트로 화면의 마무리 처리를 위해 주로 사용된다. OnDestroy 이벤트 폼이 해제될 때 발생하는 이벤트이다. 더보기
HeidiSQL_11.0_64_Portable 더보기
DzHTMLText, Dam 더보기
bass 2.4 더보기
AsyncPro 더보기
hex 전송 속도 개선? http://www.delmadang.com/community/bbs_view.asp?bbsNo=17&bbsCat=0&indx=454950&page=8Comport를 사용 해서 로고 그림 파일을 시리얼 전송 할려고 합니다.속도를 개선 하기 위해 그레이스케일로 변환 하여 전송 하려고 합니다.그런데 전송되는 속도를 ProgressBar로 보니 1초에 1개씩 보내는것 같이 느껴지네요.속도를 더 빨리 할 수는 없을까요? var i : integer; Buff : Byte; HexString : String; begin try // 포트 연결 // 그림파일 HEX로 변경 -> Memo에 넣기 HexString := Trim(Memo1.Text); if Length(HexString) > 10 then begin .. 더보기
BinToHexEx 출처: http://www.borlandforum.com/impboard/impboard.dll?action=read&db=bcb_tip&no=919 가끔 Binary파일의 TMemo컴포넌트에 읽어오면 왜 EditPlus나 다른 외부 에디터 처럼 Hex로 안보이냐는 질문이 올라오는 경우가 있다. 당연한것을 ..... 이걸 모르는 이에게 설명하기란 참 쉽지 않는것 같다. 여튼 그것을 설명하려는 것이 아니구... Binary를 Hex-String으로 변환해주는 VCL함수가 있다. Classes 유닛에 BinToHex 라고... 그 반대 함수는 HexToBin 이라고 있다. procedure BinToHex(Buffer, Text: PChar; BufSize: Integer); assembler; const .. 더보기