Gunakan Delphi untuk menghasilkan program minimal yang dapat dieksekusi. Saya pernah melihat seseorang di Internet mengatakan bahwa Delphi dapat menghasilkan aplikasi Win32 dengan ukuran hanya 16k. Ukuran file executable yang saya tulis sendiri adalah sekitar 17k, jadi saya pernah menebak Delphi mungkin hanya dapat mengoptimalkan kode sejauh ini. Baru-baru ini, saya menulis ulang program ini untuk tujuan pengujian, dan menemukan bahwa dengan menggunakan beberapa teknik, ukuran file dapat dikurangi menjadi 8,5k. Program ini juga menunjukkan sisi lain Delphi sebagai alat non-RAD yang mirip dengan Visual C++. Jika Anda tertarik, inilah cara saya melakukannya. Gunakan Delphi untuk menghasilkan proyek default, dan kemudian gunakan tombol Hapus file dari Proyek pada toolbar untuk menghapus satu-satunya formulir (Form1) dari proyek. Kemudian pilih perintah View->Project Source, buka file proyek, dan edit kode sebagai berikut: program MiniApp;uses Windows, Messages;//{$R *.res}const szAppName : PChar = 'MiniApp';function WndProc (AWnd :HWND; pesan:UINT; wp:WPARAM; lp:LPARAM):LRESULT;stdcall;begin Hasil := 0; WM_DESTROY: PostQuitMessage(0); else Hasil := DefWindowProc(AWnd, pesan, wp, lp); end;end;var wc : WNDCLASS; ; lpfnWndProc := @WndProc; cbClsEkstra := 0; cbWndExtra := 0; hIcon := LoadIcon(0, IDI_application); hCursor := LoadCursor(0, IDC_ARROW); hbrBackground := GetSysColorBrush(COLOR_WINDOW); akhir; Registerclass (WC); D, CmdShow); UpdateWindow(HMainWnd); sementara GetMessage(AMsg, 0, 0, 0) dimulai TranslateMessage(AMsg);