psaveflt.dpr

来自「infopower 4000 for delphi 2006」· DPR 代码 · 共 17 行

program psaveflt;

uses
  Forms,
  savefilt in 'savefilt.pas' {Form1},
  selfilt in 'selfilt.pas' {SelectSaveFilter},
  wwsavflt in 'wwsavflt.pas';

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TSaveFilterDemo, SaveFilterDemo);
  Application.CreateForm(TSelectSaveFilter, SelectSaveFilter);
  Application.Run;
end.