프로그래밍 노트

W1005 Unit 'FileCtrl' is specific to a platform 메세지 없애기

떡잎 — Fri, 16 Oct 2009 18:33:00 +0900

[Pascal Warning] uAAA.pas(12): W1005 Unit 'FileCtrl' is specific to a platform

요즘 FileCtrl를 쓰는 사람이 별로 없겠지만 혹시라도 쓰는 사람이 있으면
이런 메세지가 뜬다.

이 메세지를 안뜨게 하려면 아래와 같은 코드를 넣어주면 된다.

uses
{$WARN UNIT_PLATFORM OFF}
FileCtrl;
{$WARN UNIT_PLATFORM ON}

[델파이]문자열 배열의 정렬

떡잎 — Fri, 28 Aug 2009 11:31:47 +0900

문자열 배열의 정렬 소스

var
arSort: array[1..12] of string
= ('d','e','f','a','b','c','h','a','i','j','k','l');

procedure TForm1.Button1Click(Sender: TObject);
var
sLst: string;
iIdx: Integer;
bSortingEnd: Boolean;
bChange: boolean;
i : integer;
begin
Listbox1.Clear;

repeat
bSortingEnd := False;
iIdx := 1;
repeat
bChange := false;
if checkbox1.Checked then
begin // 내림차순(c, b, a ...)
if CompareStr(arSort[iIdx+1], arSort[iIdx]) > 0 then bChange := true
end
else
begin // 오름차순(a, b, c ...)
if CompareStr(arSort[iIdx], arSort[iIdx+1]) > 0 then bChange := true;
end;

if bChange then
begin
sLst := arSort[iIdx];
arSort[iIdx] := arSort[iIdx+1];
arSort[iIdx+1] := sLst;
bSortingEnd := True;
end;
Inc(iIdx);
until(iIdx > High(arSort) - 1);
until(bSortingEnd = False);

for i := Low(arSort) to High(arSort) do
begin
Listbox1.Items.Add(arSort[i]);
end;
end;

음 난 왜 이런게 쉽게 쉽게 머리에서 안떠오르지 T.T

[델파이] TComPort 설치하기

띠리 — Wed, 26 Aug 2009 22:56:55 +0900

◆ 델파이에서 TComport 설치하기

01) TComport 소스를 다운 받아 적당한 폴더에 설치한다.
C:\Program Files\Borland\BDS\4.0\lib\cportu
개인적으로 위의 폴더에 풀어두었다.

02) Delphi를 실행한구 CportLibX.dbk를 연다.(최신 버전을 선택한다.)

03) CportLibX.dpk 열면 CportLibX.bpl이 Project Manager에 표시된다.
그러면 CportLibX를 오른쪽 클릭하면 아래의 그림과 같이 팝업메뉴가 표시되고
거기서 Compile을 클릭한다.

04) 그리고 델파이에서 다시 DsgnCPortX.dpk를 연다.

05) 그러면 DsGnCportX.bpl이 Project Manager에 표시된다.
DsgnCportX.bpl에서 오른쪽 클릭을 하여 Install을 클릭한다.

06) 그러면 TComport 가 설치된다.

정상적으로 설치되면 Tool Palette에 TComport가 표시된다.

07) 설치가 종료된 에 Library Path를 설정해야된다.

     Options창의 Environment Options > Delpji Options > Library - Wind32에서
     Library path와 Debug DCU path를 설정 한다.
     생성된 DCU파일들이 있는 폴더를 설정해야된다.
     Library path와 Debug DCU path에 아래 패스를 입력하고 [OK] 버튼을 클릭한다.

         $(BDS)\Lib\cportu\source;
        (위 패스는 자신이 소스를 둔 폴더이다.)

     이렇게 하면 TComport가 설치된다.

◆ 델파이에서 TComport 삭제하기

    기존의 TComport를 삭제할 때는 아래의 방법대로 삭제한다.

01) Component 메뉴에서 Install Pakages를 선택한다.

02) Design packages에서 Comport Library를 찾아 [Remove]버튼을 클릭한다.

03) 성공적으로 설치가 종료되면 아래의 메세지가 표시된다.

◆ TComport 다운 받는 곳

SourceForge.net: ComPort Library

[델파이] Indy 관련 컴포넌트 Memory leak 문제

떡잎 — Wed, 26 Aug 2009 22:18:12 +0900

Indy 컴포넌트를 사용하면서 아래 구문으로 메모리 리크 체크를 할 경우

ReportMemoryLeaksOnShutdown := True;

프로그램을 종료할 때 아래의 메시지박스가 반드시 뜬다.

이것을 잡으려고 하루종일 해멨다.
인터넷에서 열심히 찾고 찾았다.

내 개발 환경은 Delphi 2006이 깔려 있고 indy10이 기본으로 설치되어있었다.

참고링크
Embarcadero Discussion Forums IndyRegisterExpected ...
Embarcadero Discussion Forums IDFREEONFINAL ...

문제해결하는 방법을 위 사이트에 씌여있는데 결론은 아주 간단했다.
Indy10의 최신 버전을 설치하기만 하면 위 메모리 리크의 문제는 해결된다.

하루종일 고민했던것의 너무 어의 없게 끝났다.
그런데 최신판의 indy를 설치하는 것도 처음할때는 그리 쉽지 않았다. T.T

[델파이] Indy 재설치

떡잎 — Wed, 26 Aug 2009 22:02:22 +0900

Indy를 재설치하려면 먼저 Indy사이트에 간다.
Indy 설치 환경 : Delphi 2006 환경에서의 설치

http://www.indyproject.org/ : Indy 사이트

■ 최신판 Indy Download

Indy 사이트에 첫페이지에서 아래 링크를 클릭하면
델파이 관련 컴포넌트를 받을 수 있는 곳으로 들어간다.

Indy.Sockets (VCL)

위 페이지의 맨밑에 보면 [Downloads]가 나오고
거기를 클릭하면 몇가지 버전이 나온다.
여기서는 버전 10을 클릭한다.
[Development Snapshot]을 선택한다.

밑의 사이트에 가면 최신판을 업데이트 한다고 한다.
indy.Fulgan.com/zip/
위 사이트에서 indy10.zip을 다운 받는다.

위사이트에서 받지않으면 SubVersion이라고 해서
버전 관리 툴(?)을 설치해서 최신판을 받을 수 있는데
버전 관리 툴을 설치하고 사용법을 익히는 등 좀 귀찮다.
혹시라도 버전 관리툴을 깔아서 사용하고 싶은 사람은
아래 사이트를 참조하면 된다.
Indy via SVN

여하튼 어떻게든 최신판을 다운받는다.

■ 기존 버전 Indy삭제

01) Component 메뉴에서 Intall Packages...를 선택한다.

02) 그러면 아래와 같은 Install Packages 창이 뜬다.
Design packages에서 "Indy 10 Protocol Design Time"을 선택하고
[Remove]버튼을 클릭한다.

그러면 아래의 Uninstall 확인 창이 뜬다.
[Yes]버튼을 클릭하고 Uninstall을 진행한다.

03) 같은 방법으로 Design packages에서 "Indy 10 Core Design Time"을 선택하고
     [Remove]버튼을 클릭하여 Uninstall한다.

04) 익스플로러로 Delphi가 설치된 폴더를 찾아 폴더를 클릭한다.
     C:\Program Files\Borland\BDS

05) 이 폴더에서 오른쪽 클릭을 하고 검색을 클릭한다.
     검색 결과 창이 뜨면 전체 또는 일부 파일 이름에 아래의 파일들을 검색하여 지운다.
         dclIndy*.bpl
         Indy*.bpl
         Id*.pas
         Id*.dcu
     지울때는 Shift키를 누르고 Delete키를 눌러서 지우면 잘못 지웠을 경우 곤란함으로
     그냥 Delete키만 눌러 지운다.

     이렇게 하면 Delphi에서 기존 버전의 Indy가 삭제된다.

■ 최신 버전 Indy 설치

01) 다운 받은 최선 Indy 소스를 적당한 장소에 둔다.
    C:\Program Files\Borland\BDS\4.0\lib\indy10

02) 델파이에서 File 메뉴에서 Open Project를 선택한다.
     Indy 소스가 위치한 곳에 가서 IndySystemX0.dpk를 연다.
     (IndySystem dpk파일을 Lib폴더 밑의 System에 있다.)

03) dpk를 열면 Project Manager에 dpk 프로젝트가 아래와 같이 표시된다.

04) 추가한 IndySystemX0 프로젝트에서 오른쪽 클릭을 해서 Compile을 한다.

05) IndySystem을 Compile한 것과 같은 방법으로 아래의 dpk파일도
     동일한 방법(02~04의 방법)으로 차례대로 Compile한다.

         IndyCoreX0.dpk (Lib\Core)
         IndyProtocolsX0.dpk (Lib\Protocols)

06) 위 세 dpk파일을 컴파을 마치면 Core폴더 밑의 dclIndyCoreX0.dpk를 연다.
     그러면 아래와 같이 표시되고 이번에는 Install을 클릭한다.

그러면 아래와 같은 창이 떠서 Install된 것을 알려준다.

07) 이번에는 dclIndyProtocolsX0.dpk를 열어 위와 동일한 방법으로 Install을 한다.
그러면 아래와 같이 Install된 것을 알려준다.

08) Tools 메뉴에서 Options...를 선택한다.

09) Options창의 Environment Options > Delpji Options > Library - Wind32에서
     Library path와 Debug DCU path를 설정 한다.
     DCU파일들이 있는 아래의 폴더들을 설정된 것들을
     Library path와 Debug DCU path에 입력하고 [OK] 버튼을 클릭한다.

         ;$(BDS)\Lib\indy10\Core
        ;$(BDS)\Lib\indy10\Protocols
         ;$(BDS)\Lib\indy10\System;

이렇게 하면 INDY의 설치가 완료된다.