Hi adishin,
Hope you are doing well, I already got Awesome Help from you..
I need to know One more thing.
I want to try Detecting (Enter) KeyPress.
In this Code I am getting Error
EAccessViolation: Access vop;atopm at address 006265D1 in module 'VizTemplateWizard.exe'
Sub ScaleVal1(Sender, Key, Shift)
buffer_clear
If Key = 13 Then
buffer_put "RENDERER*TREE*$main$FontSize*TRANSFORMATION*SCALING*X SET " & ScaleValue.Text
End If
buffer_send MainMachine
End sub
Thanks
Best Regards,
Ahmad.
you need to move your if/end if out of the buffer, like:
Sub ScaleVal1(Sender, Key, Shift)
If Key = 13 Then
buffer_clear
buffer_put "RENDERER*TREE*$main$FontSize*TRANSFORMATION*SCALING*X SET " & ScaleValue.Text
buffer_send MainMachine
End If
End sub
or use the SendSingleCommand:
Sub ScaleVal1(Sender, Key, Shift)
If Key = 13 Then
SendSingleCmd MainMachine, "RENDERER*TREE*$main$FontSize*TRANSFORMATION*SCALING*X SET " & ScaleValue.Text, False
End If
End sub