ActiveX - Daisy Run Button

The Daisy Run Button is the simplest program you can write that drives Daisy through ActiveX technology.

It is also the basis of the simplest way of adding Daisy technology to your program.

Run the program, Daisy2003RunButton.exe, that will be installed with Daisy and you get a simple dialog in the top left of the screen.

Daisy Run Button

Click the Run Daisy button and Daisy will be run.

To illustrate the simplicity of the program, the full code from the one and only form in the Visual Basic project is listed below :-

  Option Explicit
      Private WithEvents Daisy As Dazy2003LiteX

  Private Sub cmdDaisy_Click()
      Dim wrkError As String
      On Error Resume Next
      Set Daisy = New Dazy2003LiteX
      Daisy.WindowState = vbNormal
      Daisy.Width = Screen.Width * 0.8
      Daisy.Height = Screen.Height * 0.8
      Daisy.Left = Screen.Width * 0.1
      Daisy.Top = Screen.Height * 0.1
      Daisy.ShowDaisy
  End Sub

  Private Sub Form_Load()
      On Error Resume Next
      Left = 480
      Top = 480
  End Sub

  Private Sub Form_Unload(Cancel As Integer)
      On Error Resume Next
      Set Daisy = Nothing
  End Sub

The code could be even simpler, if the size and position of Daisy was not set!

ActiveX   Daisy   Index