KIRBSTER269,
I updated the script for you.
I clear the Last Selection to hide from showing in the Dialog window. For the fonts, I have never change their size in the dialog window in PC-DMIS basic before.
KIRBSTER269, I added a Cancel button that will end the program.
Not a problem. Glad to help. Sorry that I did not know how to change the font size if it is even possible with PC-DMIS basic.
Also, the X should End the program now. If you don't want to see the Cancel button the script will still work after placing a single quote in front of it.
Hi, I have script with buttons, it working well but I need add variables to to text but I cant pass any variable to text. As example: Text 52,113,53,12, "Serial Number: " Will give Serial Number: , but I need as example Serial Number: 123. How I can pass variable (as example 123) to dialog ?
sorry about not posting code. Piece of code is this:
'D D D
'Create Dialog With these Input items:
Begin Dialog DIALOG_1 50,10, 200, 80,"Save report", .Enable
'Text 20,10,200,12, "Total measured dimensions: & InTolValue"
Text 20,20,200,12, "Do you want save measured data?"
OKButton 35,40,48,26
CancelButton 120,40,48,26
End Dialog
' Set the Dialog For Access:
Dim Dialg As DIALOG_1
button1 = Dialog(Dialg)
' Declar VB variables:
Dim Progtype As String
'Quit If Dialog got canceled, Or go On To take the operator inputs And Put them into VB variables:
If button1 = 0 Then
Progtype= "END"
Else
'D D D
END IF
Idea is to present in dialog info how many dimensions was evaluated and how many dimensions was wrong. At the moment I do believe that once I will finish piece of script, which will proper count dimensions out of tolerance and in tolerance and that info. should help operator to take decision save/not save results of measurement.