Ir para conteúdo
Fórum Script Brasil

Denispe

Membros
  • Total de itens

    6
  • Registro em

  • Última visita

Tudo que Denispe postou

  1. A Tabela tem mais de 2000 registros de Clientes, mas no DBGrid só aparecem 54 devido a uma (condição imposta) Select: DM.ADODataSet2.Close; DM.ADODataSet2.CommandText:='select count(*) from cliente where inadiplente =1 and jurrazaosocial <>' + QuotedStr(''); DM.ADODataSet2.Open; com o resultado desse Select só filtramos 54 Registros dos 2000 registrado na tabela, e exibe os 54 no DBGrid eu desejo justamente enumerar no DBGrid esses 54 Clientes.
  2. Queria apresantar essa numeração em um campo no DBGrid ao lado do nome do cliente.
  3. Recife obrigado pela ajuda mas usando o "N:= dataset.recordcount;" iria me retornar apenas a quantidade de clientes do DBGrid e na verdade eu desejo enumerar os tais registros exemplo: 1--Sined 2--Francisco 3--Raquel 4--Fabiana 5--Juliana . . . 54--Priscila
  4. Boa tarde existe alguma forma de listar os registros (linhas) de um DBGrid em tempo de execução ou seja sem registrar na tabela uso o Banco SQL Server 2000 usando ADODataSets pra pra pesquisar tenho uma tabela com 2000 clientes, faço uma pesquisa que só me retornam no DBGrid só 54 Clientes gostaria então de no DBGrid me enumerasse esses 54 pesquisando aqui mesmo no forum achei isso aqui: Var N:integer; begin N:=1; DM.ADODataSet1.First; while not Dm.ADODataSet1.Eof do begin DM.ADODataSet1Enumere.value := N; N:= N+1; DM.ADODataSet1.next; end end; end. Mas como podem perceber isso não só me enumerou toda a tabela como também as registrou na mesma, eu gostaria que só enumerasse os Clientes que estão no próprio DBGrid sem registrar na própria tabela.
  5. Recife isso resolveu meu problema muito obrigado! Pensei que realmente a sintaxe estivesse errada.
  6. Bom-dia, eu sempre usei a seguinte sintaxe para alterar valor porém todos os valores até então eram representados por valores String, porém agora preciso alterar um valor float, agradeço desde já. O Banco usado é SQL 2000. DM.ADOQuery1.Close; DM.ADOQuery1.SQL.Add('Update ContasPagar Set Valor=' + (EditVal.Text)+ 'where titulo ='+ QuotedStr(EditNF.Text)); DM.ADOQuery1.ExecSQL; PS.: Entrando até mesmo com valor inteiro tipo "8000" ele passa porém ao colocar um float tipo "8000,64" não passa :huh: !
×
×
  • Criar Novo...