Jhonas

Isso significa que o comando de preenchimento do campo não está indo para onde deveria... ele este indo para outra parte da pagina ..ou então pode ser bug do componente .... delete-o do form e coloque-o novamente e veja o que ocorre abraço

Na verdade a Placa Mãe Pcchips Socket 462 M863g suporta processadores Amd, Sempron, Athlon e Duron mas não aceita processador dual core. http://pcchipsusa.com/prod-m863gv51a.asp no meu pc está escrito o seguinte: AMD Athlon™ MP 1.20 Ghz Este processador não é um Semprom abraço

somaEntTot := somaEntDin + somaEntChe + somaEntPre + somaEntCar + somaEntOut + somaEntAbe + somaEntSan + somaEntSup; somaSaiTot := somaSaiDin + somaSaiChe + somaSaiPre + somaSaiCar + somaSaiOut + somaSaiAbe + somaSaiSan + somaSaiSup; totalGeral := (somaEntDin + somaEntChe + somaEntPre + somaEntCar + somaEntOut + somaEntAbe + somaEntSan + somaEntSup) - (somaSaiDin + somaSaiChe + somaSaiPre + somaSaiCar + somaSaiOut + somaSaiAbe + somaSaiSan + somaSaiSup); Primeiro voce pode simplificar isso: totalGeral := somaEntTot - somaSaiTot; Não estou com o Rave no momento, mas procure jogar o valor de cada variavel somaEntDin, somaEntChe, somaEntPre, somaEntCar ... etc em um componente Label no Rave abraço

o programa ate abre mais a janela não carrega. alguém pde me ajudar? O comando deveria ser este: abraço

select * from MovimentoObra where Data_Obra between :data_inicio and :data_final and funcionario = 'Fulano de Tal' order by Data_Obra ou ainda com parametros select * from MovimentoObra where Data_Obra between :data_inicio and :data_final and funcionario = :Func' order by Data_Obra Botão de pesquisa: QryPesqData.Close; QryPesqData.Params[0].AsDateTime:= pesqData1.Date; QryPesqData.Params[1].asDateTime := pesqData2.Date; QryPesqData.Params[2].asString := Edit1.Text; // Nome do funcionario QryPesqData.Open; abraço

Se voce não precisar usar o quickreport , é possivel usando o componente VDOPrint para impressão direta abraço

um erro de violaçao de chave primaria, significa dizer que um campo utilizado como chave primaria não pode ter registros duplicados para evitar isso voce pode montar uma rotina de tratamento exemplo: try // seu código ... exception on e: .... do begin // faça alguma coisa.... end; end; Maiores informações: http://www.fop.unicamp.br/informatica/inde...8&Itemid=36 http://mail.firebase.com.br/pipermail/list...ary/038557.html abraço

Veja neste endereço http://delphi.about.com/od/kbthread/a/query_threading.htm download do exemplo http://clk.about.com/?zi=18/1Pp&sdn=de...dothreading.zip abraço

exemplo de uso http://siaconsult.forumeiros.com/artigos-f...doprint-t12.htm forum especifico para o VDOPrint http://vdo.sourceforge.net/forum/viewforum...0297b57ab63050c OBs: se voce olhar na propriedade Paper, vera Columns e Lines que poderá alterar abraço

Voce tera que criar um sistema assim já te passei o endereço de um tutorial para voce ler http://undercode.wordpress.com/tutoriais/ abraço

Já que voce quer aprender ... leia este tutorial http://undercode.wordpress.com/tutoriais/ abraço

Nesta sua select voce usou distinct na outra voce usou * ... de qualquer modo faça um teste ... execute a sql pelo firebird e veja o resultado ... depois coloque a mesma sql no componente e execute ... voce deverá encontrar os mesmos resultados caso não sejam os mesmos, então pode ser bug de componente... neste caso delete e coloque-o novamente no form abraço

Observe com calma o resultado desta select .... para cada registro na tabela pai ele vai trazer N registros da tabela filha que estarão ordenados pela data da tabela filha sugiro então voce ordenar pelo codigo e data da tabela pai .. desta maneira a tabela filha será ordenada tambem pelo codigo e data relacionados a tabela pai abraço

Veja a idéia é a mesma quando voce usa o DBNavigator 1 - botão inserir : dmdados.tblFerramentas.Last; dmdados.tblFerramentas.Append; dmdados.tblFerramentas.Edit; 2 - botão Alterar : dmdados.tblFerramentas.Edit; 3 - botão Deletar : dmdados.tblFerramentas.Delete; Veja que para os botões 2 e 3 voce deve fazer uma pesquisa nos registros e escolher aquele que voce quer Alterar ou Deletar DM.<nomeTable>.first = vai para o primeiro registro; DM.<nomeTable>.prior = move o ponteiro para o registro anterior; DM.<nomeTable>.next = move o ponteiro para o proximo registro; DM.<nomeTable>.last = vai para o último registro; DM.<nomeTable>.Insert; // para inserir os dados DM.<nomeTable>.Edit; // para que a Tabela entre em modo de edição DM.<nomeTable>.Post; // para salvar os dados DM.<nomeTable>.Cancel; // para Cancelar a operação realizada no momento DM.<nomeTable>.Delete; // para excluir os dados O DBNavigator funciona desta maneira DBNavigator.BtnClick(nbxxx); onde xxx será: first = vai para o primeiro registro; prior = move o ponteiro para o registro anterior; next = move o ponteiro para o proximo registro; last = vai para o último registro; insert = insere um novo registro na tabela; delete = apaga o registro atual; edit = edita o registro atual; post = confirma a edição ou inserção de um novo registro; cancel = cancela a operação (edit, insert); refresh = atualiza a tabela de registros; Pode ver que é a mesma coisa, só que um é executado atraves do componente DBNavigator e o outro é atravez de botões ( Bitbtn ou Button ) abraço

De um exemplo de como estará esta lista no txt

Coloque no Evento OnKeyPress do Edit e não precisara da outra rotina abraço

O amigo Douglas_Soares já te passou uma maneira... os arquivos já estão em uma lista ou voce vai selecionar quais deles entrarão na lista ? se voce vai baixar de uma pagina de um site ... então voce terá que usar o componente WebBrowser abraço

juro q se funcionar paro de encomodar Ok ... vou colocar do jeito que voce precisa procedure TFSelecionaAnimais.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin if (gdSelected in state) then // Sem codigo else DBGrid1.Canvas.Font.Color:= clBlack; DBGrid1.Canvas.FillRect(Rect); DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State); end; OBS: Deixe a propriedade dgRowSelect como true ( voce não vai ver o foco na celula apenas o triangulo no canto esquerdo ) abraço

Faça esta mudança: procedure TFSelecionaAnimais.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin if gdFocused in State then with dbgrid1.Canvas do begin Font.Color:=clBlack; Canvas.FillRect(Rect); end; DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State); end; abraço

Uma sugestão: Abra o arquivo texto no Excel e tente tabular os campos .. depois se conseguir, salve este arquivo como DBF 4 (DBase IV) (*.DBF) Se ainda quiser, pode usar o Datapump do delphi para converter para outro banco de dados DB ( paradox ) ou GDB ( Interbase/Firebird ) etc Fica mais facil trabalhar com uma tabela do que com um arquivo texto abraço

Eu estou te apresentando uma solução select * from SaidaPai, SaidaProduto where SaidaPai.cod = SaidaProduto.cod order by SaidaPai.data Voce é que deve ver se vale a pena mudar abraço

O usuário saberá que os registros selecionados estão com uma bolinha preta no registro e não com um triangulo preto abraço

Exemplo de ligação com 2 tabelas SELECT Clientes.NOME, Clientes.COD, Clientes.RUA, Clientes.BAIRRO, Clientes.CIDADE, Clientes.UF, Clientes.TELRES, Clientes.TELCOM, Clientes.CEP, Clientes.CPF, Clientes.RG, Clientes.CONTATO, Clientes.EMAIL, Clientes.DATA, Clientes.PESSOA, Moviment.NUM, Moviment.DATA, Moviment.PR_VENDA, Moviment.QTDE_VEND FROM Clientes INNER JOIN Moviment ON (Clientes.COD = Moviment.CODCLI) ORDER BY Clientes.DATA Se voce não sabe usar Query faça uma busca no forum ... tem varios tópicos sobre o assunto abraço

que tipo de operação é esta ? (24*int(sum(Tempo_de_Ligação))) "exception class EConvertError whit message "00:01:22" is not a valid floating point value. Process Stop......" (24*int(sum(00:01:22))) /// entendeu o que está ocorrendo ? abraço

Então voce terá que usar o componente Query ou IBQuery para isso e não Table ou IbTable Voce terá que montar uma instrução na SQL seria um exemplo parecido com este Select * from saidapai, saidaproduto whre cod = saidaproduto.cod order by data abraço