getxiicl.dpr

经过研究本人初略的将原代码进行了模拟

program GetxIIcl;

uses
  Forms,
  Unit1 in 'Unit1.pas' {fMain},
  bmp2avi in 'bmp2avi.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.Title := 'Sv';
  Application.CreateForm(TfMain, fMain);
  Application.Run;
end.