FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour TAds 2.1a com controles xBrowse e Help
Posts: 244
Joined: Mon Jun 05, 2006 09:39 PM
TAds 2.1a com controles xBrowse e Help
Posted: Sun Aug 24, 2014 08:42 PM

VERSION 2.1a

  • Novos Methods da classe tAds em tAds.prg
  • Method KeyNo() > Retorna o numero do atual registro ou pelo index conforme o Tag focado.
    Em sql retorna a posição do resultado da query
  • Method GetRelKeyPos() > Retorna a posição relativa do cursor
  • Method SetRelKeyPos() > Posiciona o registro relativo ao cursor da tabela
  • Method DataLoad() > Carregar os conteudos dos campos para variaveis DATA com nomes dos campos. Ver DATA lBufferOnSkip para carregamento automatico
  • Method DataBlank() > Atribui as Variaveis DATA os valores em branco
  • Method DataSave() > Salva os conteudos das Variaveis DATA para o registro da tabela.

Nova Classe tCtrlxBrowse() Para configurar o esquema de navegação em xBrowse de Fivewin com a Classe tAds
Ex:

::oDb_Clientes := DB_CLIENTES():OpenRdd()

::oBrw := TXBrowse():New( ::oWnd )
::oBrw:cAlias := ::oDb_Clientes:cAlias
::oBrw:nTop := 41
::oBrw:nLeft := 228
::oBrw:nBottom := ::oWnd:nHeight - 80
::oBrw:nRight := ::oWnd:nWidth - 1

::oBrw:SetRDD()
::oBrw:CreateFromCode()

::oCtrlBrw := tCtrlxBrowse():New(::oBrw,::oDb_Clientes)

Novo help de tAds > Pasta .\HelpTads\HelpTads.chm
Obs: O help de Tads não esta completo. Será contruido conforme as novas versões.

Continue the discussion