Ir para conteúdo
Fórum Script Brasil

Manoel Zancheta

Membros
  • Total de itens

    114
  • Registro em

  • Última visita

Tudo que Manoel Zancheta postou

  1. ok, sei que é mais trabalhoso e que é através do for mas queria saber se é através de um componente Table ou Query que faço... Se puder dar um exemplo agradeço...
  2. Olá. Desculpem-me pois acredito que as dúvidas a seguir são básicas. Preciso entrar na programação Web, estou engatinhando em PHP + MySQL. Dúvida básica: para rodar minha aplicação off-line oque tenho que fazer? Criar algum server? Qual o mais indicado? Em algumas pesquisas, vi que posso ter códigos HTML e códigos PHP juntos, então a dúvida: qual seria a diferença de um site e um aplicativo WEB em PHP? Nenhuma? Claro, sei que o site é mais voltado para divulgação de empresas/produtos, mas tecnicamente quais seriam as diferenças? Agradeço a quem possa ajudar.
  3. Olá. Precisei usar SQL Server 2005 e usei a BDE para acesso. Está tudo normal, só não estou conseguindo fazer updates nas tabelas. PS - não estou usando DBGrid nem Navigator, os dados da tabela estão num stringgrid, componente que achei mais apropriado para a aplicação em questão. Grato!
  4. Olá. Estou usando o componente Indy (TIdHTTP) e o GET só funciona na primeira chamada, na segunda dá erro d "Access violation...". Falta alguma instrução entre um GET e outro? Grato
  5. Bem observado Jhonas. A definição de índices para campos de consulta, acelera e muito as buscas. Manoel Zancheta, você não mencionou o banco de dados que está utilizando. No caso de banco de dados como SQLServer (o qual já utilizei, com TTable), o simples fato de definir na propriedade FieldsIndex o nome do campo a ser ordenado, resulta na criação de um índice temporário (no caso de que este ainda não exista). Já no caso de tabelas Paradox, o índice tem que ser criado mesmo. Abraços Opa, foi mal: - Delphi 6 - FireBird 1.5 - IBX Um abraço!
  6. Ah, este sim tá ok... Valeu campeão, um abraço!
  7. Olá. Alguém tem o componente DSPACK para me enviar? Os links que encontro na NET estão todos quebrados ou quando baixo o ZIP está corrompido. Grato!
  8. Ok Jhonas, obrigado. Vou fazer um teste hoje.
  9. Manoel .. tenho um cadastro de produtos com aproximandamente 90.000 itens e cada registro tem 18 campos... preferi usar o componente TTable com uso de indices TCadProd1.IndexDefs.Clear; TCadProd1.IndexName := 'CODPROX'; // nome do indice para o código do produto TCadProd1.IndexDefs.Update; a carga dos registros ( 90.000 )... leva 1 segundo para trazer os registros para o dbgrid... e para pesquisa usei o comando: TCadProd1.FindNearest([trim(Edit1.Text)]); este tempo está em torno de 100 milisegundos Desta maneira o seu usuário pode escolher qualquer opção de pesquisa, desde que esta opção esteja usando um indice correspondente ao campo. abraço Olá. Em qual configuração de hardware você obteve esta performance?
  10. Olá. Jhonas, meu problema não é este. Pense o seguinte, tenho um cadastro de produtos com 20.000 itens. Hoje eu carrego o DBGrid com todos os 20.000 registros (esta "carga" fica lenta em máquinas modestas), porém depois a minha pesquisa fica rápida pois está tudo na memória, então se for pro início do grid, final, rolar o grid com setas, com page up e down, fica bala. Porém, o problema é que o usuário faz várias buscas por nome seguidas e todas vez tem esta carga que é demorada. Existe algo no componente que limite a carga no mesmo parcialmente mesmo que o select tenha sido completo?
  11. Olá. Utilizo um sistema de busca aonde faço a digitação num Edit e pesquiso num DBGrid com lopartialkey. Está funcionando bem, exceto pelo fato de ficar lento a carga no DBGrid para as tabelas maiores pois já carrego todos os registro da tabela de uma vez. Existe alguma forma de carregar parcialmente os registros e ser atualizado conforme houver necessidade? Grato!
  12. Como disse anteriormente, eu já fiz este teste.
  13. Olá. Uso Delphi 6, FireBird 1.0 e IBX. Está acontecendo um problema muito estranho, ao incluir um registro em uma tabela, um campo fica sempre zerado mesmo que o valor armazenado na variável (já verifiquei isto) seja diferente de zero. Se eu atribuir o valor ao campo sem ser pela variável, grava certo. Alguma luz?
  14. Olá. Tenho uma tela que funcionar como quiosque para consultas de preços. Como devo proceder para que o cliente que usará o sistema de consulta, não tenha acesso ao desktop, Iniciar, etc, etc ficando "preso" somente à tela de consulta? Grato!
  15. Olá. Experimente um refresh: Label1.Caption:=Label1.Caption+copy(Edit1.Text,a,1); Label1.refresh; Sleep(300);
  16. Olá. Se resolveu sua "pesquisa" no Imasters fico contente. Desta forma que postei, aqui está funcionando sem problemas, talvez você tenha feito algo errado. no exemplo mencionado, entenda como uma coordenada aonde você coloca primeiro o valor da coluna (horizontal) e depois o valor da linha daquela coluna(vertical). mainmenu1.Items[2].Items[2].Enabled:= false, Como no exemplo acima, seria desabilitada a terceira opção vertical da terceira opção horizontal do menu. Lembre-se que começa a contagem em 0 e não 1, talvez este seja seu problema. Um abraço!
  17. Olá. Tente assim: mainmenu1.Items[2].Items[2].Enabled:= false; PS - segui a sequência q você colocou no post, caso não seja a mesma no seu programa, favor ajustar.
  18. Manoel Zancheta

    Consulta.

    Se não está em banco de dados a informação, em que tipo de arquivo está? (TXT, DOC, XLS, etc). Os 2 tdatetimepickers vão servir para que tipo de filtro?
  19. Bom, é que você fez uma afirmação " ... já existem dúvidas iguais a sua... ". Já tinha procurado, não tem nada não, o que tem é para identificar os usuários numa Rede Local. Mas valeu, vou pesquisar novamente, pode ser que passou algo desapercebido. Obrigado!
  20. Jhonas, a conexão é por Terminal Service, acho que você se enganou...
  21. Olá. Usando Win2003 num servidor e WinXP nos "terminais", como poderia identificar pela aplicação Delphi, os usuários conectados no servidor? Grato!
  22. Olá. Rodrigo Flores, obrigado!!!! Eis o código final, só volta valor anterior se houver clique do mouse: procedure TForm1.StringGrid1Click(Sender: TObject); begin StrConteudoAnterior := StrConteudoAtual; StrConteudoAtual:= StringGrid1.cells[stringgrid1.Col, stringgrid1.Row]; Coluna_Anterior := Coluna_Atual; Linha_Anterior := Linha_Atual; Coluna_Atual := StringGrid1.Col; Linha_Atual := StringGrid1.Row; end; procedure TForm1.FormCreate(Sender: TObject); begin Coluna_Atual := 0; Coluna_Anterior := 0; Linha_Atual := 0; Linha_Anterior := 0; StrConteudoAtual:= ''; StrConteudoAnterior:= ''; end; procedure TForm1.StringGrid1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin stringgrid1.Cells[Coluna_Anterior, Linha_Anterior]:= StrConteudoAnterior; end;
  23. Olá Rodrigo Flores. Em qual evento eu armazeno o valor atual de col e row para duas variáveis para posterior recuperação? Se armazeno no Onselectcell, quando clico com o mouse perco os valores armazenos anteriormente, isto que não estou conseguindo. Identificar em qual célula estou atualmente não é o problema. Não sei se fui claro. Seria hipoteticamente um OnExit da Célula e não do Grid. Grato!
  24. Olá. No OnExit não posso usar pois na verdade seria um clique do mouse no próprio Grid, em outra célula. Eu não estou conseguindo identificar em qual evento eu atualizo a linha, coluna e as informações, estava fazendo no OnSelectCell mas não deu certo.
  25. Olá. Seria isto? Panel1.Font.Color:= clgray;
×
×
  • Criar Novo...