getpic.dpr

来自「从网页上下载图片的程序」· DPR 代码 · 共 16 行

program GetPic;

uses
  Forms,
  main in 'main.pas' {MainForm},
  SelectDirUnit in 'SelectDirUnit.pas' {SelectDir};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TSelectDir, SelectDir);
  Application.Run;
end.