Prvni verze

PluginHDCRTN.dpr

@@ -0,0 +1,74 @@
+library PluginHDCRTN;
+
+
+
+uses
+  madExcept,
+  madLinkDisAsm,
+  madListHardware,
+  madListProcesses,
+  madListModules,
+  ComServ,
+  System.Types,
+  AnsiStrings,
+  ComObjekt in 'ComObjekt.pas',
+  frmPekarna in 'frmPekarna.pas' {formPekarna},
+  datMod in 'datMod.pas' {dm: TDataModule},
+  frmPrijemNestandard in 'frmPrijemNestandard.pas' {formPrijemNestandard},
+  uUtils in 'uUtils.pas' {frmAbout},
+  frmKontrolaCCP1 in 'frmKontrolaCCP1.pas' {formKontrolaCCP1},
+  frmKontrolaCCP1edt in 'frmKontrolaCCP1edt.pas' {formKontrolaCCP1edt},
+  frmTiskKAStitku in 'frmTiskKAStitku.pas' {formTiskKAStitku},
+  frmAktSarze in 'frmAktSarze.pas' {formAktSarze},
+  frmTiskyNahledy in 'frmTiskyNahledy.pas' {formTiskyNahledy},
+  frmPLZakazky in 'frmPLZakazky.pas' {formPLZakazky},
+  frmZahajeniPalety in 'frmZahajeniPalety.pas' {formZahajeniPalety},
+  frmUkonceniPalety in 'frmUkonceniPalety.pas' {formUkonceniPalety},
+  frmVyrobniDenik in 'frmVyrobniDenik.pas' {formVyrobniDenik},
+  frmPredvyroba in 'frmPredvyroba.pas' {formPredvyroba},
+  frmPredvyrobaDetail in 'frmPredvyrobaDetail.pas' {formPredvyrobaDetail},
+  frmVyrobaMimoPlan in 'frmVyrobaMimoPlan.pas' {formVyrobaMimoPlan},
+  frmVyberPL in 'frmVyberPL.pas' {formVyberPL},
+  frmVyberCinnostiStroje in 'frmVyberCinnostiStroje.pas' {formVyberCinnostiStroje},
+  frmZasobaObjednavky in 'frmZasobaObjednavky.pas' {formZasobaObjednavky},
+  frmObjednavkaMat in 'frmObjednavkaMat.pas' {formObjednavkaMat},
+  frmOdpady in 'frmOdpady.pas' {formOdpady},
+  frmSeznamPalet in 'frmSeznamPalet.pas' {formSeznamPalet},
+  frmPrehledMicharna in 'frmPrehledMicharna.pas' {formPrehledMicharna},
+  frmSpravaVzorku in 'frmSpravaVzorku.pas' {formSpravaVzorku},
+  frmVyberSarze in 'frmVyberSarze.pas' {formVyberSarze},
+  frmSarzeVydej in 'frmSarzeVydej.pas' {formSarzeVydej},
+  frmPlan in '_plgPlan\frmPlan.pas' {formPlan},
+  frmKmen in '_plgPlan\frmKmen.pas' {formKmen},
+  datMod2 in '_plgPlan\datMod2.pas' {dm2: TDataModule},
+  frmZavady in '_plgPlan\frmZavady.pas' {formZavady},
+  frmVyrobniTyden in '_plgPlan\frmVyrobniTyden.pas' {formVyberTydne},
+  frmRamcovyPlan in '_plgPlan\frmRamcovyPlan.pas' {formRamcovyPlan},
+  plgMain in 'libSys\plgMain.pas',
+  frmPlanPaletListy in '_plgPlan\frmPlanPaletListy.pas' {formPlanPaletListy};
+
+// Dokumentace se odkazuje na PChar, ale zda se neaktualni. Je mozne, ze byla napsana pred zmenou definice na UTF-16?
+
+function PluginGetSysAndClassName (Vysl: PAnsiChar): DWORD; stdcall;
+const C_ProgID: AnsiString = 'PluginHDCRTN.run';
+begin
+  Result:= Length(C_ProgID);
+  if Assigned(Vysl) then
+   StrPCopy(Vysl, C_ProgID);
+end;
+
+
+
+exports
+  DllGetClassObject,
+  DllCanUnloadNow,
+  DllRegisterServer,
+  DllUnregisterServer,
+  PluginGetSysAndClassName;
+
+{$R *.RES}
+{$R PluginHDCRTNResource.RES}
+
+
+BEGIN
+END.