Página 1 de 1

Duvidas com GRID

Enviado: 09 Jan 2013 22:02
por Zeca Roque
estou migrando do clipper para o Minigui e tenho dúvidas com o GRID. Meu banco de dados tem aproximadamente
140 mil registros. No exemplo que recebi o banco de dados tem aproximadamente 30 registros. Para carregar o banco
de dados com 30 registros é muito rápido, porém com 140 mil a coisa muda de figura. As dúvidas.

Como agilizar o carregamento dos 140 mil registros no GRID se isso for possivel.
Caso não dê para fazer, tem como colocar um numero de registros no GRID, por exemplo 50 apenas para preencher os
campos do GRID. Caso coloque apenas 50 registros, vai prejudicar a pesquisa no arquivo.

Não sendo tudo isto possivel, tem como usar WBROWSE ou TSBROWSE no lugar do GRID?
Como esta rotina seria feita?


Grato

José Carlos

Duvidas com GRID

Enviado: 10 Jan 2013 08:12
por jelias
Amiguinho,

Por gentileza, dê mais detalhes do ambiente. Você está usando DBFCDX ou algum SGBD?
O que é apresentado neste GRID?
Se possível, post um pedaço do código para que possamos entender como você monta o GRID. Sendo assim, será mais fácil opinar.

Saudações,

Júlio

Duvidas com GRID

Enviado: 10 Jan 2013 14:01
por Zeca Roque
Boa Tarde Jelias

Eis os retalhos do PRG

Elaborando o GRID

Código: Selecionar todos

@ 064,000 grid grid_cliente;
of form_cliente;
width 698;
height 350;
headers {'Nome','Endereco'};
widths {120,120};
backcolor _AMARELO;
fontcolor BLACK;
on dblclick Altera_Cliente()
Carregando o Grid com os dados

Código: Selecionar todos

while .not. eof()
      if substr(field->NOME,1,nTamanhoNomeParaPesquisa) == cPesq
         nQuantRegistrosProcessados += 1
         add item {clientes->nome,clientes->Endereco} to grid_cliente of form_cliente
      elseif substr(field->NOME,1,nTamanhoNomeParaPesquisa) > cPesq
         exit
      endif
      dbskip()
end
Estou modificando para browse para ver o que acontece

Grato