(* Xm/DrawnBP.def  Nov 11  16:22:6  1996 *)
(* Copyright (c) 1996,1997 XDS Ltd, Russia. All rights reserved. *)

(* Converted from Xm/DrawnBP.h using H2D v1.18.1 *)

(* $RCSfile: DrawnBP.def,v $ $Revision: 4 $ $Date: 28.07.98 23:14 $ *)

<*+ M2ADDTYPES *>
<*+ M2EXTENSIONS *>
<*+ NOHEADER *> 
<* IF NOT DEFINED(GENTYPEDEF) THEN *> <* NEW GENTYPEDEF+ *> <* END *>
<*+ CSTDLIB *>
(* Merged headers: Xm/DrawnB.h *)

DEFINITION MODULE ["C"] DrawnBP;

IMPORT SYSTEM, X, Xlib, Xm:=XmP, Xt:=IntrinsicP, LabelP;
(* H2D:  Required IMPORT clause: 
IMPORT DrawnBP, X, Xlib, Xm:=XmP, Xt:=IntrinsicP, LabelP;
*)

(*
 * (c) Copyright 1989, 1990, 1991, 1992, 1993 OPEN SOFTWARE FOUNDATION, INC.
 * ALL RIGHTS RESERVED
 *)

(* --------------------------------------------------- *)
(*                     Xm/DrawnB.h                     *)
(* --------------------------------------------------- *)

(*
 * Motif Release 1.2
 *)

(***********************************************************************
 *
 * DrawnButton Widget
 *
 ***********************************************************************)

(*  DrawnButon Widget  *)

VAR 
  xmDrawnButtonWidgetClass: Xt.WidgetClass;

TYPE 
  XmDrawnButtonWidgetClass = POINTER TO _XmDrawnButtonClassRec;

  XmDrawnButtonWidget = POINTER TO _XmDrawnButtonRec;

(********    Public Function Declarations    ********)

PROCEDURE XmCreateDrawnButton ( parent: Xt.Widget;
                                name: ARRAY OF CHAR;
                                arglist: Xt.ArgList;
                                argcount: Xt.Cardinal ): Xt.Widget;

(********    End Public Function Declarations    ********)

(* --------------------------------------------------- *)
(*                     Xm/DrawnB.h                     *)
(* --------------------------------------------------- *)

(*
 * Motif Release 1.2.3
 *)

(*  DrawnButton class structure  *)

TYPE 
  _XmDrawnButtonClassPart = RECORD
    extension: Xt.XtPointer;   (*  Pointer to extension record  *)
  END;

  XmDrawnButtonClassPart = _XmDrawnButtonClassPart;

(*  Full class record declaration for DrawnButton class  *)

  _XmDrawnButtonClassRec = RECORD
    core_class       : Xt.CoreClassPart;
    primitive_class  : Xm.XmPrimitiveClassPart;
    label_class      : LabelP.XmLabelClassPart;
    drawnbutton_class: XmDrawnButtonClassPart;
  END;

  XmDrawnButtonClassRec = _XmDrawnButtonClassRec;

(*  DrawnButton instance record  *)

  _XmDrawnButtonPart = RECORD
    pushbutton_enabled     : Xt.Boolean;
    shadow_type            : SHORTCARD;
    activate_callback      : Xt.XtCallbackList;
    arm_callback           : Xt.XtCallbackList;
    disarm_callback        : Xt.XtCallbackList;
    expose_callback        : Xt.XtCallbackList;
    resize_callback        : Xt.XtCallbackList;
    armed                  : Xt.Boolean;
    old_width              : Xt.Dimension;
    old_height             : Xt.Dimension;
    old_shadow_thickness   : Xt.Dimension;
    old_highlight_thickness: Xt.Dimension;
    timer                  : Xt.XtIntervalId;
    multiClick             : SHORTCARD;           (*  KEEP/DISCARD resource  *)
    click_count            : SYSTEM.int;
    armTimeStamp           : X.Time;
  END;

  XmDrawnButtonPart = _XmDrawnButtonPart;

(*  Full instance record declaration  *)

  _XmDrawnButtonRec = RECORD
    core       : Xt.CorePart;
    primitive  : Xm.XmPrimitivePart;
    label      : LabelP.XmLabelPart;
    drawnbutton: XmDrawnButtonPart;
  END;

  XmDrawnButtonRec = _XmDrawnButtonRec;

VAR 
  xmDrawnButtonClassRec: XmDrawnButtonClassRec;

(********    Private Function Declarations    ********)
(********    End Private Function Declarations    ********)

END DrawnBP.
