Script
”’#####################################################################################
”’#### Script Name: Account Balance &Account Type ######
”’#### Author : Laith Ghawi ######
”’#### Website : www.Hybridsolutions.com ######
”’#### Date : 08/07/2019 11:20:44 ######
”’#### Description:Shows your account balance&Type into a message boxes ######
”’#####################################################################################
Sample
Public Sub main() Dim property_id as VTLGeneral.ENUM_ACCOUNT_INFO_INTEGER Dim Info as VTLGeneral.ENUM_ACCOUNTINFO_STRING Dim balance as VTLGeneral.ENUM_ACCOUNT_INFO_DOUBLE balance = VTLGeneral.ENUM_ACCOUNT_INFO_DOUBLE.ACCOUNT_BALANCEInfo = VTLGeneral.ENUM_ACCOUNTINFO_STRING.ACCOUNT_FIRST_NAME property_id = VTLGeneral.ENUM_ACCOUNT_INFO_INTEGER.ACCOUNT_TRADE_MODE ClientCode.AccountInfoInteger(property_id)IF property_id=1 Then GUI.MsgDialog("Demo Account")ElseIF property_id=2 Then GUI.MsgDialog("Contest Account")ElseIF property_id=3 ThenGUI.MsgDialog("Real Account")End IF GUI.MsgDialog("Account name is: " & ClientCode.AccountInfoString(Info).Tostring())GUI.MsgDialog("Balance is: " & ClientCode.AccountInfodouble(balance).Tostring())End Sub
See Also