Eder

Ola..Hipnos...desculpa a demora em responder.. R.: funciona somente no IE e no Opera...no FF não funca.. R.: Hum..Ok.. é uma imagem de uma bola de futebol...ela sai de baixo(canto direito) e vai até o topo (canto esquerdo). mas poderia ser uma bola tipo uma gif que fica pulando ou algo parecido....só para dar uma encrementada....como já mencionei....não sou profissional da área. Grande abraço e muito grato pelas juda mais uma vez.. :blush: :) falou

beleza..amigão..deu certo muito Agradecido. abraço :)

Ola... tou tentando fazer uma filtro....mas não ta funcionando... procedure TForm1.XiButton7Click(Sender: TObject); begin while not table1.eof do BEGIN If (table1DURACAO.asString = ('%'+'B'+'%')) THEN begin Table1.edit; Table1DURACAO.Value := '00:00:00'; Table1.Post; end; Table1.next; // vai p o próximo registro end; showmessage('Alterado o Campo DURAÇÃO!'); end; O que eu queria é localizar na Table1 no campo DURAÇÃO o valor dele que tiver um "B" SE TIVER este valor ele altera e muda para ('00:00:00') neste caso se tiver assim 00122B ele altera...tendo um B no meio ele deve alterar... Mas ele passa por cima e não altera.... No campo se tiver um B ele deve mudar..e o codigo não esta reconhecendo Teria que ser com um Table pois tenho tudo em cima de uma Table...não poderá ser uma query. Grato

R.: Shiiii...carinha...não uso com tanta frequência o Delphi não...rs.....só para ter uma idéia, já fazia quase um mes que não mexia em programação....somente estes dias é que o Micheus...tava me ajudando num relatório.....que foi resolvido. Não é o meu forte não....rs mas beleza..voltando ao esqueminha do rel. depois que você respondeu este post por ultimo, lembrei que eu tinha feito algo semelhante um tempo atraz(se não me engano foi o Micheus..quem me deu os passos)....ai caiu a ficha..e bolei o esqueminha...ficando assim>| private Horas, Horas_Sumary : TTime; //variavel que trata as horas. ValorX, Valor_Sumary : Real; //variavel que trata aos valores. { Private declarations } public { Public declarations } end; var Form4: TForm4; implementation {$R *.DFM} procedure TForm4.QRBand3BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean); begin //trata as horas Horas := Horas+(StrToTime( Query1.FieldByName('DURACAO').AsString )); //trata os valores ValorX := ValorX+(StrToFloat( Query1.FieldByName('VALOR').AsString )); end; procedure TForm4.QRBand4BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean); begin {abaixo totaliza a bandSumary} //horas Horas_Sumary := Horas_Sumary + Horas; //valor Valor_Sumary := valor_Sumary + ValorX; {Abaixo Totaliza a Banda GRoupFooter de Cada um.} //horas QRHoras.CAPTION:=TimeToStr(horas); //valor QRValor.CAPTION:=FloatToStr(ValorX); end; procedure TForm4.QuickRep1BeforePrint(Sender: TCustomQuickRep; var PrintReport: Boolean); begin //zerando todas variaveis Horas := 0; Horas_Sumary := 0; ValorX := 0; Valor_Sumary := 0; end; procedure TForm4.QRGroup1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean); begin //zerando variaveis da BandaGroupFooter Horas := 0; ValorX := 0; end; procedure TForm4.QRBand5BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean); begin {Abaixo os totalizadores da BandSumary} QRHTotal.CAPTION := TimeToStr(Horas_Sumary); QRVTotal.CAPTION := FloatToStr(valor_Sumary); end; Como o relatório quebra por numero de telefone....então tenho que mostrar cada telefone e suas ligações logo após totalizar numa Group Footer e depois Totalizar no final na SumaryBand. Ai fechou....o relatorio roda certinho..... valeu..Jonas. Abraço :)

Beleza..Jonas....até ai...show.... mas no meu caso...no relatorio do quick...como eu faria? poderias dar uma exemplo :blush: Abraço

Ola... Tenho que montar um relatorio no quickreport onde mostre as horas usadas em cada numero de telefone.. eu recebi um arquivo(paradox.db)já pronto de terceiro, com todos os dados de todos os telefones....porem todos os dados estão em formato A(alphanumerico). O problema é que o campo chamado DURACAO é justamente a duração da ligação(00:00:00) O problema é como vou somar este campo...já que esta em alphanumerico.. :blush: :blush: Grato

Carinha hipnos na area Cara....te confesso que eu já estava meio que desanimado com o esqueminha :blush: Mas....amigão..deu certo...funcionou certinho.....fiquei muito contente mesmo. Não vou precisar usar o contador de algum site qualquer...... muito Grato mesmo...você me quebrou uma.... Abraço e t+ :D

Oba...Bom Dia! carinha testei seus arquivos e não deu certo.. ai testei no FF e abrir o console de erros: e deu critica de ERRO: <br /> <b>Notice</b>: Undefined variable: html_result in <b>/users/webmaster/form/contadorjs.php</b> on line <b>31</b><br /> document.write("<IMG SRC=\"./numeros//0.gif\" alt=\"0\"><IMG SRC=\"./numeros//0.gif\" alt=\"0\"><IMG SRC=\"./numeros//0.gif\" alt=\"0\"><IMG SRC=\"./numeros//0.gif\" alt=\"0\"><IMG SRC=\"./numeros//0.gif\" alt=\"0\"><IMG SRC=\"./numeros//3.gif\" alt=\"3\">"); já no Opera deu este erro pelo consolo de erros dele: JavaScript - http://www.site.com.br/form/html.html Inline script compilation Syntax error while loading: line 1 of linked script at http://www.site.com.br/form/contadorjs.php : <br / --^ Bom é isto ai...amigo... Grato t+ :)

R.: bom o servidor aonde esta o site é OPEN BSD carinha testei e não funcionou. :blush: se puderes mandar os arquivos testados por você... ai eu testo aqui....ai a gente vai ver se é aqui mesmo o problema. Grato

ola.. eu achei esta dica: Seria isto?? mas como eu uso...não to pegando o esquema... sou novato e não manjo nada de css. :blush: Grato

Ola alguém tem um exemplo para enviar de pagina a um amigo?? :blush: Grato

Ola... tem alguma maneira de imprimir somente o conteudo de uma tabela??? no caso não queria imprimir toda a pagina.....seria desnecessario. Grato

Oba..... fiz o testezinho...a critica com erro em VERMELHO é nesta Linha: Neste caso o que fazer, poir o IE e Opera rodam legam.... :blush:

Depois de várias tentativas... deu certo.. :) valeu Micheus pela solução :D Grande abraço e muito grato codigo que resolveu o problema: If Combobox1.Text = 'TODAS' then begin //determina o nr de filiais do ranking FrDbDataSet3.RangeEndCount:=StrToInt(EditNrClientes.text); TXT:= 'SELECT SUM(Valor_Frete) as VALOR_FRETE_TOTAL, '+ 'SUM(CONTADOR) AS CONTADOR_TOTAL, '+ 'SUM(KG_CALCULO) AS KG_CALCULO_TOTAL, '+ 'SUM(VALOR_N_FISCAL) AS VALOR_N_FISCAL_TOTAL, '+ 'SIGLA_CTRC AS UNIDADE '+ 'FROM ctrc '+ 'WHERE (SITUACAO_CTRC <> "C") '+ 'AND DATA_EMISSAO between :datai and :dataf '+ 'Group By SIGLA_CTRC '+ 'UNION ALL '+ 'SELECT SUM(Valor_Frete) as VALOR_FRETE_TOTAL, '+ 'SUM(CONTADOR) AS CONTADOR_TOTAL, '+ 'SUM(KG_CALCULO) AS KG_CALCULO_TOTAL, '+ 'SUM(VALOR_N_FISCAL) AS VALOR_N_FISCAL_TOTAL, '+ 'FIL_DEST AS UNIDADE '+ 'FROM ctrc '+ 'WHERE (SITUACAO_CTRC <> "C") '+ 'AND DATA_EMISSAO between :datai and :dataf '+ 'Group By FIL_DEST '+ 'ORDER BY 1 DESC'; // Esta consulta faz a totalização por unidade de origem e une resultados QueryTodas.Close; QueryTodas.SQL.Text := Txt; QueryTodas.ParamByName('dataI').AsDate := DateTimePicker1.Date; QueryTodas.ParamByName('dataF').AsDate := DateTimePicker2.Date; QueryTodas.Open; try // Criação de tabela temporária para viabilizar agrupamento por unidades TabTmp.DatabaseName := QueryTodas.DatabaseName; TabTmp.TableName := 'TmpTab.db'; TabTmp.TableType := ttParadox; if TabTmp.Exists then TabTmp.DeleteTable; TabTmp.FieldDefs.Clear; TabTmp.FieldDefs.Assign(QueryTodas.FieldDefs); TabTmp.IndexDefs.Clear; TabTmp.CreateTable; try TabTmp.Open; try // popula a tabela temporária com os dados da consulta anterior - em QueryTodas CopiaResultados(QueryTodas); finally TabTmp.Close; end; //*** AQUI FICOU O QUE PASSEI POR ÚLTIMO - INÍCIO // reaproveitamos a QueryTodas para fazer o somatório dos campos, agrupados // por UNIDADE e ordenados em ordem decrescente do campo 1 (VALOR_FRETE_TOTAL) QueryTodas.Close; QueryTodas.SQL.Clear; QueryTodas.SQL.Add('select SUM(VALOR_FRETE_TOTAL) as VALOR_FRETE_TOTAL,'); QueryTodas.SQL.Add( 'SUM(CONTADOR_TOTAL) AS CONTADOR_TOTAL,'); QueryTodas.SQL.Add( 'SUM(KG_CALCULO_TOTAL) AS KG_CALCULO_TOTAL,'); QueryTodas.SQL.Add( 'SUM(VALOR_N_FISCAL_TOTAL) AS VALOR_N_FISCAL_TOTAL,'); QueryTodas.SQL.Add( 'UNIDADE'); QueryTodas.SQL.Add('from TmpTab'); QueryTodas.SQL.Add('group By UNIDADE'); QueryTodas.SQL.Add('order by 1 desc'); QueryTodas.Open; //*** FIM *********************************** // O relatório deve mostrar os dados retornados pelo dataset QueryTodas FrReport3.ShowReport; finally QueryTodas.Close; TabTmp.DeleteTable; end; finally QueryTodas.Close; end; Application.ProcessMessages; Aguarde.visible:=FALSE; //aqui termina End; END;

Carinha...achei o motivo: seguinte como eu uso o Namo Versão 3 ele sempre põe esta linha automaticamente nos arquivos html <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN"> é esta linha que não faz funcionar no FF se eu tirar ela e substituir por esta abaixo: <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> ai funciona certinho... A minha pergunta é a seguinte.... eu já procurei de cabo a rabo no Namo e não achei aonde configura esta linha....para mudar para esta: <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> você por acaso sabe se da pra configurar ela no Namo.....ou eu vou ter sempre que editar a pagina no Bloco de notas e substituir na mão?? :blush: muito Grato

R.: ok..fico no aguardo dos arquivos.. Agradecido :)

Pessoal... estou usando este marquee numa pagina pessoal minha...ele funciona certinho no IE e Opera...mas no FF não funca. <marquee align="justify" bgcolor="#9AFF9A " direction="up" height="150" onmouseout="this.start();" onmouseover="this.stop();" scrollamount="1" width="150"> &gt;<font face="Verdana" size="1" color="navy"><b>Escreva sua mensagem aqui!<br> </b></font></marquee> mas se eu inverter...pro marquee...correr na horizontal ai funciona no FF também...mas na vertical não funca... teria alguma maneira de fazer funcionar?? Grato

R.: bom a principio queria digamos montar na pagina principal as imagens....e ai um codigo ou algo que não precisasse atualizar as outros 7 paginas.......pois seria as mesmas imagens nas outras 7 daria?? lembrando que ta tudo montadinho....só gostaria de fazer este processo.... Grato

Ola...sou novato em paginas html...uso um editor no modo design. eu tenho 8 paginas....que completam um site de uma ONG nessas paginas...tenho uma listas de patrocinadores(logomarcas) no lado direito... eu inseri todas manualmente uma a uma...mas uma vez eu ouvi falar de uma esqueminha que eu atualizo todas as 8 paginas de uma só vez....economizando mão de obra... Isto é possível?? se for, como faço isto? Grato

R.: sim..criei....o que seria a permissão 777??não seria a permissão para abrir o contador.txt e gravar?? se for...tem sim.. R.: aonde eu vejo a versão?? amigão......só sei lhe dizer que no começo deste tópico la em cima.....eu dei um exemplo usando somente o php não o html....e o exemplinho funciona certinho com php Agora só não to compreendendo como não funciona a sua dica..... ta tudo lá certinho...o contador.txt ta la dentro... você vez ai...e deu certo...deveria dar aqui também?? :blush: Grato

R.: shi.....então vou ter que rever o programa..pois esles estão espalhados.. Mas beleza...pela dica....grande abraço e obrigado.

OK...entendi...Grato :)

Tom...sabes porque eu perguntei... veja bem...tenho este codigo aqui: <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN"> <html> <head> <meta http-equiv="content-type" content="text/html; charset=iso-8859-1"> <title>teste</title> <meta name="author" content="Ederli Dias"> <meta name="generator" content="Namo WebEditor v3.0"> <style type="text/css"> <!-- BODY { scrollbar-face-color:#EFF889; scrollbar-highlight-color:#FFFFFF; scrollbar-3dlight-color:#FF8000; scrollbar-darkshadow-color:#000000; scrollbar-shadow-color:#808080; scrollbar-arrow-color:#0000A0; scrollbar-track-color:#E0E0E0; } --> </style> </head> <body bgcolor="white" text="black" link="blue" vlink="purple" alink="red"> <p align="center"><font face="Verdana" size="4"><b>teste</b></font></p> <p>&nbsp;</p> </body> </html> Note que ele coloca a barra do navegador COLORIDA....como eu fiz acima.... mas se eu deixar da maneira que ta não funciona ....a barra não fica colorida. mas se eu retirar esta linha via bloco de notas <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN"> e substituir por esta: <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> ai a barra fica colorida... poderias me explicar porque ocorre isto?? muito Agradecido

Ola...Não sou profissional da area apenas desenvolvo meu próprio WEbSite... Uso o Namo Web Edit V. 3.0 e agora tou tentando usar também o NVU V 1.0 no namo na primeira linha do html aparece assim: e no NVU aparece assim: O quer dizer estas codificações??? elas interferem no site?? Grato

Ola...Jonas. Descobri...o problema.. era um timer mesmo....mas veja que estranho......desabilitei o timer e funcionou, mas como eu precisava deste timer funcionando....eu inseri um outro timer e inseri nele o mesmo codigo...e apaguei o timer com problema...e ai funcionou.... Era um problema somente com este timer. Mas valeu...a ajuda..problema resolvido. Grato Abraço