ブックがデザインインスタンスと通信できるようにするインターフェース

祖先 - なし

詳細

Book デザインインターフェースは、すべての Book デザインの再利用可能パーツに関する特定の要件です。
 
これは、 Book コントロールを含むことで実行可能な一連のメソッドを提供し、再利用可能パーツが Book の変更に応答できるようにします。

例

以下は、 * ListFields 経由でエントリが追加されたときにマップされる3つのフィールドをラベルに埋め込む簡単なブックページです。この値は、OnAddメソッドが実行されたときにデザイン上にラベルを設定するために使用されます。
 
アイテムにイメージが割り当てられている場合は、 OnItemImageChanged メソッドが実行され、そのアイテムのイメージをデザインで使用できます。

Function Options(*DIRECT)
Begin_Com Role(*EXTENDS #PRIM_PANL *implements #Prim_Book.iBookDesign *ListFields #ListFields) Displayposition(1) Height(345) Left(0) Tabposition(1) Top(0) Width(356) Layoutmanager(#AttachLayout1)
 
   * Fields mapped in when the entry is added to the Book
   Group_By Name(#ListFields) Fields(#Field1 #Field2 #Field3)
 
   Define_Com Class(#PRIM_ATLM) Name(#AttachLayout1)
   Define_Com Class(#PRIM_ATLI) Name(#AttachItem1) Attachment(Top) Manage(#Title) Parent(#AttachLayout1)
   Define_Com Class(#PRIM_ATLI) Name(#AttachItem2) Attachment(Bottom) Manage(#Caption1) Parent(#AttachLayout1)
   Define_Com Class(#PRIM_ATLI) Name(#AttachItem3) Attachment(Bottom) Manage(#Caption2) Parent(#AttachLayout1)
   Define_Com Class(#PRIM_ATLI) Name(#AttachItem4) Attachment(Center) Manage(#Image) Parent(#AttachLayout1)
 
   Define_Com Class(#PRIM_IMAG) Name(#Image) Displayposition(4) Height(283) Image(#xImageImage256) Left(0) Parent(#COM_OWNER) Tabposition(4) Tabstop(False) Top(20) Width(354) Imagesizing(BestFit)
   Define_Com Class(#PRIM_LABL) Name(#Title) Alignment(Center) Caption('Title') Displayposition(1) Ellipses(Word) Height(20) Left(0) Parent(#COM_OWNER) Style(#xDemoStyles) Tabposition(1) Tabstop(False) Top(0) Verticalalignment(Center) Width(354)
   Define_Com Class(#PRIM_LABL) Name(#Caption1) Alignment(Center) Caption('Caption1') Displayposition(2) Ellipses(Word) Height(20) Left(0) Parent(#COM_OWNER) Tabposition(3) Tabstop(False) Top(303) Width(354)
   Define_Com Class(#PRIM_LABL) Name(#Caption2) Alignment(Center) Caption('Caption2') Displayposition(3) Ellipses(Word) Height(20) Left(0) Parent(#COM_OWNER) Tabposition(2) Tabstop(False) Top(323) Width(354)
 
   Mthroutine Name(OnAdd) Help('Executed when the item is added using ADD_ENTRY') Options(*Redefine)
 
      #Title := #Field1
      #Caption1 := #Field2
      #Caption2 := #Field3
 
 Endroutine
 
   Mthroutine Name(OnItemImageChanged) Help('Executed when the item "Image" propoerty is set') Options(*redefine)
 
      #Image.Image <= #BookItem.Image *As #prim_bmp
 
 Endroutine
 
 End_Com

メソッド

参照

すべてのコンポーネント クラス

テクニカルリファレンス

EPC150060 - December 2023