Machsupport Forum

Mach Discussion => VB and the development of wizards => Topic started by: TPS on July 26, 2012, 04:00:25 AM

Title: SetToolDesc problem
Post by: TPS on July 26, 2012, 04:00:25 AM

hi all,

tryed the example from

Mach3 Version 3.x
Macro Programmers Reference Manual

to set tool description.

Sub Main

   Dim TNum As Integer
   Dim TDesc As String

   TNum  = 1 ' want to set description for tool # 1
   TDesc = "1/4 135 degree split point drill"

   If SetToolDescription(TNum, TDesc) Then
      Message "Tool description was set"
   Else
      Message "Error setting Tool description"
   End If

End Sub

geting errormessage in VB Scripter : Sub or function not defined:SetToolDescription

any ideas how to fix ?

Thanks Thomas

Title: Re: SetToolDesc problem
Post by: Klaus1311 on July 26, 2012, 07:10:08 AM

Hi Thomas

what Mach3 version are you using. This function needs at least V3.42.30

Klaus

Title: Re: SetToolDesc problem
Post by: TPS on July 26, 2012, 09:15:56 AM

Hi Klaus,

version is: R3.043.058, but i found the problem 5 minutes ago:

 If SetToolDescription(TNum, TDesc) Then 'this is wrong in the example

must be:

 If SetToolDesc(TNum, TDesc) Then

now it works.

regards Thomas