1*cdf0e10cSrcweirprogram Project1; 2*cdf0e10cSrcweir 3*cdf0e10cSrcweiruses 4*cdf0e10cSrcweir Forms, 5*cdf0e10cSrcweir SampleUI in 'SampleUI.pas' {OKBottomDlg}, 6*cdf0e10cSrcweir SampleCode in 'SampleCode.pas'; 7*cdf0e10cSrcweir 8*cdf0e10cSrcweir{$R *.RES} 9*cdf0e10cSrcweir 10*cdf0e10cSrcweirbegin 11*cdf0e10cSrcweir Application.Initialize; 12*cdf0e10cSrcweir Application.CreateForm(TOKBottomDlg, OKBottomDlg); 13*cdf0e10cSrcweir Application.Run; 14*cdf0e10cSrcweirend. 15