Nino Marques
Membros-
Total de itens
42 -
Registro em
-
Última visita
Sobre Nino Marques
Perfil
-
Gender
Male
Nino Marques's Achievements
0
Reputação
-
Douglas_Soares a ideia q você deu é boa, mas dá forma q eu estou fazendo está fazendo exatamente oque eu quero, se: ao invés de colocar uma variavel eu der um valor já fixo: exemplo datainicial := strtodate(hoje2); datainicial := strtodate('11/08/2009'); intervalo := strtoint(diash1); >>>>> intervalo := strtoint('10'); Então assim... criei dois Edit's um que você registra o dia de hojee....e outro q registra quantos dias o usuario quer para ver o aviso!! Queria que o que o usuario escrevesse no edit fosse registrado em datainicial e intervalo....Mas da forma q fiz não deu certo.. Encima disso alguma sugestão?
-
Estou fazendo um aviso q vai ser mostrado a cada X dias... o dia de hoje e o tempo para mostrar a mensagem eu quero q seja definida pelo usuario, então criei duas variaveis e coloquei +- assim... _______________________________________________ procedure TFhd1.FormCreate(Sender: TObject); var hoje2 : string; diash1: string; begin hoje2 := dhoje.Text; diash1:= diasf.Text; end; procedure aviso; var datainicial : TDatetime; intervalo : integer; begin datainicial := strtodate(hoje2); intervalo := strtoint(diash1); if ((trunc(date - datainicial) MOD intervalo) = 0) then try Application.CreateForm(TMainform,Mainform); MainForm.Showmodal; finally FreeAndNil(MainForm); end end; ____________________________ Mas não está dando certoo... Qual seria a forma certa de fazer isso?
-
Li algumas coisas sobre tabela temporarias, e confesso que não sabia que existia esse recurso no Delphi, só que com o que li até então não sei bem como criar uma tabela dessas e enviar os dados da consulta sempre que o grafico for requerido.. Você pode dar uma mãozinha de como fazer? Grato por tudo! Abraço..
-
Seguinte... estou fazendo um programa e ele envia para um BD em access as informações de uma linha telefonica... Na tabela 'chamadas' ele guarda data(tipo data/hora) e Tempo_de_Ligação(tipo data/hora) .... Há uma segunda tabela 'grafico' que eu quero que receba o seguinte: - na primeira tabela existem varias ligações do dia 17/05, outras do dia 16/05...de diferentes datas...eu preciso selecionar todas datas iguais e somar seus tempos de ligação, para saber quanto foi usado o telefone naquele dia... Essa tabelas grafico...tem duas colunas Dia (tipo data/hora) e horastotais (tipo data/hora). Estou tentando fazer um codigo para isso com a estrutura: Select from...Group By...mas sem sucesso até agora... alguém pode me dar uma ajuda?? Abraço
-
Fazer conversão de tipos não adianta....porque o DbChart não recebe informações de uma consulta! =/ Oque será q dá p fazer?
-
Então.. Mas foi o que eu flei.....a consulta salva como tabela num é gerada automaticamente.... Ou seja sempre q entrar uma nova ligação....a tabela chamadas vai receber, a consulta também recebe...mas a tabela que provem da consulta não será atualizada...a menos q eu entre no access e crie uma nova tabela encima da nova consulta... Ai que mora o problema! =/
-
Eu só consigo alterar o tipo de dos campos de uma tabela....em uma consulta não dá p fazer eu ACHO... Se for mesmo possivel como faço?!
-
Eu consegui fazer oque eu queria atraves do Access mesmo....eu executei uma consulta com a função em SQl q estava usando...e ela me retorna os valores q eu queria mesmo.... Só q tem um problema...o formato dos resultados são todos do tipo texto.... E o DbChart só recebe do tipo numerico ou data/hora..... Eu tentei então gerar uma tabela da consulta, essa é possivel gerar, mas não se atualiza sozinha, quando a consulta pe atualizada. Oque eu posso fazer? -Tem algum comando em SQL q posso colocar q envie os dados no formato q preciso? - Existe outro tipo de grafico no Delphi, que eu possa usar? Qual seria melhor saida?
-
Nossaaa...Agoraaa entediii..... Vo pensar no que fazer agoraaaa! Brigadão! Abraço..
-
Eu entendi isso de não poder somar aqueles valores... Só q assim...se "00:01:22" já é o valor da soma dos tempo.....porque ele está tentando somar mais coisas??? porque os valores estão todos no formato hh:mm:ss mesmo....então oque pode estar acontecendo? Posso até converter tudo p segundo mas será q é mesmo necessario?! Abraço..
-
Mudei o Codigo para: DM.ADOQuery_grafico.Close; DM.ADOQuery_grafico.sql.Text := 'select '+ 'left(data, 10) as dia, '+ ' right(''0000''+cstr( (24*int(sum(Tempo_de_Ligação))) + datepart(''h'', cdate(sum(Tempo_de_Ligação)))), 2)+'':''+ '+ 'right(cdate(sum(Tempo_de_Ligação)), 5) as horastotais '+ 'from '+ 'chamadas '+ ' group by '+ ' left(data, 10) '; DM.ADOQuery_grafico.Open; Assim agora está dando o mesmo erro só q fla assim.... "exception class EConvertError whit message "00:01:22" is not a valid floating point value. Process Stop......" Esse tempo é a soma das ligações mesmo.....então creio q está somando certinho...mas não está enviando as informações para a tabela... Me dá uma mão...porque já tente de tudooo!!! ;)
-
Seguinte.... Em uma tabela tem uma coluna data e uma tempo de ligação.....elas fazem o controle de ligações de um telefone... Eu tenho outra tabela no mesmo BD q se chama Grafico...e ela precisa armazenar o tempo total de ligação por dia... Então preciso selecionar todas ligações do dia....e soma seus tempos totais e lança-los na tabela grafico.. Porque com essa tabela vou criar um grafico DBChart... Estou usando então aquela rotinaa....
-
Eu entendi que o erro seria este...mas esse é o problema, não estou encontrando erro no codigo em relação a isso... Poderia me dar uma sugestão de fazer isso de outra forma?
-
Seguinte tenho um banco de dados...ele tem armazena em uma coluna 'Tempo_de_Ligação' os tempos de gravação de um programa aki... Preciso somar todos os valores de tempo por dia..e fazer um grafico Tempo de ligação X Dia... Eu fiz assim...mas não deu certoo.. _________________________________ DM.ADOQuery_grafico.Close; DM.ADOQuery_grafico.sql.Text := 'select '+ 'left(inicio, 10) as data, '+ ' right(''0000''+cstr( (24*int(sum(Tempo_de_Ligação))) + datepart(''h'', cdate(sum(Tempo_de_Ligação)))), 4)+'':''+ '+ 'right(cdate(sum(Tempo_de_Ligação)), 5) as horastotais '+ 'from '+ 'chamadas '+ ' group by '+ ' left(inicio, 10) '; DM.ADOQuery_grafico.Open; _______________________________________ Os dados eu pego de um Bd 'chamadas' e quero enviar para um 'grafico'..... Está dando um erro assim.. "exception class EConvertError whit message "31/07/2009" is not a valid floating point value. Process Stop......" Onde será que está o problema? Abraasss
-
(Resolvido) Aviso a cada X dias...
pergunta respondeu ao Nino Marques de Nino Marques em Delphi, Kylix
PROBLEMA RESOLVIDO JÁ´!!!