Clipper On Line • Ver Tópico - Grid

Grid

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

Postar uma resposta
 

Grid

Mensagempor rcb2002 » 06 Jan 2012 09:34

Mais uma pergunta:
Nunca consigo colocar valores na primeira linha do Grid (isso não acontecia antes). Na primeira informação e ele estando em branco, ao invés de preencher a primeira linha do Grid, começa pela segunda. A partir daí, segue normalmente. O trecho do código é esse aí:

IF !EMPTY(Fm_Orca.Text_2.Value)
   IF !EMPTY(Fm_Orca.Text_4.Value)
      ADD ITEM {   "" , ;
         Fm_Orca.Text_2.Value, ;
         ALLTRIM (STR (Fm_Orca.Text_4.Value)), ;
          ALLTRIM( STR( ROUND(Fm_Orca.Text_3.Value,2))), ;
          ALLTRIM( STR( ROUND(nTTParcial,2))), ;
         Fm_Orca.Text_1.Value } ;
      TO Grid_1 OF Fm_Orca
      Fm_Orca.Text_15.Value := ALLTRIM ( STR (ROUND(nTTGeral,2) ))
      Fm_Orca.Label_5.Value := ALLTRIM ( STR (ROUND(nTTGeral,2) ))

      Fm_Orca.Text_14.Value := ""
      Fm_Orca.Text_1.Value  := ""
      Fm_Orca.Text_2.Value  := ""
      Fm_Orca.Text_3.Value  := ""
      Fm_Orca.Text_4.Value  := 0
      Fm_Orca.Text_14.SetFocus
   ELSE
      MSGINFO ( "Preencha a QUANTIDADE!", "Atenção:" )
   ENDIF
ELSE
   MSGINFO ( "Produto não encontrado!", "Atenção:" )
ENDIF


Grato mais uma vez.
rcb2002
Usuário Nível 2

Usuário Nível 2
 
Mensagens: 57
Data de registro: 19 Jan 2010 22:16
Cidade/Estado: Salvador
Curtiu: 0 vez
Mens.Curtidas: 1 vez
Voltar ao topo

Grid

Mensagempor Pablo César » 06 Jan 2012 10:43

Assim com tão pouco código não dá para ter uma visão geral da coisa. Na minha opinião, faltou mostrar como você compõe a matriz, se ela está vazia ou como você criou. Se o primeiro registro do Grid nunca é adicionado, é porque ja deve existir um vazio (estou chutando, não dá pra saber sem o código desse módulo).
Um clip-abraço !

Pablo César Arrascaeta
Compartilhe suas dúvidas e soluções com todos os colegas aqui do fórum.
Evite enviar as dúvidas técnicas por MPs ou eMails, assim todos iremos beneficiar-nos.
Avatar de usuário

Pablo César
Usuário Nível 7

Usuário Nível 7
 
Mensagens: 5312
Data de registro: 31 Mai 2006 10:22
Cidade/Estado: Curitiba - Paraná
Curtiu: 142 vezes
Mens.Curtidas: 152 vezes
Voltar ao topo

Grid

Mensagempor Toledo » 06 Jan 2012 10:53

Amigo, o que pode estar ocorrendo é que o Grid já tá vindo com um item vazio, então tenta deletar todos os itens do grid antes. Use o comando DELETE ITEM ALL FROM Grid_1 OF Fm_Orca antes de adicionar os itens no Grid.

Abraços,
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
Avatar de usuário

Toledo
Administrador

Administrador
 
Mensagens: 3038
Data de registro: 22 Jul 2003 18:39
Cidade/Estado: Araçatuba - SP
Curtiu: 263 vezes
Mens.Curtidas: 258 vezes
Voltar ao topo

Grid

Mensagempor rcb2002 » 06 Jan 2012 14:46

Cara, voces sao mesmo um oraculo. Resolvido o problema que persistia a meses!!!
Mais uma vez, obrigado. Agora so falta uma e eu me aquieto!
rcb2002
Usuário Nível 2

Usuário Nível 2
 
Mensagens: 57
Data de registro: 19 Jan 2010 22:16
Cidade/Estado: Salvador
Curtiu: 0 vez
Mens.Curtidas: 1 vez
Voltar ao topo
Postar uma resposta


Retornar para MiniGui

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 13 visitantes

Mudar para estilo Celular

Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Traduzido por phpBB Brasil
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro
Conversão Sistema Clipper para Harbour - Você tem um programa desenvolvido em Clipper e quer atualizar ele para executar em versões mais recentes do Windows (7, 8, 10, etc)? Então o melhor caminho é converter seu programa Clipper para Harbour. Clique aqui para mais detalhes.