Browse com ADO

Aqui você poderá oferecer suas Contribuições, Dicas e Tutoriais (Texto ou Vídeo) que sejam de interesse de todos.

Moderador: Moderadores

Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Browse com ADO

Mensagem por JoséQuintas »

Só um acréscimo:
A vantagem de usar uma lista, por exemplo:

Código: Selecionar todos

oTBrowse := { ;
   { "DATA", { || rs:FIelds( "DATA" ):Value } }, ;
   { "DIAS", { || rs:Fields( "DIAS" ):Value } }, ;
   { "NOVA", { || rs:Fields( "DATA" ):Value + Rs:Fields( "DIAS" ):Value } }, ;
   { "OUTRO", { || Rotina3() } } }
Talvez leve um tempo pra acostumar com essa separação.
É um array {}
E dentro outro array { a, b }
primeiro elemento é o título
segundo elemento é um codeblock { || conteudo }
justamente no conteúdo coloca o que quiser, não está preso a existir na consulta.
Então NÃO precisa incluir tudo da consulta, e pode acrescentar mais coisas ainda.

Isso mostra que automático é bom, mas colocar lista é muito melhor.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Responder