Test posting

[Albert Richheimer]

this is a posting to test the BB codes.

---

Code:

    gThreadAlive=%TRUE
    thread create ttdsPing(0) to gThread
    SetThreadPriority gThread,%thread_priority_idle

    gMainALoX  = val(GetRegValue(%HKEY_CURRENT_USER,$REGISTRY,$MAINALOX))
    gMainALoY  = val(GetRegValue(%HKEY_CURRENT_USER,$REGISTRY,$MAINALOY))
    gMutaALoX  = val(GetRegValue(%HKEY_CURRENT_USER,$REGISTRY,$MUTAALOX))
    gMutaALoY  = val(GetRegValue(%HKEY_CURRENT_USER,$REGISTRY,$MUTAALOY))


    '  Connect to ttds
    '  ---------------
    '
    gDSConn=trm_Connect(gServerURL,gttdsPort,gttdsData,gttdsUser,gttdsPass,0)
    if gDSConn < 0 then
      gErrorText="Unable to connect user "+gttdsUser+" to database "+ _
                  gttdsData+":"+$cr+"Error "+format$(abs(gDSConn))+" - "+ _
                  trm_ErrorMessage(gDSConn)
      msgbox gErrorText,%mb_iconerror or %mb_taskmodal,$ERR_CAPTION
      exit function
    end if

'  Open ttds files
'  ---------------
'
    gDLDAT = trm_Open(gDSConn,gDLDAT_File,1)
    if gDLDAT < 0 then
      gErrorText="ERR#001 Cannot open "+gDLDAT_File+". Code "+format$(gDLDAT)
      msgbox gErrorText,%mb_iconerror or %mb_taskmodal,$ERR_CAPTION
      goto closedown
    end if
    dim abg(0) as global DLGES at varptr(dld)

---

Code tags obviously works fine - important for us programmers.