Ir para conteúdo
Fórum Script Brasil

maikel

Membros
  • Total de itens

    151
  • Registro em

  • Última visita

Tudo que maikel postou

  1. Olá Depende do que você quer editar. O programa utilizado para editar relatório com a extensão *.rav é o Rave Reports, que acompanha instalaçao do Delphi ou pode ser baixado no site da Nevrona (www.nevrona.com), porém precisa ter um certo conhecimento para alterar este arquivo, identificar as orgines dos campos que são exibidos, agrupamentos, entre outras particularides que o sistema oferece. Att
  2. Olá Não é exatamente a solução pro seu problema, mas o conteúdo do post já lhe inicia o caminho para que crie os nós e subníveis na estrutura da sua treeview. http://maikelscheid.blogspot.com/2009/05/e...reeview_06.html O resto é colocar a lógica pra funcionar e mãos na massa. Att
  3. Essa DLL está faltando no seu Windows... faça o download da mesma na internet (procure por LIBMYSQL.DLL que irá encontrar) e salve a mesma em C:\Windows\System32 Isso já irá resolver seu problema Att
  4. Bom, eu também já procurei por uma apostila que me ensinasse algumas rotinas de rave language mais complexas, mas como voce disse, é dificil de encontrar material completo sobre o assunto na internet. consegui encontrar dicas muitos interessantes na página da nevrona... na seção "Dicas e Truques"... veja no link http://www.nevrona.com/Products/RaveReport...71/Default.aspx Acho mais fácil você procurar em específico o código que você precisa.... vai encontrar antes a informação. Att
  5. Bom, mas qual critério você usa para dizer se um número é ou não aproximado? Com base em que você diz que 5436 é aproximado de 5490? você tem algum percentual, se o numero se aproximar mais de 90% entra na condição if, senão não? Se você usar essa porcentagem, você pode efetuar um calculo para saber a diferença.... e em cima disso vai ter um intervalo de valores que podem ser comparados... por exemplo... se estiver nos 90% o intervalo seria de 4941 até 6039.... Att
  6. Que componentes você está utilizando? Tem algum código no DataSource ou eventos de criação ou OnShow do formulário? Se você postar sua rotina aqui fica mais fácil de lhe ajudar.... Os fields no seu componente de busca estão como ReadOnly (Fields no ClientDataSet, Query ou outros componentes)? Att
  7. Bom, nunca usei dessa forma com uma linha abaixo da outra, mas sim, todos os filtros na mesma linha separados pelo AND.... onde seu código deveria ficar assim: DMdados.TBCadOrServ.Filtered := False; DMdados.TBCadOrServ.Filter:='vcert='+QuotedStr('N')+' AND vrtt='+QuotedStr('N')+' AND vrim='+QuotedStr('N')+' AND veos='+QuotedStr('N')+ ' AND vfat='+QuotedStr('N')+ ' AND vgraf='+QuotedStr('N'); DMdados.TBCadOrServ.Filtered:=True; Faça esse teste e veja se não resolve seu problema... Att
  8. Bom, se a sintaxe da procedure a ser declarada está correta, lógicamente as teclas Ctrl + Shift + C deveriam funcionar, sem a necessidade de nenhuma biblioteca em específico. você está declarando a procedure dentro da seção private? Consegue postar o inicio da unit onde aparece o nome do formulário e a forma de como você está tentando declarar a procedure? Att
  9. Verificou o firewall da máquina na qual está tentando se conectar? e se usar a porta 3050? Declare no DataModule onde se encontra o SQLConnection a uses MidasLib, incorpora a dll direto ao executável. Tente usar o nome da máquina ao invés do IP <Nome>:<caminho> Att
  10. Deixei, referente a esta configuração um post no meu blog Mostro como utilizar, configurar o SQLConnection e criar o arquivo .INI Se quiser dar uma olhada, acessa ai http://maikelscheid.blogspot.com/ Att
  11. Bom, quando você coloca o componente na tela faz a configuração normal dele.... pode setar uma base de dados a ser utilizada enquanto desenvolve (modo design).... define nome da conexão... dll a ser utilizada... drivers, etc, tudo normal. A única coisa que muda, é que em tempo de execução ele irá utilizar as configurações contidas no arquivo *.ini ou *.conf conforme você criar. Att
  12. Olá Uso o componente SQLConnection da paleta DBExpress e faço a configuraçao utilizando um arquivo *.ini Para rodar nas estaçoes de rede, basta usar o endereço IP do servidor onde sua base está hospedada, e até, poderá setar uma porta pela qual o firebird irá se conectar, assim: IP/porta:C:\<seu banco> 192.160.10.100/3050:C:\Banco\banco.fdb No SQLConnection, usa um código semelhante ao seguir no evento OnBeforeConnection (mas deixe o connected sempre como false): procedure TDM.CONEXAOBeforeConnect(Sender: TObject); var Arquivo: TIniFile{uses IniFiles}; begin Try Arquivo:= TIniFile.Create(ExtractFilePath(Application.ExeName)+'CONF.ini'); with DM.CONEXAO do begin Params.Values['DATABASE'] := Arquivo.ReadString('DADOS','DATABASE',''); Params.Values['USERNAME'] := Arquivo.ReadString('DADOS','USERNAME',''); Params.Values['PASSWORD'] := Arquivo.ReadString('DADOS','PASSWORD',''); Arquivo.Free end; Except ShowMessage('Não foi possivel conectar! Nenhum servidor disponível...'); End; end; Seu arquivo conf.ini deverá ser semelhante a este, no mesmo diretório que o executável do sistema: [DADOS] DATABASE=192.160.10.100/3050:C:\Banco\banco.fdb USERNAME=SYSDBA PASSWORD=********* Assim, você desenvolve o sistema na sua estação local e sai para instalação apenas editando o caminho da base de dados no arquivo .ini Att
  13. maikel

    Importar dados

    Bom, vou te sugerir duas formas, ai você ve qual fica melhor para se desenvolver e implementar. 1 - Exporta as informações de uma base de dados para Script usando um SGDB, e depois apenas roda o script de importação dos dados na outra base 2 - Você pode em Delphi, fazer um sistema com dois componentes de conexão, um ligado à base de dados access e outro à base de dados MySQL. Ai você codifica os campos pra ir percorrendo a base de registro por registro e vai inserindo na nova base.... Ve qual fica melhor... Att
  14. maikel

    Consulta

    Olá Você quer puxar informações de outros forms, seguem 2 formas: 1 - Utilize o atalho Alt + F11 e adicione o form de onde quer puxar informações. No código agora, digamos que tem as informações no Label do form principal, então você faria assim: lblNome.Caption := FormPrincipal.LblNomeUsuario.Caption; 2 - Cria uma property no form principal, em public digite: property pNomeUsuario : String;{use Ctrl + Shift + C} Ai no form principal, você atribui o valor a propriedade: pNomeUsuario := 'Seu Nome'; e no form onde você quer mostrar, usa Alt + F11 para encontrar o form e depois faz assim: lblNome.Caption := formPrincipal.pNomeUsuario; Qualquer coisa, post ai Att
  15. Olá Bom, talvez explique mais detalhadamente a estrutura que você tem no seu sistema para ficar mais fácil de lhe ajudar, mas em relação ao relatório, creio que será apenas para exibir o mesmo na tela... então, use o Rave Reports ou Quick Reports, relacionado a um ClientDataSet ou Query. Procure na internet, tem vários materiais bons que mostram um passo-a-passo de como criar relatórios utilizando esta ferramenta. Para o login, você precisará ter uma tabela de cadastro de usuários e permissoões. No seu formulário, faça uma verificação que compara a senha e usuário digitado com as informações do banco. Verifique também se o tipo é administrador ou usuário normal e faça a implementação de permissões na sua aplicação de acordo. Se quiser algo mais complexo para controle de usuários, sugiro que de uma olhada no componente UserControl (http://www.usercontrol.net). Obs.: Cuidado com o titulo dos seus tópicos, seja mais objetivo e coloque o mesmo relacionado a sua dúvida. ;) Att
  16. Bom, deve ter várias formas de se verificar isto, usando APIs do Windows ou, determinando um espaço de tempo e percorrer a lista de processos do Windows. Tipo, faz uma função que a cada X segundos verifica os processos, caso o processo desejado seja encontrado, mantenha seu sistema rodando, e se não encontrar o processo específico, finaliza sua aplicação. De uma verificada no google, ou na busca do fórum aqui, há funções para retornar a lista de processos. Att
  17. maikel

    Filtrar Rave Report

    Olá Mas em que momento você faz o filtro no Delphi? O rave irá mostrar os registros na forma como se encontram na Query, sendo que o componente RvDataSetConnect deverá estar ligado a esta mesma Query que você está filtrando. Veja como eu faria este filtro baseado no seu exemplo: //Supondo que o RvdataSetConnect esteja ligado ao QueryDados, teria: if key = vk_F3 then begin Serie2 := Serie.Text; // Aqui a variável recebe o período pesquisado QueryDados.Filtered := False; QueryDados.Filter := 'Paramentro de busca do Filtro'; QueryDados.Filtered := True; DMIB.RvProjAlunos.Close; DMIB.RvProjAlunos.SetParam('Serie2', serie.Text); // Essa propriedade setParam é a responsável por // passar o parâmetro do delphi para o Rave. DMIB.RvProjAlunos.ProjectFile:='C:\CadAlunos\RelAlunos.rav';{--> Usa a propriedade StoreRav do RvProject e incorpora o RelAlunos.rav ao projeto} DMIB.RvProjAlunos.Open; DMIB.RvProjAlunos.Execute; end; Se estiver fazendo algum outro filtro no rave, explique como está fazendo para que fique mais fácil lhe ajudar. Att
  18. Olá Tenho interesse em saber mais detalhes sobre as atividades. Sou programador Delphi a 5 anos, experiências com diferentes tipos de bancos de dados e colunista da revista ClubeDelphi. Me add ai MSN: maikelscheid@hotmail.com E-mail: maikelscheid@gmail.com Att Maikel
  19. KaKarotto, achei bem interessante essa forma que você me passou... mas vou enfrentar outro problema... eu monto todas as url's em tempo de execução, dependendo da escolha do usuário um arquivo com nome diferente será exibido, logo não poderei fixar <iframe src='/instrucoes/arquivo.mht'> Tenho uma função aqui que recupera os valores passados pela URL, por exemplo: pagina.html?key=minha_instrucao.mht Veja a função abaixo: function getQueryString(key) { var url = new String(location.href); var rxp = new RegExp('[?&]' + key + '{1}=[^&]*','gi'); var valor = new String(''); var res = new Array(rxp.exec(url)); var itm = new String(''); var pos=new Number(0); if (res.length == 1) { itm = String(res[0]); pos = itm.search(/[=]/); valor = itm.slice(pos+1 ); } return valor; }; Meu problema agora é passar o resultado dessa função para o src do iframe... parece ser bem simples, mas não estou conseguindo. Tem como fazer isto? Ou de qual outra forma eu poderia passar o nome do arquivo para ser carregado no iframe? Agradeço
  20. Mais uma vez, muito obrigado pela sua ajuda. Em relação ao iFrame, até poderia ser, mas para este caso teria que montar uma nova estrutura que receberia o nome do arquivo *.mht que quero mostrar. Tenho vários arquivos salvos em uma pasta, e de acordo com a escolha do usuário, um deles é exibido. Teria como através de um javascript obter um parametro que passo pela URL e buscar o arquivo desejado a ser mostrado no iFrame? Como ficaria nesse caso o script para mostrar o loading enquanto o arquivo *.mht é baixado do servidor para o browser? Em relação ao *.mht é texto sim, texto com imagens. Faço os documentos no Word e em salvar como utilizo "Página da Web de Arquivo Único (*.mht)". Nessa forma que estou utilizando agora, com Window.Open não teria como mostrar esse loading? Att
  21. Kakarotto, valeu ai pela ajuda. Seguinte, pra chamar o poup-up uso simplesmente o método Window.Open... meu código fica assim, onde monto o nome do arquivo em tempo de execução usando asp.net e atribuo a uma imagem no meu formulário: <img src="image/botao_download.gif" width="14" height="14" border="0" onclick="java script:window.open('/instrucoes/arquivo.mht','instrucoes','WIDTH=700,HEIGHT=600,TOP=50,LEFT=50,scrollbars=yes');" style="cursor:pointer"/> Dessa forma estou chamando o arquivo direto, mas se for necessário posso criar uma página específica e passar um parâmetro pela url e chamar depois o arquivo *.mht. Do jeito que estou fazendo tem como colocar esse script de loading? Valeu
  22. Salve galera... Seguinte, estou trabalhando com manuais de instruções aqui para os técnicos da minha empresa. Estes manuais são compostos por geralmente 15 páginas cada um e com várias imagens. Tenho um sistema de cadastro e faço o upload desse arquivo no formato *.mht onde cada file fica em média com 1,5 MB. Ao exibir o arquivo em uma poup-up dependendo da banda de internet do técnico, aparece a janela em branco enquanto o download do arquivo para exibição é feito, demorando as vezes até 1 minuto e o usuário acaba fechando a janela antes do tempo. Gostaria de colocar um script que verificasse quando o download foi concluído, ou seja, que fosse aparecer um "loading..." em algum lugar do poup-up enquanto o *.mht é carregado. Alguém tem algum script semelhante, sabe alguma forma de resolver esse problema... sugestões?? desde já agradeço pelo help. Att
  23. Olá colegas Estou trabalhando com um software que captura vídeo/imagens de WebCam. Tenho um código que ao ligar a câmera captura o vídeo e transmite o mesmo no Handle de um componente panel, ao qual o vídeo fica passando ininterruptamente. Já implementei o código necessário para capturar uma imagem e salvar em JPG no disco, o que gostaria de fazer agora é disparar uma rotina para capturar o vídeo dessa WebCam, como por exemplo salvar o Handle do panel em um formato *.avi ou *.mpg (ou outros formatos de vídeo). Não estou usando componentes terceiros para capturar o vídeo da WebCam e jogar o mesmo ao Handle do Panel. Utilizo rotinas de código puro em Delphi 7. Se alguém puder me ajudar, agradeço. Att
  24. Micheus Obrigado pela ajuda... era esse mesmo o problema... faltava criar aquela chave no registro do sistema. fiz download do arquivo e executei.... meu BDS voltou a funcionar normal. Vlw... Att
  25. colegas... seguinte... até a pouco eu tinha na minha máquina o IE 6 e o delphi 2006 for asp.net funcionava beleza.... trabalhava normal com minhas aplicações... mas ai fiz um upgrade no win XP e instalei agora o IE 7... e ai começou a dar problema no delphi. Quando estou em uma aplicação asp.net e vou para o código .pas da minha página, e depois tento voltar para a parte de design.... aparece uma mensagem de acesso negado. Tanto faz se eu uso o atalho F12 ou vou pelas guias em baixo. Ai preciso fechar aquela página e depois abrir ela de novo pra poder mecher no layout da página. Isso só depois que instalei o IE 7. Quando rodo minha aplicação, funciona normal, o problema agora é pra trabalhar no delphi. Alguém conhece esse erro ai? Sabe como resolver? Se alguém puder me ajudar.... agradeço. Att
×
×
  • Criar Novo...