Ir para conteúdo
Fórum Script Brasil

Jhonas

Monitores
  • Total de itens

    9.657
  • Registro em

Tudo que Jhonas postou

  1. Antonio ... como já havia lhe dito, isto acontece com imagens muito grandes... voce tem varias opções para trabalhar com imagens... uma delas seria o uso do paint brush onde voce pode redimensionar a imagem de qualquer forma, exitem mais de 3 paginas com duvidas a respeito de imagens no forum. Faça uma pesquisa. http://scriptbrasil.com.br/forum/index.php...p;highlite=jpeg abraço
  2. Na verdade a porta serial está habilitada, a comunicação com o CLP depende unica e exclusivamente do programa que voce esta usando. OBS: os comandos enviados e recebidos do CLP estão em valores hexadecimais. abraço
  3. Voce só precisa fazer uma condição ( IF ) para que na hora de montar os itens do Treeview saber qual valor do indice da imagem ira ser usada. Como não é possivel advinhar o que voce esta tentando fazer, seria melhor voce postar o codigo, para poder te orientar melhor. abraço
  4. Veja este post http://scriptbrasil.com.br/forum/index.php...st&p=465067 abraço
  5. Erro : 10252 : $280C : Acesso exclusivo foi perdido Ou seja ... Foi dado um Lock ( Bloqueio de tabela ) para que pudesse ser realizado uma alteração, e ele foi perdido Sugestão: Não use bloqueio de tabelas em rede, mas sim, de registros. abraço
  6. O código que voce tem não funciona no Vista porque não foi feito para 64 Bits (Vista ). Voce precisa de uma atualização para que aplicativos de 32 Bits possam ser executados no Vista... Procure no site da Microsoft ou então tente executar o aplicativo em modo de compatibilidade abraço
  7. Jhonas

    InstallShield

    Veja se encontra alguma coisa nestes posts http://scriptbrasil.com.br/forum/index.php...e=installshield abraço
  8. Use o componente ImageList da paleta Win32 link este componente ao Treeview pela propriedade Images e para mudar as imagens use procedure TForm1.Button1Click(Sender: TObject); begin TreeView1.Items.Item[1].ImageIndex := 1; end; OBS: para mudar as imagens selecione o item do Treeview e o indice da imagem que esta no ImageList. abraço
  9. Use o componente OleContainer da paleta System procedure TForm1.Button1Click(Sender: TObject); begin if OpenDialog1.Execute then begin Edit1.Text := OpenDialog1.FileName; OleContainer1.CreateLinkToFile(trim(Edit1.Text),TRUE); Application.ProcessMessages; OleContainer1.SetFocus; OleContainer1.Run; end; end; abraço
  10. Causa A classe ServiceBase chama o método OnStop diretamente a partir do manipulador de evento Service definido no ScDispatcherLoop do arquivo Advapi32.dll. Após 30 segundos, se o segmento ScDispatcherLoop não estiver pronto para receber um novo comando de serviço do gerenciador de controle de serviço, o Controlador de serviço do Windows marca o serviço como "tempo esgotado." Por isso, essa mensagem de erro é exibida. Para resolver esse problema, obtenha o service pack mais recente para o Windows 2003 abraço
  11. 1 - Se a imagem for muito grande ele não mostra... a menos que voce troque a versão do QR ou use uma imagem jpeg pequena.... lembre-se que se a imagem estiver na banda de detalhe, isto poderá causar demora ao exibir 2 - colocar imagens no QR não tem mistérios e mesmo trazendo estas imagens de um banco de dados o report não fica tão lento como voce está dizendo 3 - http://www.brothersoft.com/custom-rave-report-42471.html http://www.brothersoft.com/custom-rave-rep...load-42471.html OBS: Se não me engano o rave report é pago abraço
  12. Modifique este codigo para o seu uso procedure TForm1.Button1Click(Sender: TObject); var tam : integer; s : string; begin //Edit1.Text := '020309101112131416' s := Edit1.Text; tam := length(s); Memo1.Clear; while tam > 0 do begin Memo1.lines.append(copy(S,1,2)); // pegar os numeros de 2 em 2 delete(s,1,2); // deletar da string os numeros que já foram pegos tam := length(s); end; end; abraço
  13. eu tambem não achei .... te passei varios exemplos... tente outro abraço
  14. Existe um componente que serve extamente para isso... é o ABarraPrinter do pacote CBarras 1: begin ABarraPrinter1.Codigo := CampB; ABarraPrinter1.Tipo := cdEAN13; ABarraPrinter1.CorBarra := clBlack; ABarraPrinter1.CorEspaco := clWhite; ABarraPrinter1.Largura := 4; //5 largura das barras ABarraPrinter1.Comprimento := 20; //30 comprimento da barra ABarraPrinter1.LinhaPrinter := Linha*VVert; //50 espacamento ABarraPrinter1.ColunaPrinter := Coluna; //45 espacamento ABarraPrinter1.Execute; CampA := ABarraPrinter1.Codigo+'-'+ABarraPrinter1.Digito; Printer.Canvas.TextOut(Coluna,((Linha*VVert)+150),CampA); end; Voce pode especificar exatamente onde quer que impressão começe. Caso não consiga encontrar na net ( Gratuito ) , voce pode tentar com estes http://www.suportetotal.com.br/cbarras.htm abraço
  15. É possivel pegar os dados enviados para LPT1 entretanto, ao jogar estes dados em um Memo ou um Txt, voce ficaria perdido em meio aos códigos de formatação para impressora. outra sugestão possivel seria voce montar um programa para ler os mesmos dados dos arquivos e gerar um relatorio usando o dephi. ou ainda configurar a impressora para que aceite impressão em modo MS-Dos. abraço
  16. Jhonas

    duvida com quickrep

    vms ... usei o mesmo codigo que está no link, entretanto a unica diferença é que não usei um Data Module e aqui funciona sem problemas... posso colocar campos e tira-los sem problemas é melhor rever todos os passos e conferir o seu codigo abraço
  17. Voce leu direito ??? é um componente feito para uso com o delphi 7 Trata-se de um componente herdado do TTreeView, que é capaz de fazer todo o gerenciamento dos acessos de cada usuário ou grupo de usuários. Não entrarei em detalhes neste item. Para saber mais detalhes baixe no site o exemplo completo. abraço
  18. Jhonas

    duvida com quickrep

    Experimente atualizar o QR depois que voce remover os campos QuickRep1.Refresh; abraço
  19. Veja nestes endereços http://www.ramosdainformatica.com.br/art_r...s01.php?CDA=476 http://ramerhy.vilabol.uol.com.br/tutorialado01.htm http://www.activedelphi.com.br/forum/viewt...235386b77703ee8 http://www.rads.com.br/delphi_main.php?m=1&id=9 abraço
  20. Jhonas

    duvida com quickrep

    Seja mais claro quanto ao que voce quer fazer usando este codigo abraço
  21. Jhonas

    duvida com quickrep

    Pelo link voce está criando um QR dinamicamente, e desta maneira tambem são criados os campos. Então voce diz que quando quer tirar ele não sai e continua lá. coloque o codigo em que voce efetua este pocedimento, para podermos analisar melhor abraço
  22. Deixe a banda de detalhe extamente com o mesmo tamanho de uma etiqueta + o espaçamento ate a proxima. por exemplo: se a etiqueta tiver 2,5 cm e o espaço entre elas é de 0,5 cm, então a banda de detalhe deverá ser de 3,0 cm abraço
  23. Oi Monica, seja bem vinda a equipe Bom trabalho ! abraços
  24. Eder ... no forum a muita coisa a respeito .... veja esses posts http://scriptbrasil.com.br/forum/index.php...hlite=etiquetas abraço
  25. Niveis de Acesso alguns exemplos: http://scriptbrasil.com.br/forum/index.php?showtopic=101684 http://www.inf.ufsc.br/~prass/sources/usuarios.zip http://www.delphi.eti.br/ver_artigo.php?id=133 http://www.linhadecodigo.com.br/Artigo.aspx?id=822 http://www.linhadecodigo.com.br/ArtigoImpressao.aspx?id=822 http://forum.imasters.uol.com.br/index.php?showtopic=230297 abraço
×
×
  • Criar Novo...