Announcement

Collapse
No announcement yet.

please how to exit an eject cd

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • please how to exit an eject cd

    what I need to put on the button "Exit" to close the auto run but in the same time eject the CD ?
    thanks for your help
    rapido

  • #2
    Re: please how to exit an eject cd

    Try this:

    Add a File.CallDLLFunction action with these settings:

    Filename: winmm.dll
    Function name: mciSendStringA
    Function Parameters: "Set CDAudio Door Open",0,0
    Return Value Type: Long
    Calling Convention: __stdcall

    Then add an Application.Exit action after it.

    Here is the ready-made code that you can copy and paste into the object's On Mouse Click event:

    <IR_ACTIONS_LIST>
    <Action name="Call DLL Function">
    <Type>143</Type>
    <Function>0</Function>
    <DTIndentLevel>0</DTIndentLevel>
    <Enabled>1</Enabled>
    <ErrorHandling>
    <UserNotificationMode>2</UserNotificationMode>
    <CustomErrorMessage/>
    <OnErrorAction>0</OnErrorAction>
    <JumpToLabel/>
    </ErrorHandling>
    <FileName>winmm.dll</FileName>
    <FunctionName>mciSendStringA</FunctionName>
    <FunctionParameters>"Set CDAudio Door Open",0,0</FunctionParameters>
    <ReturnType>1</ReturnType>
    <CallingConvention>1</CallingConvention>
    <Variable>%DLLResult%</Variable>
    </Action>
    <Action name="Exit">
    <Type>2</Type>
    <Function>0</Function>
    <DTIndentLevel>0</DTIndentLevel>
    <Enabled>1</Enabled>
    <ErrorHandling>
    <UserNotificationMode>2</UserNotificationMode>
    <CustomErrorMessage/>
    <OnErrorAction>0</OnErrorAction>
    <JumpToLabel/>
    </ErrorHandling>
    </Action>
    </IR_ACTIONS_LIST>
    --[[ Indigo Rose Software Developer ]]

    Comment


    • #3
      Re: please how to exit an eject cd

      thanks "hombre Pluma"
      Thanks Men's Pen..
      rapido

      Comment

      Working...
      X