35 lines
857 B
ObjectPascal
35 lines
857 B
ObjectPascal
unit plgExtController;
|
|
|
|
interface
|
|
|
|
uses
|
|
plgType, pec_TPVKusovnik, pec_TPVOperace;
|
|
|
|
{ =========================================================================== }
|
|
|
|
const
|
|
GDefiniceControlleru: array[0..2] of TplgEditorControllerDef =
|
|
(
|
|
// aby bylo mozno nemit zadnou definici controlleru,
|
|
// musi zustat prvni prvek nedefinovan !!
|
|
(FormIdent : '')
|
|
|
|
,(FormIdent: 'TEdKusovnikoveVazbyForm11021';
|
|
ControllerClass: TplgHDCRTNTPVKusovnikController)
|
|
|
|
,(FormIdent: 'TEdPostupForm11019';
|
|
ControllerClass: TplgHDCRTNTPVOperaceController)
|
|
|
|
//last
|
|
);
|
|
|
|
{ =========================================================================== }
|
|
|
|
implementation
|
|
|
|
{ ########################################################################### }
|
|
|
|
{ ########################################################################### }
|
|
|
|
end.
|