a4on.DPR

program A4ON;

{$IF CompilerVersion >= 21.0}
{$WEAKLINKRTTI ON}
{$RTTI EXPLICIT METHODS([]) PROPERTIES([]) FIELDS([])}
{$ENDIF}
{$I defines.inc}



uses
  {$IFDEF EurekaLog}
  EMemLeaks,
  EResLeaks,
  ESendAPIMantis,
  EDialogWinAPIEurekaLogDetailed,
  EDialogWinAPIStepsToReproduce,
  EFixSafeCallException,
  EMapWin32,
  EAppVCL,
  ExceptionLog7,
  {$ENDIF EurekaLog}
  VCL.Forms,
  System.SysUtils,
  VCL.Themes,
  VCL.Styles,
  PrjConst,
  NHunspell in 'Units\NHunspell.pas',
  NHunXml in 'Units\NHunXml.pas',
  PasZip in 'Units\PasZip.pas',
  ad3MainDictionary in 'Units\ad3MainDictionary.pas',
  MAIN in 'FORMS\MAIN.PAS' {A4MainForm},
  OkCancel_frame in 'FRAME\OkCancel_frame.pas' {OkCancelFrame: TFrame},
  PeriodForma in 'FORMS\PeriodForma.pas' {PeriodForm},
  DM in 'FORMS\DM.pas' {dmMain: TDataModule},
  OnOffServicesForma in 'FORMS\OnOffServicesForma.pas' {OnOffServiceForm},
  ChoiseForma in 'FORMS\ChoiseForma.pas' {ChoiseForm},
  CompanyForma in 'FORMS\CompanyForma.pas' {CompanyForm},
  GridForma in 'FORMS\GridForma.pas' {GridForm},
  StreetForma in 'FORMS\StreetForma.pas' {StreetForm},
  ServicesForma in 'FORMS\ServicesForma.pas' {ServicesForm},
  SelectLetterTypeForma in 'FORMS\SelectLetterTypeForma.pas' {frmSelectLetterType},
  CancelContractForma in 'FORMS\CancelContractForma.pas' {CancelContractForm},
  EquipmentForma in 'forms\infrastructure\EquipmentForma.pas' {EquipmentForm},
  AboutForma in 'forms\AboutForma.pas' {AboutForm},
  RequestTypeForma in 'forms\Requests\RequestTypeForma.pas' {RequestTypeForm},
  WorkersForma in 'forms\WorkersForma.pas' {WorkersForm},
  RequestsForma in 'forms\Requests\RequestsForma.pas' {RequestsForm},
  RequestForma in 'forms\Requests\RequestForma.pas' {RequestForm},
  ReqExecutersForma in 'forms\Requests\ReqExecutersForma.pas' {ReqExecutorsForm},
  ReqMaterialsFrame in 'frame\ReqMaterialsFrame.pas' {frmReqMaterials: TFrame},
  RequestFilterForma in 'forms\Requests\RequestFilterForma.pas' {RequestFilterForm},
  UserLoginDlg in 'forms\UserLoginDlg.pas' {UserLoginDialog},
  SettingsForma in 'forms\SettingsForma.pas' {SettingsForm},
  PaymentTypeForma in 'forms\PaymentTypeForma.pas' {PaymentTypeForm},
  AttributesForma in 'forms\AttributesForma.pas' {AttributesForm},
  DiscountForma in 'forms\DiscountForma.pas' {DiscountForm},
  TarifForma in 'forms\TarifForma.pas' {TarifForm},
  LettersForma in 'forms\LettersForma.pas' {LettersForm},
  StreetEditForma in 'forms\StreetEditForma.pas' {StreetViewForm},
  EditAttributeForma in 'forms\EditAttributeForma.pas' {EditAttributForm},
  ReqMaterialsForma in 'forms\Requests\ReqMaterialsForma.pas' {ReqMaterialsForm},
  PaymentForma in 'forms\PaymentForma.pas' {PaymentForm},
  PayDocsForma in 'forms\PayDocsForma.pas' {PayDocsForm},
  PaymentDocForma in 'forms\PaymentDocForma.pas' {PaymentDocForm},
  LibMoney in 'Units\LibMoney.pas',
  HouseForma in 'forms\HouseForma.pas' {HouseForm},
  AttributeForma in 'forms\AttributeForma.pas' {AttributeForm},
  ChannelsForma in 'forms\DVB\ChannelsForma.pas' {ChannelsForm},
  ChannelEditForma in 'forms\DVB\ChannelEditForma.pas' {ChannelEditForm},
  CustomerLanForma in 'forms\Customer\CustomerLanForma.pas' {CustomerLanForm},
  ServiceForma in 'forms\ServiceForma.pas' {ServiceForm},
  CardSerialsForma in 'forms\CardSerialsForma.pas' {fmCardPaySerials},
  CardSerialForma in 'forms\CardSerialForma.pas' {fmCardSerial},
  CardsPayForma in 'forms\CardsPayForma.pas' {fmCardsPay},
  CardPayGenerateForma in 'forms\CardPayGenerateForma.pas' {fmCardPayGenerate},
  CardPayActivateForma in 'forms\CardPayActivateForma.pas' {fmCardPayActivate},
  CardsPaySettingsForma in 'forms\CardsPaySettingsForma.pas' {CardsPaySettingsForm},
  HouseWorkForma in 'forms\HouseWorkForma.pas' {HouseWorkForm},
  WorkWithGrids in 'units\WorkWithGrids.pas',
  LoaderReestrForma in 'forms\LoaderReestrForma.pas' {LoaderReestrForm},
  LoaderProfileForma in 'forms\LoaderProfileForma.pas' {LoaderProfileForm},
  AtrStrUtils in 'units\AtrStrUtils.pas',
  atrCmdUtils in 'units\atrCmdUtils.pas',
  EquipAttributesForma in 'forms\infrastructure\EquipAttributesForma.pas' {EquipAttributesForm},
  EquipCoverage in 'forms\infrastructure\EquipCoverage.pas' {EquipCoverageForm},
  VlansForma in 'forms\VlansForma.pas' {VlansForm},
  PaymentEditForma in 'forms\PaymentEditForma.pas' {PaymentEditFrm},
  CustomerInfoFrame in 'frame\CustomerInfoFrame.pas' {CustomerInfoFrm: TFrame},
  JournalForma in 'forms\JournalForma.pas' {JournalForm},
  QueryForma in 'admin\QueryForma.pas' {QueryForm},
  UserForma in 'admin\UserForma.pas' {UF},
  UsersForma in 'admin\UsersForma.pas' {UsersForm},
  GroupForma in 'admin\GroupForma.pas' {GF},
  uFBServices in 'admin\uFBServices.pas',
  SrvServiceForma in 'admin\SrvServiceForma.pas' {SrvServiceForm},
  ScriptModule in 'forms\ScriptModule.pas' {SM: TDataModule},
  ScripEditorForma in 'forms\ScripEditorForma.pas' {ScripEditorForm},
  BarSettingForma in 'forms\BarSettingForma.pas' {BarSettingForm},
  EventsForma in 'forms\EventsForma.pas' {EventsForm},
  pFIBExtract in 'units\pFIBExtract.pas',
  EquipmentComands in 'forms\infrastructure\EquipmentComands.pas' {EquipmentCommandsForm},
  SelectColumnsForma in 'forms\SelectColumnsForma.pas' {SelectColumnsForm},
  ExportSettingsForma in 'forms\ExportSettingsForma.pas' {ExportSettingsForm},
  OrganForma in 'forms\OrganForma.pas' {OrganForm},
  EQGroupsForma in 'forms\infrastructure\EQGroupsForma.pas' {EQGroupsForm},
  EquipEditForma in 'forms\infrastructure\EquipEditForma.pas' {EquipEditForm},
  EquipmentCommandForma in 'forms\infrastructure\EquipmentCommandForma.pas' {EquipmentCommandForm},
  ReqForAdresForma in 'forms\Requests\ReqForAdresForma.pas' {ReqForAdresForm},
  TextEditForma in 'forms\TextEditForma.pas' {TextEditForm},
  HouseMapForma in 'forms\HouseMapForma.pas' {HouseMapForm},
  SendMessagesForma in 'forms\SendMessagesForma.pas' {SendMessagesForm},
  atrMAil in 'units\atrMAil.pas',
  ReqTypeForma in 'forms\Requests\ReqTypeForma.pas' {ReqTypeForm},
  ReqTemplateForma in 'forms\Requests\ReqTemplateForma.pas' {ReqTemplateForm},
  HeadEndForma in 'forms\HeadEndForma.pas' {HeadEndForm},
  HeadEndsForma in 'forms\HeadEndsForma.pas' {HeadEndsForm},
  RecourseTPLForma in 'forms\RecourseTPLForma.pas' {RecoursesTPLForm},
  RecoursesForma in 'forms\RecoursesForma.pas' {RecoursesForm},
  ReqWorkForma in 'forms\Requests\ReqWorkForma.pas' {ReqWorkForm},
  ReqWorksFrame in 'frame\ReqWorksFrame.pas' {frmReqWorks: TFrame},
  RecourseForma in 'forms\RecourseForma.pas' {RecourseForm},
  RequestWorksForma in 'forms\Requests\RequestWorksForma.pas' {RequestWorksForm},
  SUBDIVForma in 'forms\SUBDIVForma.pas' {SubDivForm},
  WorkTeamForma in 'forms\WorkTeamForma.pas' {WorkTeamForm},
  frmDateSelect in 'frame\frmDateSelect.pas' {frmRequestDate: TFrame},
  SelectDateForma in 'forms\SelectDateForma.pas' {SelectDateForm},
  WHForma in 'forms\WHForma.pas' {WHform},
  monitoringUnitMain in 'admin\monitoringUnitMain.pas' {MonDBForm},
  VATForma in 'forms\VATForma.pas' {VATForm},
  ReqCancelForma in 'forms\Requests\ReqCancelForma.pas' {ReqCancelForm},
  SelDateForma in 'forms\SelDateForma.pas' {SelDateForm},
  OrgnzEditForma in 'forms\OrgnzEditForma.pas' {OrgnzEditForm},
  ChangePwdForma in 'forms\ChangePwdForma.pas' {ChangePwdForm},
  WorkAreaLimitForma in 'forms\WorkAreaLimitForma.pas' {WorkAreaLimitForm},
  RequestNewForma in 'forms\Requests\RequestNewForma.pas' {RequestNewForm},
  ReqAddWorkForma in 'forms\Requests\ReqAddWorkForma.pas' {ReqAddWork},
  RequestResultsForma in 'forms\Requests\RequestResultsForma.pas' {RequestResult},
  ReqGiveForma in 'forms\Requests\ReqGiveForma.pas' {ReqGiveForm},
  AtrCommon in 'units\AtrCommon.pas',
  HETypesForma in 'forms\HETypesForma.pas' {HETypesForm},
  FlatsAddForma in 'forms\FlatsAddForma.pas' {FlatsAddForm},
  BanksForma in 'forms\BanksForma.pas' {BanksForm},
  SettinsUserForma in 'forms\SettinsUserForma.pas' {SettingsUserForm},
  PaymentsForma in 'forms\PaymentsForma.pas' {PaymentsForm},
  TelnetForma in 'forms\TelnetForma.pas' {TelnetForm},
  CustomerForma in 'forms\Customer\CustomerForma.pas' {CustomerForm},
  AtrPages in 'units\AtrPages.pas',
  CF in 'forms\Customer\CF.pas' {CustomersForm},
  fmuCustomerSrv in 'forms\Customer\fmuCustomerSrv.pas' {apgCustomerSrv},
  fmuCustomerInfo in 'forms\Customer\fmuCustomerInfo.pas' {apgCustomerInfo},
  fmuCustomerPayments in 'forms\Customer\fmuCustomerPayments.pas' {apgCustomerPayments},
  fmuCustomerSingleSrv in 'forms\Customer\fmuCustomerSingleSrv.pas' {apgCustomerSingleSrv},
  fmuCustomerLetters in 'forms\Customer\fmuCustomerLetters.pas' {apgCustomerLetters},
  fmuCustomerRecourse in 'forms\Customer\fmuCustomerRecourse.pas' {apgCustomerRecourse},
  fmuCustomerRequests in 'forms\Customer\fmuCustomerRequests.pas' {apgCustomerRequests},
  fmuCustomerAttributes in 'forms\Customer\fmuCustomerAttributes.pas' {apgCustomerAttributes},
  fmuCustomerLan in 'forms\Customer\fmuCustomerLan.pas' {apgCustomerLan},
  fmuCustomerKoef in 'forms\Customer\fmuCustomerKoef.pas' {apgCustomerKoef},
  fmuCustomerDigit in 'forms\Customer\fmuCustomerDigit.pas' {apgCustomerDigit},
  fmuCustomerInternet in 'forms\Customer\fmuCustomerInternet.pas' {apgCustomerInternet},
  fmuCustomerCard in 'forms\Customer\fmuCustomerCard.pas' {apgCustomerCard},
  CustomersFilter in 'forms\Customer\CustomersFilter.pas' {CustomersFilterForm},
  SubscrHistory in 'forms\Customer\SubscrHistory.pas' {CustSubscrHistoryForma},
  EditCFileForma in 'forms\Customer\EditCFileForma.pas' {EditCFileForm},
  PayDocSelectForma in 'forms\PayDocSelectForma.pas' {PayDocSelectForm},
  MessagesForma in 'forms\MessagesForma.pas' {MessagesForm},
  DecoderPacketForma in 'forms\DecoderPacketForma.pas' {DecoderPacketForm},
  DigitCardForma in 'forms\DigitCardForma.pas' {DigitCardForm},
  ReportDesignerForma in 'forms\ReportDesignerForma.pas' {ReportDesignerForm},
  ReportPreview in 'forms\ReportPreview.pas' {ReportChild},
  DVBEquipmentForma in 'forms\DVB\DVBEquipmentForma.pas' {DVBEquipmentForm},
  DVBEqGenForma in 'forms\DVB\DVBEqGenForma.pas' {DVBEqGenForm},
  DVBEqEditForma in 'forms\DVB\DVBEqEditForma.pas' {DVBEqEditForm},
  ManForma in 'forms\ManForma.pas' {ManForm},
  IPPacketForma in 'forms\IPPacketForma.pas' {IPPacketForm},
  Encoding in 'units\Encoding.pas',
  EPGImport in 'forms\DVB\EPGImport.pas' {EPGImportForm},
  EPGSource in 'forms\DVB\EPGSource.pas' {EPGSourceForm},
  EPGView in 'forms\DVB\EPGView.pas' {EPGViewForm},
  uDBImages in 'units\uDBImages.pas',
  EPGEdit in 'forms\DVB\EPGEdit.pas' {EPGEditEvent},
  DVBStreamForma in 'forms\DVB\DVBStreamForma.pas' {DVBStreamForm},
  OTPTypesForma in 'forms\OrdersTP\OTPTypesForma.pas' {OTPTypesForm},
  OrdersTPForma in 'forms\OrdersTP\OrdersTPForma.pas' {OrdersTPForm},
  OrderTPForma in 'forms\OrdersTP\OrderTPForma.pas' {OrderTPForm},
  fmuCustomerNew in 'forms\Customer\fmuCustomerNew.pas' {apgCustomerNew},
  fmuCustomerEdit in 'forms\Customer\fmuCustomerEdit.pas' {apgCustomerEdit},
  fmuCustomerBalance in 'forms\Customer\fmuCustomerBalance.pas' {apgCustomerBalance},
  SubAreaEditForma in 'forms\SubAreaEditForma.pas' {SubAreaViewForm},
  AreaForma in 'FORMS\AreaForma.pas' {AreaForm},
  AreaEditForma in 'forms\AreaEditForma.pas' {AreaViewForm},
  FeedbackForma in 'forms\FeedbackForma.pas' {FeedbackForm},
  DBEditor in 'forms\DBEditor.pas' {fmDBEditor},
  ChannImport in 'forms\ChannImport.pas' {ChImportForm},
  DVBSettings in 'forms\DVB\DVBSettings.pas' {DVBSettinsForm},
  DVBNetworkForma in 'forms\DVB\DVBNetworkForma.pas' {DVBNetworkForm},
  DVBGanresForma in 'forms\DVB\DVBGanresForma.pas' {DVBGanresForm},
  BillEditForma in 'forms\BillEditForma.pas' {BillEditForm},
  TetrisForm in 'forms\TetrisForm.pas' {FormTetris},
  apiSMS in 'units\apiSMS.pas',
  PaymentSourcesForma in 'forms\PaymentSourcesForma.pas' {PaymentSourcesForm},
  MaterialForma in 'forms\Materials\MaterialForma.pas' {MaterialForm},
  MatDocsForma in 'forms\Materials\MatDocsForma.pas' {MatDocsForm},
  MatIncomeDocForma in 'forms\Materials\MatIncomeDocForma.pas' {MatIncomeDocForm},
  MatCorrectionDocForma in 'forms\Materials\MatCorrectionDocForma.pas' {MatCorrectionDocForm},
  MatOutDocForma in 'forms\Materials\MatOutDocForma.pas' {MatOutDocForm},
  MatMoveDocForma in 'forms\Materials\MatMoveDocForma.pas' {MatMoveDocForm},
  MaterialsForma in 'forms\Materials\MaterialsForma.pas' {MaterialsForm},
  MatSelectUnit in 'forms\Materials\MatSelectUnit.pas' {MaterialsSelect: TCustomDropDownFormEh},
  DecoderDeleteDlgForma in 'forms\DVB\DecoderDeleteDlgForma.pas' {DecoderDeleteDlg},
  MatMoveSelectUnit in 'forms\Materials\MatMoveSelectUnit.pas' {MaterialsMoveSelect: TCustomDropDownFormEh},
  EPGAdForma in 'forms\DVB\EPGAdForma.pas' {EPGAdForm},
  ShippersForma in 'forms\ShippersForma.pas' {ShippersForm},
  ReqMatReturnForma in 'forms\Requests\ReqMatReturnForma.pas' {ReqMatReturnForm},
  BonusesForma in 'forms\BonusesForma.pas' {BonusesForm},
  fmuCustomerBonus in 'forms\Customer\fmuCustomerBonus.pas' {apgCustomerBonus},
  fmuCustomerFiles in 'forms\Customer\fmuCustomerFiles.pas' {apgCustomerFiles},
  ChangeOffForma in 'forms\ChangeOffForma.pas' {ChangeOffForm},
  BlackListForma in 'forms\BlackListForma.pas' {BlackListForm},
  sevenzip in 'units\sevenzip.pas',
  RatesForma in 'forms\RatesForma.pas' {RatesForm},
  SendEmail in 'units\SendEmail.pas',
  AlignDlg in 'forms\Circuit\AlignDlg.pas' {AlignDialog},
  CircuitMain in 'forms\Circuit\CircuitMain.pas' {CircuitForm},
  DesignProp in 'forms\Circuit\DesignProp.pas' {DesignerProperties},
  LinkProp in 'forms\Circuit\LinkProp.pas' {LinkProperties},
  MarginsProp in 'forms\Circuit\MarginsProp.pas' {MarginDialog},
  NodeProp in 'forms\Circuit\NodeProp.pas' {NodeProperties},
  ObjectProp in 'forms\Circuit\ObjectProp.pas' {ObjectProperties},
  SimpleGraph in 'forms\Circuit\SimpleGraph.pas',
  SizeDlg in 'forms\Circuit\SizeDlg.pas' {SizeDialog},
  UsageHelp in 'forms\Circuit\UsageHelp.pas' {HelpOnActions},
  IPTVGroupForma in 'forms\IPTV\IPTVGroupForma.pas' {IPTVGroupForm},
  IPTVSettings in 'forms\IPTV\IPTVSettings.pas' {IPTVSettinsForm},
  FileTypeForma in 'forms\FileTypeForma.pas' {FileTypeForm},
  NPSAddForma in 'forms\NPSAddForma.pas' {NPSAddForm},
  MapForma in 'forms\MapForma.pas' {MapForm},
  ReqPlanerForma in 'forms\Requests\ReqPlanerForma.pas' {ReqPlanerForm},
  SelectOneForma in 'forms\SelectOneForma.pas' {SelectOneForm},
  NodesFilter in 'forms\nodes\NodesFilter.pas' {NodesFilterForm},
  NodesForma in 'forms\nodes\NodesForma.pas' {NodesForm},
  NodeTypeForma in 'forms\nodes\NodeTypeForma.pas' {NodeTypeForm},
  NodeAttributeForma in 'forms\nodes\NodeAttributeForma.pas' {NodeAttributForm},
  fmuNodeFiles in 'forms\nodes\fmuNodeFiles.pas' {apgNodeFiles},
  fmuNodeRequests in 'forms\nodes\fmuNodeRequests.pas' {apgNodeRequests},
  fmuNodeAttributes in 'forms\nodes\fmuNodeAttributes.pas' {apgNodeAttributes},
  fmuNodeCIRCUIT in 'forms\nodes\fmuNodeCIRCUIT.pas' {apgNodeCIRCUIT},
  fmuNodeFlats in 'forms\nodes\fmuNodeFlats.pas' {apgNodeFlats},
  fmuNodeMaterialsMove in 'forms\nodes\fmuNodeMaterialsMove.pas' {apgNodeMaterialsMove},
  fmuNodeMaterials in 'forms\nodes\fmuNodeMaterials.pas' {apgNodeMaterials},
  fmuNodeLayout in 'forms\nodes\fmuNodeLayout.pas' {apgNodeLayout},
  EditNFileForma in 'forms\nodes\EditNFileForma.pas' {EditNFileForm},
  NFileTypeForma in 'forms\nodes\NFileTypeForma.pas' {NFileTypeForm},
  EditNodeFlatsForma in 'forms\nodes\EditNodeFlatsForma.pas' {edtNodeFlats},
  EditRFileForma in 'forms\Requests\EditRFileForma.pas' {EditRFileForm},
  TaskForma in 'forms\Task\TaskForma.pas' {TaskForm},
  CustChannelForma in 'forms\Customer\CustChannelForma.pas' {CustChannelForm},
  A4onTypeUnit in 'units\A4onTypeUnit.pas',
  TaskFilterForma in 'forms\Task\TaskFilterForma.pas' {TaskFilterForm},
  NewTaskForma in 'forms\Task\NewTaskForma.pas' {NewTaskForm},
  CallCenterForma in 'forms\CallCenter\CallCenterForma.pas' {CallCenterForm},
  HtmlForma in 'forms\HtmlForma.pas' {HtmlForm},
  ChanSourcesForma in 'forms\DVB\ChanSourcesForma.pas' {ChanSourcesForm},
  ChanSrcForma in 'forms\DVB\ChanSrcForma.pas' {ChanSrcForm},
  ChanForSrcForma in 'forms\DVB\ChanForSrcForma.pas' {ChanForSrcForm},
  ScanImageForma in 'forms\twain\ScanImageForma.pas' {ScanImageForm},
  DelphiTwain in 'units\twain\DelphiTwain.pas',
  DelphiTwain_VCL in 'units\twain\DelphiTwain_VCL.pas',
  CustFilesForma in 'forms\Customer\CustFilesForma.pas' {CustFilesForm},
  PersonalTarifForma in 'forms\Customer\PersonalTarifForma.pas' {PersonalTarifForm},
  DistribForma in 'forms\DVB\DistribForma.pas' {DistribForm},
  SatCardsForma in 'forms\DVB\SatCardsForma.pas',
  DistrContractForma in 'forms\DVB\DistrContractForma.pas' {DistrContractForm},
  ScreenShotForma in 'forms\ScreenShotForma.pas' {ScreenShotForm},
  ContractChForma in 'forms\DVB\ContractChForma.pas' {ContractChForm},
  ContactForma in 'forms\ContactForma.pas' {ContactForm},
  MatInventoryDocForma in 'forms\Materials\MatInventoryDocForma.pas' {MatInventoryDocForm},
  MatInvSelectUnit in 'forms\Materials\MatInvSelectUnit.pas' {MaterialsInvSelect: TCustomDropDownFormEh},
  FreqPlanForma in 'forms\DVB\FreqPlanForma.pas' {FreqPlanForm},
  TimeShiftForma in 'forms\DVB\TimeShiftForma.pas' {TimeShiftForm},
  ChangeChannelForma in 'forms\DVB\ChangeChannelForma.pas' {frmChangeChannelForm},
  DeviceTypesForma in 'forms\DeviceTypesForma.pas' {DeviceTypesForm},
  NodeLayouteForma in 'forms\nodes\NodeLayouteForma.pas' {NodeLayouteForm},
  NodeMaterialForma in 'forms\nodes\NodeMaterialForma.pas' {NodeMaterialForm},
  WebBrowserForma in 'forms\html\WebBrowserForma.pas' {WebBrowserForm},
  MatDocFilter in 'forms\Materials\MatDocFilter.pas' {MatDocFilterForm},
  distrPeriodForma in 'forms\distrPeriodForma.pas' {distrPeriodForm},
  distrValuePeriodForma in 'forms\distrValuePeriodForma.pas' {distrValuePeriodForm},
  BCIssuesForma in 'forms\DVB\BCIssuesForma.pas' {BCIssuesForm},
  BCIssuesTypeForma in 'forms\DVB\BCIssuesTypeForma.pas' {BCIssuesTypeForm},
  BCIForma in 'forms\DVB\BCIForma.pas' {BCIForm},
  BCIssuesSolutionForma in 'forms\DVB\BCIssuesSolutionForma.pas' {BCIssuesSolutionForm},
  StreetHousesViewForma in 'forms\StreetHousesViewForma.pas' {StreetHouseViewForm},
  fmuCustomerMaterialsMove in 'forms\Customer\fmuCustomerMaterialsMove.pas' {apgCustomerMaterialsMove},
  fmuCustomerAppl in 'forms\Customer\fmuCustomerAppl.pas' {apgCustomerAppl},
  EditApplianceForma in 'forms\EditApplianceForma.pas' {EditApplianceForm},
  fmuNodeAppl in 'forms\nodes\fmuNodeAppl.pas' {apgNodeAppl},
  ReqPhotosForma in 'forms\Requests\ReqPhotosForma.pas' {ReqPhotosForm},
  NewsForma in 'forms\Mobile\NewsForma.pas' {NewsForm},
  fmuNodeLink in 'forms\nodes\fmuNodeLink.pas' {apgNodeLink},
  WireTypeForma in 'forms\infrastructure\WireTypeForma.pas' {WireTypeForm},
  NodeLinkForma in 'forms\nodes\NodeLinkForma.pas' {NodeLinkForm},
  WireForma in 'forms\infrastructure\WireForma.pas' {WireForm},
  OrdersTPFilter in 'forms\OrdersTP\OrdersTPFilter.pas' {OrdersTPFilterForm},
  EQPort in 'forms\infrastructure\EQPort.pas' {EQPortForm},
  PortListForma in 'forms\infrastructure\PortListForma.pas' {PortListForm},
  fmuEqpmntPorts in 'forms\infrastructure\fmuEqpmntPorts.pas' {apgEqpmntPort},
  fmuEqpmntAttributes in 'forms\infrastructure\fmuEqpmntAttributes.pas' {apgEqpmntAttributes},
  fmuEqpmntRequests in 'forms\infrastructure\fmuEqpmntRequests.pas' {apgEqpmntRequests},
  fmuEqpmntRegion in 'forms\infrastructure\fmuEqpmntRegion.pas' {apgEqpmntRegion},
  fmuEqpmntInfo in 'forms\infrastructure\fmuEqpmntInfo.pas' {apgEqpmntInfo},
  ContactTypeForma in 'forms\Dict\ContactTypeForma.pas' {ContactTypeForm},
  LabelTypeForma in 'forms\Dict\LabelTypeForma.pas' {LabelTypeForm},
  EquipFilter in 'forms\infrastructure\EquipFilter.pas' {EquipFilterForm},
  PortLinkForma in 'forms\infrastructure\PortLinkForma.pas' {PortLinkForm},
  WireLinkForma in 'forms\infrastructure\WireLinkForma.pas' {WireLinkForm},
  AttributeEditForma in 'forms\AttributeEditForma.pas' {AttributeEditForm},
  WireFilter in 'forms\infrastructure\WireFilter.pas' {WireFilterForm},
  WirePointForma in 'forms\infrastructure\WirePointForma.pas' {WirePointForm},
  PortFilter in 'forms\infrastructure\PortFilter.pas' {PortFilterForm},
  ConnectTypeForma in 'forms\infrastructure\ConnectTypeForma.pas' {ConnectTypeForm},
  PortTypeForma in 'forms\infrastructure\PortTypeForma.pas' {PortTypeForm},
  MatDocUnitForma in 'forms\Materials\MatDocUnitForma.pas' {MatDocUnitForm},
  MatGroupForma in 'forms\Materials\MatGroupForma.pas' {MatGroupForm},
  DocListForma in 'forms\Dict\DocListForma.pas' {DocListForm},
  ReqMatBaybackForma in 'forms\Requests\ReqMatBaybackForma.pas' {ReqMatBaybackForm},
  SelectFilterForma in 'forms\Customer\SelectFilterForma.pas' {frmSelectFilter},
  EQGAttributesFmu in 'forms\infrastructure\EQGAttributesFmu.pas' {apgEQGAttributes},
  EQGPortsFmu in 'forms\infrastructure\EQGPortsFmu.pas' {apgEQGPort},
  AttrGeneralForma in 'forms\AttrGeneralForma.pas' {AttrGeneralForm},
  PromoForma in 'forms\PromoForma.pas' {PromoForm},
  SelectPromoForma in 'forms\SelectPromoForma.pas' {fmSelectPromo},
  SmsQuestForma in 'forms\SmsQuestForma.pas' {SmsQuestForm};

{$R *.RES}
// var
// ExtendedStyle: NativeInt;

begin
  // ReportMemoryLeaksOnShutdown := DebugHook <> 0;
  Application.Initialize;
  Application.HelpFile := '';
  Application.Title := 'A4on.TV';
  Application.CreateForm(TdmMain, dmMain);
  Application.CreateForm(TSM, SM);
  Application.CreateForm(TA4MainForm, A4MainForm);
  Application.Run;

end.