Table of Content
HAL Forum
procedure ColourPushButton (
Integer left,Integer top,Integer right,Integer bottom,string funcname,
string name,Integer colour)
Description:
Adds push Button to Window
Parameters:
left Horizontal position of left top corner
top Vertical position of left top corner
right Horizontal position of right bottom corner
bottom Vertical position of right bottom corner
funcname Funcion called when presing button
name ColourPushButton name
colour Predefined colour no.
  WindowBegin("Scan Pallet Barcode",ScanPalletBarCodePUWClass,CGother,RcType);  
  SetWRect(20,80,300,200);
  UseView(RcVc);
  h=100; h2=360;v=6;
  EditFieldTL(h,v,100,"Bar Code",M4Str,Normal,30,f1,false,0);
  ColourPushButton(h,v+=40,h+80,v+60,"ScanPalletClose","Close",1);
  EndWindow;

Related topics:
««