Dois registros em uma linha no TBrowse

[eduardo.azambuja]

Pessoal, bom dia!

Alguem sabe se existe uma maneira de colocar 2 registros em 1 unica linha do TBrowse?

Tipo, aparece na tela como se fossem 2 linhas, mas ao posicionar o cursor, marca as 2 linhas?

Desde já, agradeço a atenção.

[JoséQuintas]

Acho que só se criar uma outra rotina de tbrowse.
Por padrão é um registro por linha.

[alxsts]

Olá!

Por padrão é um registro por linha.

Existe uma rotina num livro do Rick Spence que exibe um registro em mais de uma linha. Mas, o que você diz que precisa me deixou encafifado. Não consigo imaginar isto. Pode dar um exemplo melhor?

colocar 2 registros em 1 unica linha ... como se fossem 2 linhas, mas ao posicionar o cursor, marca as 2 linhas

Que doidera...

[Itamar M. Lins Jr.]

Olá!
Não vi dificuldade. (se entendi direito rsrsrs)
use {|| field->nome + " --- " + field->endereco}

Não trabalho com tbrowse, mas seria algo parecido com isso ai em cima. E o ";" para quebra de linha.

Saudações,
Itamar M. Lins Jr.

[alxsts]

Olá!

Também não entendi. Mas, o que você apresentou foi colocar dois campos concatenados em uma única coluna...

O OP menciona

Alguem sabe se existe uma maneira de colocar 2 registros em 1 unica linha do TBrowse?

Tipo, aparece na tela como se fossem 2 linhas, mas ao posicionar o cursor, marca as 2 linhas?

[Itamar M. Lins Jr.]

Olá!

maneira de colocar 2 registros em 1 unica linha do TBrowse?

Né isso ?
O resto fingi que não li.

Saudações,
Itamar M. Lins Jr.

[eduardo.azambuja]

Pessoal, boa tarde.

Acho que nao me expressei direito.

seria tipo agrupar 2 linhas de um tbrowse como se fosse 1 só.

para quando eu posicionar o cursor ali, "selecionar" as 2 linhas.

[alxsts]

Olá!

Acho que nao me expressei direito.

Continuo sem entender...

Monte um exemplo:
- poste os campos com valores de dois ou mais registros da tua tabela
- monte um esboço da tela, mesmo no Notepad, mostrando como ficaria a disposição dos campos dos dois registros em uma única linha do TBrowse.

[Fernando queiroz]

seria algo como o header duplo, se é que entendi a duvida!

DATA nHeadRows INIT 1 // Rows in header
DATA nFootRows INIT 0 // Rows in footer

[Itamar M. Lins Jr.]

Olá!
use {|| field->nome + " ; " + field->endereco}

O ";" quebra a linha do tBrowse ?

Continua o exemplo que postei. Mas para editar vai precisar de VALID para gravar. Meio esquisito isso. Na Hwgui seria um campo memo.

Saudações,
Itamar M. Lins Jr.

[alxsts]

Olá!

Continua o exemplo que postei.

Caramba... será que só eu entendi que são 2 registros em uma linha? Novamente:

o que você apresentou foi colocar dois campos concatenados em uma única coluna...

Dois campos do mesmo registro...

[Itamar M. Lins Jr.]

Olá!

seria tipo agrupar 2 linhas de um tbrowse como se fosse 1 só.
para quando eu posicionar o cursor ali, "selecionar" as 2 linhas.

AGRUPAR DUAS LINHAS
UM SÓ SERIA O GET.(?)

*---------------------------------------*---------------------------------------*
|FIELD 1 COLUNA 1 LINHA 1| FIELD 3 COLUNA 2 LINHA 1|
|FIELD 2 COLUNA 1 LINHA 2| |
*---------------------------------------*---------------------------------------*

Saudações,
Itamar M. Lins Jr.

[Itamar M. Lins Jr.]

Olá!
No caso seria essa: Linha 1 Céclula 3


PS. Céclula ?

Saudações,
Itamar M. Lins Jr.

[lucimauro]

Acho que ele quer dizer e que numa tabela com 6 campos por exemplo quer mostrar 3 e mais 3 na segunda linha do tbrowse como o itamar colocou vai ficar tudo numa linha e não vai caber na tela, acho que a duvida e essa.

[mauricioportela]

Bom dia!

Código: Selecionar todos

    // ...
    LOCAL oTbc1 := TBColumnNew("Codigo", { || codigo } )
    LOCAL oTbc2 := TBColumnNew("Nome", { || nome } )

    LOCAL oTbc3 := TBColumnNew("Codigo", { || dbSkip(1), codigo } )
    LOCAL oTbc4 := TBColumnNew("Nome", { || nome } )
    // ...

Basta colocar a funcao DBSKIP() dentro do bloco.

Att.
Mauricio Portela