2011-06-24 08:34:19 +00:00
|
|
|
program fpbrowser;
|
|
|
|
|
{A program to demonstrate the ThtmlViewer component}
|
|
|
|
|
|
|
|
|
|
uses
|
|
|
|
|
{$IFDEF LCL}
|
|
|
|
|
Interfaces,
|
|
|
|
|
{$ENDIF}
|
2011-07-01 12:52:49 +00:00
|
|
|
Forms, printer4lazarus, laz_synapse,
|
2011-06-24 08:34:19 +00:00
|
|
|
mainform {Form1},
|
|
|
|
|
Submit in 'Submit.pas' {SubmitForm},
|
|
|
|
|
Fontdlg in 'Fontdlg.pas' {FontForm},
|
|
|
|
|
Htmlabt in 'Htmlabt.pas' {AboutBox},
|
|
|
|
|
{$IFNDEF LCL}
|
|
|
|
|
PreviewForm in 'PreviewForm.pas' {PreviewForm},
|
|
|
|
|
Gopage in 'Gopage.pas' {GoPageForm},
|
|
|
|
|
PrintStatusForm in 'PrintStatusForm.pas' {PrnStatusForm},
|
|
|
|
|
{$ENDIF}
|
|
|
|
|
ImgForm in 'ImgForm.pas', pageloader {ImageForm};
|
|
|
|
|
|
|
|
|
|
begin
|
|
|
|
|
Application.Initialize;
|
2011-07-01 07:04:46 +00:00
|
|
|
Application.CreateForm(TformBrowser, formBrowser);
|
2011-06-24 08:34:19 +00:00
|
|
|
Application.CreateForm(TSubmitForm, SubmitForm);
|
|
|
|
|
Application.Run;
|
|
|
|
|
end.
|
