Delphi의 RC 파일에서 문자열 테이블을 사용하는 방법
원저자: wangzhidong(Steven Bob) 시간: 2002년 3월 25일 월요일. 먼저 메모장이나 리소스 워크샵 4.5를 사용하여 RC 파일을 만듭니다. 구조는 다음과 같습니다
| /**************************************************** ***** ***************************rcdemo.rcPRoduced by Borland Resource Workshop************* ***** ********************************************* ****** ***********/#include "urcdemo.pas"STRINGTABLE {IDS_HELLO, "만나서 반갑습니다."IDS_RC, "이 프로그래밍은 %s에 의해 만들어졌습니다." } |
그런 다음 BRCC.EXE 또는 BRCC32.exe를 사용하여 rcdemo.rc를 rcdemo.res 파일로 컴파일한 다음 rcdemo.res의 이름을 rcdemo.rc 파일로 바꿉니다. Resource Workshop 4.5를 사용하면 PAS 단위 파일이 생성됩니다. 이 경우 urcdemo.pas의 내용은 다음과 같습니다.
| (************************************************* ***** ***************************urcdemo.pas, Borland Resource Workshop에서 제작************* ******* ******************************************* ******** ***********)unit urcdemo;interfaceconst IDS_HELLO = 2;구현 종료. |
이 기술은 문자열 저장 문제와 오류 처리 시 프로그램 지역화 문제를 해결하는 데 사용될 수 있습니다. 예:
| 단위 ufmRCDemo;인터페이스는 Windows, 메시지, SysUtils, 변형, 클래스, 그래픽, 컨트롤, 양식, 대화 상자, StdCtrls를 사용합니다. TForm1 = class(TForm) GroupBox1: TButton2: TButton; ; Button4: T버튼; Button1Click(Sender: TObject); Procedure Button3Click(Sender: TObject); private { Private 선언 } public { Public 선언 } end;var Form1: TForm1;implementationuses ;{$R rcdemo.rc}{$R *.dfm}{창 사용 API}프로시저 TForm1.Button1Click(Sender: TObject);var arystr: char의 배열 [0..255];begin windows.LoadString(hInstance, IDS_RC, arystr, sizeof(arystr)); TForm1.Button2Click(Sender: TObject);var arystr: 배열 [0..255] char;begin windows.LoadString(hInstance, IDS_Hello, arystr, sizeof(arystr)); ShowMessage(arystr);end;{Delphi 기본 함수 사용}절차 TForm1.Button3Click(Sender: TObject);begin ShowMessage(LoadStr(IDS_Hello)) ;end;절차 TForm1.Button4Click(Sender: TObject);시작 ShowMessage(LoadStr(IDS_RC));end;end. |
참고: 16비트 형식과 32비트 형식의 차이점입니다. 인스턴스 다운로드: http://www.megspace.com/computers/coreware/
