Eder

valeu...muito obrigado..

oba...beleza? carinha seguinte...quando insiro uma imagem no site....ele faz com que ao abrir o site corra a imagem de uma lado do site até outro.... e no FF ele não é ativado....no IE e OP...funca direitinho... veja este linck abaixo para você ter uma noção: Click Aqui!!! Grato

Ok..jonas...fiz isto percorri o codigo e não achei problema...ai lembrei que uma vez tive um problema parecido.... então eu fiz esta dica: Sugestões: dê um Project|Build feche o projeto, renomeie (ou apague) os arquivos de mesmo nome do seu DPR mas com extensões CFG, DOF e DSK e tente novamente mesmo que o anterior,mas desta vez renomeie (ou apague) também o arquivo com extensão RES Basta apagar os arquivos:(exemplo programa redesp): *.RES *.CFG *.DOF *.DSK A princípio esses arquivos não deveriam trazer problema. Fico surpreso em saber que foi isso que resolveu. O .DSK contem a configuração do seu desktop na IDE, não tem relação direta com o projeto. O .RES geralmente contem apenas o ícone do seu programa e o número de versão (se a opção Include version information in project estiver habilitada em Project|Options, aba Version Info). O .CFG e o .DOF contem as configurações para o compilador e o linker. Não resolvi o problema, mas acho que é mais ou menos por ai.... veja o que acontece... *se eu apago estes arquivos como menciona a dica.....e ai eu abro o delphi e compilo o programa..funciona tudo certinho.....mas sem salvar....se eu salvar....ele já da o problema de novo *se eu apago estes arquivos também...e ai entro no delphi e compilo o programa...funciona tudo certinho, mas ai não resolvo salvar apenas compilar....ai quando fecho o delphi e ai executo o programa, ai fica piscando de novo.. resumindo é alguma coisa com estes arquivos.......se eu apago e não salvo funciona com o delphi aberto....mas se fecho o delphi e tente executa-lo o erro volta.... já não sei mais o que pensar.....mas acho que é por ai...mas como corrigir? Grato

Ola... pessoal...por favor poderiam me dizer porque este codigo não funciona no firefox. Testei o IE e no Opera e funciona certinho, mas no FF não funca Grato <script language="JavaScript"> <!-- function namosw_page_left(element) { if (navigator.appName == 'Netscape') { x = element.pageX; } else { x = element.offsetLeft; for (el = element.offsetParent; el; el = el.offsetParent) x += el.offsetLeft; } return x; } function namosw_page_top(element) { if (navigator.appName == 'Netscape') { y = element.pageY; } else { y = element.offsetTop; for (el = element.offsetParent; el; el = el.offsetParent) y += el.offsetTop; } return y; } function namosw_page_right(el) { wid = (navigator.appName == 'Netscape') ? window.innerWidth : document.body.offsetWidth; return wid - namosw_page_left(el); } function namosw_page_bottom(el) { hei = (navigator.appName == 'Netscape') ? window.innerHeight : document.body.offsetHeight; return hei - namosw_page_top(el); } function namosw_set_visible(el, flag) { if (navigator.appName == 'Netscape') { el.visibility = flag ? 'show' : 'hide'; } else { el.style.visibility = flag ? 'visible' : 'hidden'; } } function namosw_set_pos(el, x, y) { if (navigator.appName == 'Netscape') { el.left = x; el.top = y; } else { el.style.pixelLeft = x; el.style.pixelTop = y; } } function namosw_left(el) { return (navigator.appName == 'Netscape') ? el.left : el.style.pixelLeft; } function namosw_top(el) { return (navigator.appName == 'Netscape') ? el.top : el.style.pixelTop; } function namosw_is_relative(el) { return (navigator.appName == 'Netscape') ? el.position == 'relative' : el.style.position == 'relative'; } function namosw_is_space(c) { return (c == ' ' || c == '\t' || c == '\r' || c == '\n'); } function namosw_process_byword(list, index) { var el = list[index]; if (navigator.appName == 'Netscape') return; if (el.byword == false && el.zoom == null) return; var dest = ""; var src = el.innerHTML; var objNum = document.NamoAnimationObjects.length; var wordi = 0, i = 0, mark; while (i < src.length) { mark = i; while (i < src.length) { while (i < src.length && namosw_is_space(src.charAt(i))) i++; if (i < src.length && src.charAt(i) != '<') break; while (i < src.length && src.charAt(i) != '>') i++; if (i < src.length && src.charAt(i) == '>') i++; } dest += src.substring(mark, i); if (i >= src.length) break; dest += '<span id=\"' + el.name + 'word' + (wordi+1) + '\" style=\"position:relative\">'; mark = i; while (i < src.length && !namosw_is_space(src.charAt(i)) && src.charAt(i) != '<') i++; while (i < src.length && namosw_is_space(src.charAt(i)) == ' ') i++; if (el.byword == false) while (i < src.length && src.charAt(i) != '<') i++; dest += src.substring(mark, i); dest += '</span>'; wordi++; } el.innerHTML = dest; el.posLeft = 0; el.style.visibility = 'visible'; list[index] = namosw_new_animation_object(el.name+'word1', el.startCondObj, el.startCondTime, el.startXPos, el.startYPos, el.pathType, false, el.zoom, el.stepNum); for (i = 1; i < wordi; i++) { list[objNum+i-1] = namosw_new_animation_object(el.name+'word'+(i+1), (el.byword ? (el.name+'word'+i) : el.startCondObj), (el.byword ? 0 : el.startCondTime), el.startXPos, el.startYPos, el.pathType, false, el.zoom, el.stepNum); list[objNum+i-1].style.posLeft = 0; list[objNum+i-1].style.visibility = 'visible'; } el.startCondTime = -1; } function namosw_new_animation_object(name, obj, time, xpos, ypos, path, byword, zoom, stepNum) { var str = (navigator.appName == 'Netscape') ? 'document.'+name : 'document.all[\''+name+'\']'; var object; object = eval(str); object.name = name; object.startCondObj = obj; object.startCondTime = time; object.startXPos = xpos; // left, center, right object.startYPos = ypos; // top, center, bottom object.pathType = path; // line, arc, spiral object.byword = byword; // true, false object.zoom = zoom; object.stepNum = stepNum; return object; } function namosw_animate(str) { var live_object_num = 0; for (var i = 0; i < document.NamoAnimationObjects.length; i++) { var el = document.NamoAnimationObjects[i]; if (el.countDown > 0) { el.countDown = (0 < el.countDown-10) ? el.countDown-10 : 0; live_object_num++; continue; } if (el.countDown < 0) continue; if (el.pathType == 'line') { newx = el.sx + el.step * (el.ex - el.sx) / el.stepNum; newy = el.sy + el.step * (el.ey - el.sy) / el.stepNum; } else if (el.pathType == 'arc') { linex = el.sx + el.step * (el.ex - el.sx) / el.stepNum; liney = el.sy + el.step * (el.ey - el.sy) / el.stepNum; x = (el.ex + el.sx) / 2; y = (el.ey + el.sy) / 2; sinv = Math.sin(Math.PI*el.step/el.stepNum*(el.ex-el.sx > 0 ? -1:1)); cosv = Math.cos(Math.PI*el.step/el.stepNum); newx = ((cosv*(el.sx-x) - sinv*(el.sy-y) + x) + linex) / 2; newy = ((sinv*(el.sx-x) + cosv*(el.sy-y) + y) + liney) / 2; } else if (el.pathType == 'spiral') { sinv = Math.sin(2*Math.PI*el.step/el.stepNum); cosv = Math.cos(2*Math.PI*el.step/el.stepNum); r = (el.stepNum-el.step)/el.stepNum; newx = el.ex + (cosv*(el.sx-el.ex) - sinv*(el.sy-el.ey))*r; newy = el.ey + (sinv*(el.sx-el.ex) + cosv*(el.sy-el.ey))*r; } if (el.zoom == 'zoomin' && navigator.appName != 'Netscape') el.style.fontSize = 50+50*el.step/el.stepNum + '%'; else if (el.zoom == 'zoomout' && navigator.appName != 'Netscape') el.style.fontSize = 200-100*el.step/el.stepNum + '%'; namosw_set_pos(el, newx, newy); namosw_set_visible(el, true); if (el.step++ == el.stepNum) { namosw_set_pos(el, el.ex, el.ey); el.step = 0; el.countDown = -1; // trigger other object(self can be trigger) for (var j = 0; j < document.NamoAnimationObjects.length; j++) { var obj = document.NamoAnimationObjects[j]; if (obj.countDown < 0 && obj.startCondObj == el.name) { obj.countDown = obj.startCondTime; live_object_num++; if (i < j) { obj.countDown += 10; live_object_num--; } } } } else { live_object_num++; } } if (live_object_num > 0) window.setTimeout("namosw_animate();", 10); } function namosw_init_animation() { var i = 0; var list = new Array; list[i++] = namosw_new_animation_object('alayer1', null, 0, 'right', 'bottom', 'line', false, null, 20); document.NamoAnimationObjects = list; var length = list.length; for (i = 0; i < length; i++) namosw_process_byword(list, i); for (i = 0; i < list.length; i++) { list[i].countDown = (list[i].startCondObj == null) ? list[i].startCondTime : -1; list[i].step = 0; list[i].sx = (list[i].startXPos == 'left') ? -namosw_page_left(list[i]) : (list[i].startXPos == 'right') ? namosw_page_right(list[i]) : 0; list[i].sy = (list[i].startYPos == 'top') ? -namosw_page_top(list[i]) : (list[i].startYPos == 'bottom')? namosw_page_bottom(list[i]): 0; list[i].ex = 0; list[i].ey = 0; if (!namosw_is_relative(list[i])) { list[i].sx += namosw_left(list[i]); list[i].sy += namosw_top(list[i]); list[i].ex += namosw_left(list[i]); list[i].ey += namosw_top(list[i]); } if (list[i].pathType == 'spiral') { list[i].sx = Math.max(-200+list[i].ex, Math.min(200+list[i].ex, list[i].sx)); list[i].sy = Math.max(-200+list[i].ey, Math.min(200+list[i].ey, list[i].sy)); } namosw_set_pos(list[i], list[i].sx, list[i].sy); namosw_set_visible(list[i], false); } window.setTimeout("namosw_animate();", 10); } //--> </script>

carinha.....não sei porque..mas aqui na funca....simplimente a pagina.html carrega, mas o contador não aparece.... não da erro nada..simplismente o contador não da as caras.... será porque?? você diz que ai funcinou então aqui deveria funcionar... :blush: você fez igualzinho ai?? poderias me mandar os dois arquivos?? Grato

JOnas.......fiz uns testes e não consegui descobrir a causa...veja que estranho... eu renomeie o Menu e ai o erro sumiu....quando foi ontem a tarde o usuario me disse que o erro havia voltado.. hoje eu peguei e retirei um componente que rodada uma imagem na tela principal..e ai recompilei o programa e o erro sumiu... ai salvei...e depois abri o delphi denovo e recompilei o programa de novo ...só pra ver...e ai o erro voltou de novo..... sei lá...as vezes some....e as vezes volta do nada.... você diz que: como eu faço isto.??....sabendo que ele carrega um monte coisas..... haaa...também desabilitei todos os timer´s do programa...e adiantou na hora...mas horas depois o usuario me liga dizendo que voltou o problema.... Não sei mais o que pensar.... :blush: haaa.mais uma coisinha...quando ocorre o erro eu noto que num form aonde tem um dbcombobox(listas) quando abro o dbcombobox e deixo ele aberto..ele automaticamente fecha sozinho.....como se tivesse um vírus dentro do programa sei lá!! falou; Grato..t+

R: Oba....fiz o Testezinho somente chamando o php..... e deu este erro: Parse error: parse error, unexpected T_ECHO, expecting ',' or ';' in /users/webmaster/form/contador.php on line 29 a linha 29 é esta: echo "document.write('".$html_result."');"; R.: bom....o erro não acontece chamando o pagina.html, porem não funca.. se eu chamar agora o http:\\www.site.com.br\form\contador.php ai aparece varios erros: Warning: Unexpected character in input: '\' (ASCII=92) state=1 in /users/webmaster/form/contador.php on line 25 Warning: Unexpected character in input: '\' (ASCII=92) state=1 in /users/webmaster/form/contador.php on line 25 Warning: Unexpected character in input: '\' (ASCII=92) state=1 in /users/webmaster/form/contador.php on line 25 Parse error: parse error, unexpected T_CONSTANT_ENCAPSED_STRING in /users/webmaster/form/contador.php on line 25 bom é isto ai...se tiveres mais alguma ideia..por favor manda ver...pois preciso fazer funcionar num *.html chamando o contador.php Grato :)

amigão...não funcionou..... :blush: será que estou fazendo algo de errado, mas apenas fiz o que me sugeriu... :blush: Tens mais uma idéia?? muito Grato pela ajuda.

Não sou profissional da área... Ola....eu vi no site do terra que as Table´s são arredondadas. Como faço isto?? eu uso o NamoWeb Editor 3 e só dá pra fazer nele quadradas..... muito grato

Esta dica aqui eu fiz e deu certinho....valeu. :) Coloque na pasta do website o ícone com o nome e extensão favicon.ico. Depois adicione isso na head do seu site: HTML <link rel="shortcut icon" href="favicon.ico" /> falou

Ola... Estou com problema com o componente MainMenu1 em um programa. Do nada agora quando o usuario clicka nele e ai quando usuario fica a escolher a opção desejada ele sai fora....se fecha(MainMenu1). Ontem a tarde...eu recompilei o programa e ai o probleminha sumiu...hoje de manhã do nada voltou a ocorrer de novo..e ai nem recompilando resolve... é uma coisa muito estranha.....desabilitei todos os Timer´s do programa achando que algum deles tava ocasionando o problema, pois sempre ocorre mais ou menos uns 2 segundos após clickado no MainMenu1....as vezes nem da tempo do usuario clickar na opção desejada. alguém poderia me dar uma dica para resolver este problema? Grato

Beleza...Fernando.... eu tava tentando desta forma que você havia postado mas dava erro pois eu não colocava um ponto e vírgula(;) entre: onmouseover="this.stop();" onmouseout="this.start() valeu..muito agradecido.. t+

Ola..pessoal... Eu gostaria de saber como faço para quando o mouse passar em cima do marquee ele para e ao sair o mouse de cima ele continuar rolando o texto.. eu tou testando este codigo: <marquee bgcolor="silver" direction="up" height="150" scrollamount="1" width="150"> <font face="Verdana" size="1" color="navy"><b>Escreva sua mensagem aqui!<br> </b></font></marquee> alguém poderia dar uma ajuda?? Grato

Ola.....desculpa em responder..tava fora da empresa.. eu testei seu codigo e não funcou...... :blush: ai você diz que: R.: bom se eu entendi direito....a sua colocação....eu roda php no servidor normalmente......tanto que o exemplo acima...se tiver duas php´s o contador.php e pagina.php funciona certinho o contador...mas no seu exemplo não funcou. muito Grato

Ola..Fernando. Neste caso...qual seria a maneira mais facil para fazer um contador para que ele seja usado numa página *.htm?? Não queria usar estes gratuitos, pois eles tem propaganda e não pode haver... :blush: Grato

Ola.. pessoal peguei um esqueminha pra fazer um contador de visitas e funcionou legal, porem ele é feito em PHP, e depois é chamado em PHP(outro arquivo)..porem eu teria que chamar de um HTM, pois minha página onde será mostrada o contador de visitas é em HTM, ai ferrou não tou conseguindo chamar o PHP Este é o esqueminha que estou usando: arquivo: CONTADOR.PHP <html> <body BACKGROUND="fundo_geral.png"> <? $FILE = "contador.txt"; $IMG_DIR = "./numeros/"; $n_digitos = 4; if (file_exists($FILE)) { $fp = fopen("$FILE", "r+"); flock($fp, 1); $count = fgets($fp, 4096); $count += 1; fseek($fp,0); fputs($fp, $count); flock($fp, 3); fclose($fp); } else { echo "n consigo encontrar o ficheiro, check '\$file' var...<BR>"; exit; } chop($count); $n_digitos = max(strlen($count), $n_digitos); $count = substr("0000000000".$count, -$n_digitos); $digits = preg_split("//", $count); for($i = 0; $i <= $n_digitos; $i++) { if ($digits[$i] != "") { $html_result .= "<IMG SRC=\"$IMG_DIR$digits[$i].gif\">"; } } ?> <br> <?php echo $html_result; ?> </body> </html> arquivo que chama este *.php pagina.php codigo abaixo: <?php require 'testando.php'; ?> beleza...se eu uso tudo *.php funciona certinho...porem eu tenho que chamar de um *.htm por isto estou aqui...tem alguma maneira diferente que resolva meu problema?? não gostaria de usar de contadores gratuitos, pois trazem propaganda...... Grato

R.: Oba Micheus...Bdia.. Este arquivo eu bauxei...mas ele esta com problema......parece corrompido. :blush: Haaa...não consegui responder a sua mensagem privada...mas entendi e já fiz o que me pediu... :) valeu

R> Jonas..o programa roda no servidor e as máquinas são diferentes sim, processados, memória etc...e os dados não importa pode ser de um dia....já dá problema.... R> Micheus...eu até pensei nesta dica...mas o problema é outro não da erro..... mas acabamos descobrindo.....é que o programa já esta bem pesadão....e descobrimos que era pau de memória...trocamos o pente de memória e resolveu....pelo menos não apresentou mais o problema... agora vamos esperar pra ver.....é que ele já tem dados desde 2003....tenho que fazer uma manutençao e migrar parte destes dados, mas o problema é tempo...rs. valeu..pessoal abraço t+

R: ok.. R: sim..antes de começar sem codigo ela é aberta veja: .... QueryTodas.ParamByName('dataI').AsDate := DateTimePicker1.Date; QueryTodas.ParamByName('dataF').AsDate := DateTimePicker2.Date; QueryTodas.Open; //aqui começa micheus try //TabTmp.DatabaseName := QueryTodas.DatabaseName; TabTmp.DatabaseName := 'c:\temp'; // ou 'c:\windows\temp' TabTmp.TableName := 'TmpTable.db'; TabTmp.TableType := ttParadox; .... R: não esta criando o arquivo temporaria...veja o erro: TABLE DOES NOT EXIST. FILE: C:\TEMP\TMPTABLE.DB SEGUE baixo como esta a parte do seu codigo: .... QueryTodas.ParamByName('dataI').AsDate := DateTimePicker1.Date; QueryTodas.ParamByName('dataF').AsDate := DateTimePicker2.Date; QueryTodas.Open; //aqui começa codigo micheus try //TabTmp.DatabaseName := QueryTodas.DatabaseName; TabTmp.DatabaseName := 'c:\temp'; // ou 'c:\windows\temp' TabTmp.TableName := 'TmpTable.db'; TabTmp.TableType := ttParadox; TabTmp.Open; TabTmp.Close; // TabTmp.DeleteTable; TabTmp.FieldDefs.Clear; TabTmp.FieldDefs.Assign(QueryTodas.FieldDefs); TabTmp.IndexDefs.Clear; // TabTmp.IndexDefs.Add('', 'UNIDADE', [ixPrimary]); // TabTmp.IndexDefs.Add('FRETE_TOTAL_IDX', 'VALOR_FRETE_TOTAL', [ixDescending]); TabTmp.CreateTable; // TabTmp.IndexName := 'FRETE_TOTAL_IDX'; TabTmp.Open; Try CopiaResultados(QueryTodas); FrReport3.ShowReport; finally TabTmp.Close; TabTmp.DeleteTable; end; finally QueryTodas.Close; end; Application.ProcessMessages; Aguarde.visible:=FALSE; end; //aqui termina parte do Micheus FrReport3.ShowReport; Application.ProcessMessages; Aguarde.visible:=FALSE; end; Grato t+ Abraço

Ola..pessoal Estou com um problema que não sei por aonde mais tentar resolver. Seguinte.....tenho um programa em rede(paradox) e 5 usuarios usam o mesmo... mas tem uma maquina que não Gera nenhum relatorio......simplismente o usuario clika no botão e nada acontece....o programa não trava...mas também não gera relatorio, simplismente não acontece nada...nenhuma mensagem. o estranho é que se eu colocar pra gerar num periodo que sei que não tem dados, ele volta e me diz que não tem dados para o periodo selecionado, isto quer dizer que ele ta tentando montar o relatorio.. quando digito um periodo que sei que tem dados, ele não me mostra. O mais estranho é que só acontece este problema numa maquina, os outros usuarios operam normalmente, gerra rel. e tudo. Outra coisinha também tenho um outro programa também em rede usado por mtos usuarios, ou seja nas mesmas condições que este anterior, e imprimi certinho..tudo funciona.....em todas as maquinas inclusive nesta que esta com problema. alguém tem alguma ideia do que pode estar acontecendo?? será memoria?? ou outra coisa?? Grato

valeu...JOnas..resolvido. Grato :)

R.: Ola..fiz o que você me sugeriu.....e não deu certo não, alias o erro deu que o arquivo não existe: Table does not exists: TmpTable.db ele não cria o arquivo.... :( parte do codigo testado: //aqui começa codigo Micheus, menos a procedura que esta acima... try TabTmp.DatabaseName := QueryTodas.DatabaseName; TabTmp.TableName := 'TmpTable.db'; TabTmp.TableType := ttParadox; TabTmp.Open; TabTmp.Close; TabTmp.DeleteTable; TabTmp.FieldDefs.Clear; TabTmp.FieldDefs.Assign(QueryTodas.FieldDefs); TabTmp.IndexDefs.Clear; //TabTmp.IndexDefs.Add('', 'UNIDADE', [ixPrimary]); //TabTmp.IndexDefs.Add('FRETE_TOTAL_IDX', 'VALOR_FRETE_TOTAL', [ixDescending]); TabTmp.CreateTable; //TabTmp.IndexName := 'FRETE_TOTAL_IDX'; TabTmp.Open; Try CopiaResultados(QueryTodas); FrReport3.ShowReport; finally TabTmp.Close; TabTmp.DeleteTable; end; finally QueryTodas.Close; end; Application.ProcessMessages; Aguarde.visible:=FALSE; end; //aqui termina codigo Micheus... FrReport3.ShowReport; Application.ProcessMessages; Aguarde.visible:=FALSE; end; :blush:

Ola. :) TabTmp.IndexName := 'FRETE_TOTAL_IDX'; grato t+

R: Carinha....era esta a ideia que eu tinha em mente, porem não imaginava que era possível mapear uma unidade na própria máquina a ser executada(no caso o próprio servidor). até brinquei com um amigo meu, pois fui fazer esta pergunta a ele, sobre mapear a pasta no servidor(já que nas estações de rede a gente entra na REDE e depois mapeia), e o camarada zombou de mim...rs.. Mas beleza..deu certo, primeiro já pra ficar certinho apaguei no servidor a nas estações todos os *.lck e *.net e depois mapeie e testei, funcionou...corretamente. valeu..Grato. abraços

também não resolveu... Bom...se alguém souber como posso condensar esta impressora no máximo por favor me deu uma dica, estou a algum tempo pra resolver este problema e não tou conseguindo.... o condensado dela...esta meio grande, preciso de algo que condense mais..... Grato