델파이를 사용하여 최소 실행 프로그램 생성하기 인터넷에서 델파이가 16k 크기의 Win32 애플리케이션을 생성할 수 있다고 말하는 것을 본 적이 있습니다. 제가 직접 작성한 실행 파일의 크기는 약 17k이므로 델파이는 추측한 적이 있습니다. 아마도 이 정도까지만 코드를 최적화할 수 있을 것입니다. 최근에 테스트 목적으로 이 프로그램을 다시 작성했는데 몇 가지 기술을 사용하면 파일 크기를 8.5k로 더 줄일 수 있다는 것을 발견했습니다. 이 프로그램은 또한 Visual C++와 유사한 비 RAD 도구로서 Delphi의 또 다른 측면을 보여줍니다. 관심이 있으시면 제가 한 방법을 알려드리겠습니다. Delphi를 사용하여 기본 프로젝트를 생성한 다음 도구 모음에 있는 프로젝트에서 파일 제거 버튼을 사용하여 프로젝트에서 유일한 양식(Form1)을 삭제합니다. 그런 다음 View->Project Source 명령을 선택하고 프로젝트 파일을 열고 다음과 같이 코드를 편집합니다: program MiniApp;uses Windows, Messages;// {$R *.res}const szAppName : PChar = 'MiniApp';function WndProc (AWnd :HWND; 메시지:UINT; wp:WPARAM; lp:LPARAM):LRESULT;stdcall;begin Result := 0; WM_DESTROY: PostQuitMessage(0); else Result := DefWindowProc(AWnd, message, wp, lp); end;end;var wc : HMainWnd : HWND; 시작 스타일:= CS_VREDRAW ;lpfnWndProc := @WndProc := 0; cbWndExtra := 0; hCursor := LoadCursor(0, IDC_ARROW); hInstance := HInstanceName := szAppName; 끝; RegisterClass(wc) := CreateWindow(szAppName, szAppName, WS_OVERLAPPEDWINDOW, Integer(CW_USEDEFAULT), Integer(CW_USEDEFAULT), Integer(CW_USEDEFAULT), HWND_DESKTOP, 0, HInstance, nil); 메인윈드, CmdShow); UpdateWindow(HMainWnd); GetMessage(AMsg, 0, 0, 0)는 TranslateMessage(AMsg)를 시작합니다.