Page History

...

• Parameters:

  Name	Type	Description
  Status	Enum	See Status Code
  Message	String

Code Examples

    Define_Com Class(#xDeviceFileCopy) Name(#FileCopier)

    Evtroutine Handling(#COM_OWNER.Initialize)   
      #Copy.Enabled := false 
    Endroutine 

    Evtroutine Handling(#FileCopier.Initialize)   
      #Copy.Enabled := true 
    Endroutine 

    Evtroutine Handling(#Copy.Click)   
      #FileCopier.FromFile := '/recipes/chocolateCake'   
      #FileCopier.ToFile := '/backup/chocolateCake'   
      #FileCopier.Copy() 
    Endroutine 

    Evtroutine Handling(#FileCopier.Completed) Status(#returnedStatus) 
Message(#message)   
      #Status := #returnedStatus   
      If (#Status <> OK)     
        #StatusMessage := #message   
      Endif 
    Endroutine