small fixes

2003-04-24 23:09:18 +00:00
parent b0278a83da
commit 4e55abc97d
3 changed files with 28 additions and 24 deletions
--- a/bepascal/bepascal/be/interface/interfacedefs.pp
+++ b/bepascal/bepascal/be/interface/interfacedefs.pp
@@ -46,6 +46,11 @@ type
  	B_PLAIN_BORDER,
  	B_FANCY_BORDER,
  	B_NO_BORDER);
+  
+  TButton_width = (
+    B_WIDTH_AS_USUAL,
+    B_WIDTH_FROM_WIDSET,
+    B_WIDTH_FROM_LABEL);

 function ui_color(which : Tcolor_which) : Trgb_color; cdecl; external 'be' name 'ui_color__F11color_which';
 function Ttint_color(color : Trgb_color; which :Tcolor_which) : Trgb_color;cdecl; external 'be' name 'tint_color__FG9rgb_colorf';