Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Code Block
CtrlArray = "" 

// Add the label, placing it in the same place it was added to the form 
hWnd = Get_Property(@Window:".LABEL", "HANDLE") 
OrigSize = Get_Property(@Window:".LABEL", "ORIG_SIZE")
Convert @FM to @VM in OrigSize 
CtrlArray<-1> = hWnd:@VM:OrigSize 

// Add the editline, placing it in the same place it was added to the form 
hWnd = Get_Property(@Window:".EDITLINE", "HANDLE") 
OrigSize = Get_Property(@Window:".EDITLINE", "ORIG_SIZE")
Convert @FM to @VM in OrigSize 
CtrlArray<-1> = hWnd:@VM:OrigSize 

// Add the controls 
Send_Message(@Window:".OLE_PANEL", "OLE.AddCtrls", CtrlArray)

...