Versions Compared

Key

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

...

  • Parameters:

    Name

    Type

    Description

    Status

    Enum

    See Status Code

    Message

    String


Code Examples

    Define_Com Class(#xDeviceFileDelete) Name(#FileDeleter) 

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

Evtroutine Handling(#FileDeleter.Initialize)  
#Delete.Enabled := true
Endroutine

Evtroutine Handling(#Delete.Click)  
#FileDeleter.FileName := '/recipes/strawberryMousse'  
#FileDeleter.Delete()
Endroutine

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