Table of Content
HAL Forum
procedure AddBic (
Integer,Integer,Integer,Integer,Integer,
Integer,string)
Description:
Adds Icon defined in hansa.hpf file
Icon Number Inverted Icon Number Horizontal coordinate Vertical coordinate Action ID Action Argument Text
  WindowBegin("Paste Customer",CUSClass,CGslist,CUView);
  SetWRect(20,80,530,298);
  Sizeable(-1,-1,0,0);
  ContactBackground;
  UseView(CUVc);
  SpawnClass(CUDClass);
  RecordList(4,17,-21,-39);
  RlColKey(4,4,"N_o.",Code,false,ActCode);
  RlColKey(96,96,"Short",SearchKey,false,ActSearchKey);
  RlColKey(145,140,"C_at",CustCat,false,ActGroup);
  RlColKey(190,190,"Name",Name,false,ActName);
  SearchField("Search");
  hs = 26; h = -40; v = - 15;
  AddBic(4021,4022,h,v,ToolBrowseUser,0,"");
  h = h - hs;
  AddBic(4023,4024,h,v,ToolBrowseGroup,0,"");
  h = h - hs;
  AddBic(4025,4026,h,v,ToolBrowseAll,0,"");
  SpecialMenu("Customer Status",' ',0,"CUStatusCUSsm");
  EndWindow;
Related topics:
««