Progr'amador

Olá Eder, Como eu já havia dito, a solução é usar duas Querys uma pra tabela VISITA e outra pra tabela IT_VISITA Qualquer dúvida, posta aí! abraços Progr'amador. B)

vendedor, data e o kme abaixo atraves de uma tabela masterdetalhes eu lanço as visitas: exemplo: Olá Eder, Era isso que eu tava falando, diga uma coisa: em que tabela fica esses campos? seria KM em tabela VISITA e as visitas na tabela IT_VISITA? Sua select é essa: Select * from VISITA, IT_VISITA where ... Se for, sua select está resultando assim: VENDEDOR DATA KM VISITA ITEM_VISITA CLIENTE PRODUTO ZE 25/02/2007 210 000001 0001 LOJA DO ZE FEIJÃO ZE 25/02/2007 210 000001 0002 BAZAR MA ARROZ ZE 25/02/2007 210 000001 0003 BAR DO K- CERVEJA abraços Progr'amador. B)

Olá Eder, No caso, cada visita seria um registro??? o que está acontecendo, é que sua select esta repetindo o campo KM pra cada registro de visita, tipo: vendedor1----visita1----10 vendedor1----visita2----10 vendedor1----visita3----10 E talvez a solução seria dividir essa select em duas Queryes. abraços. Progr'amador. B)

Cara não deu certo, criei a conexão do Interbase via ODBC, mas pelo MySQL-Front não deu acesso a esta conexão. Será que tem outra forma Abraços Valdecir Olá VDLR, que pena que não deu certo! você já viu se é possível exportar de IB para txt ou xls??? Porque aí era so importar desse txt ou xls para o MySQL, que tenho certeza que daria certo. Abs. Progr'amador. B)

Olá ArchimedS-S, Na verdade seria: With QRPrinter do begin EnableOpenBtn := False; EnableSaveBtn := False; end; no evento OnCreate do relatório Abs. Progr'amador. B)

Olá ArchimedS-S, Usando o Table ou Query você tem o RecordCount: Var i : integer; begin i := Query1.RecordCount; Abs. Progr'amador. B)

Como assim: você quer bloquear pra usar somente bmp, ou você quer apenas identificar quando for um ou outro? Abs. Progr'amador. B)

Pow! se abre mas rapido que o delphi 6 então é quase igual ao Delphi 3, que é um piscar de olhos. Muito boa essa dica tambem! valeu! Abs. Progr'amador. B)

usando o Try o erro só ocorre enquanto você tiver rodando apartir do Delphi, se você for executar direto do exe o erro não aparece. você viu a minha segunda dica usando o if fileexists, é que eu editei o post depois de ter postado: Verificar se o arquivo existe, se existe carrega: If fileexists('c:\fichario\foto\'+dbedit1.text+'.bmp') then image1.Picture.LoadFromFile('c:\fichario\foto\'+dbedit1.text+'.bmp'); Abs. Progr'amador. B)

Então tenta usar o Try e Except, aproveitando, vou da uma dica: você cria um bitmap bem simples no Paint mesmo com o texto 'SEM FOTO', vamos chamar de semfoto.bmp, e quando não tiver foto carregaria esse bmp, entendeu, tipo: try image1.Picture.LoadFromFile('c:\fichario\foto\'+dbedit1.text+'.bmp'); except image1.Picture.LoadFromFile('c:\fichario\foto\semfoto.bmp'); end; com isso não daria mas a msg de erro. ou verificar se o arquivo existe, se existe carrega: If fileexists('c:\fichario\foto\'+dbedit1.text+'.bmp') then image1.Picture.LoadFromFile('c:\fichario\foto\'+dbedit1.text+'.bmp'); bom, não sei se é bem isso que você está querendo. Abs. Progr'amador. B)

Ok, só que você não me responsdeu uma pergunta: É que eu tenho aqui ele mas to meio receioso em instala-lo, Abs. Progr'amador. B)

Olá schaukoski, você pode postar a parte de seu código onde você faz a seleção desse cadastro? Abs. Progr'amador. B)

Churc, Eu nunca usei o Delphi 2006, mas acredito que seja igual o 2005, então pra você ver as paletas de componentes você tem iniciar uma aplicação ou abrir uma existente, é que os componentes aparecem de acordo com o tipo de programação você vai trabalhar (é tipo assim! entendeu :D ), em Delphi Project clique em VCL Forms Application, você vai ver os componentes. Detalhe: nessa versão a paleta de componentes estão na vertical. Me diga uma coisa, demorou muito pra carregar aí, eu desisti do Delphi 2005 devido a lentidão. Abs. Progr'amador. B)

Olá Mauro, Onde você esta execultando esse código? no OnCreate? Abs. Progr'amador. B)

Puts! Assim não tem nem graça!, os cara mal acaba de lançar uma versão e já tão lançando outra, Num dá nem tempo! rs! Beraldo, você conhece essa versão? Houve alguma mudança ou implementação? Abs. Progr'amador. B)

MySQL 5.0 Abs. Progr'amador. B)

Olá lhcampos1, o problema está somente aqui: MyISAM DEFAULTCHARSET = latin1AUTO_INCREMENT = 1243; você colocou tudo junto aew! faz assim: MyISAM DEFAULT CHARSET = latin1 AUTO_INCREMENT = 1243; Abs. Progr'amador. B)

Olá VDLR, Eu uso o MySQL 5, com MySQL-Front, e la tem as seguintes opção de importar tabelas: (cria a tabela) SQL Files...MS Access File...ODBC Table...e importar dados: (quando a tabela no MySQL já existe)Text Files...MS Access File...MS Excel File...ODBC Table...E pelo que eu pude ver, fazendo umas pesquisas, você pode criar uma fonte de dados para o InterBase no ODBC, e assim fazer a inportação usando a opção ODBC Table... Abs. Progr'amador. B)

Olá Luiz carlos, Os cursos do IPED têm suporte, em todo caso se você preferir usar o fórum, de acordo com que as dúvidas forem aparecendo, você pode ir postando aqui as suas dúvidas, como qualquer outra pergunta, só que seria bom que você se cadastrasse. Abs. Progr'amador. B)

Olá VDLR, vou mover pra Sala de MySQL onde seria mas fácil você conseguir isso, e deixar um Link na sala de Delphi. Abs. Progr'amador. B)

Olá Ivano, da algum erro??? você já executou o grant desse package? você consegui rodar dirretamente no SQL Plus? Abs. Progr'amador. B)

Olá bking, Sua pergunta está muito vaga, seje mais detalhado na pergunta, que tavez seja mais fácil de alguém ajudar. Abs. Progr'amador. B)

Olá Renato, Tó meio enferrujado em Oracle, já faz mais de dois anos que não mexo. Eu sempre trabalhei com campos de data como string no caso do Oracle o VARCHAR2, e o seu campo é do tipo data mesmo? Tenta usar a função TO_DATE. acho que seria isso: Modulo.MESROMCAR1.Close; Modulo.MESROMCAR1.SQL.Clear; Modulo.MESROMCAR1.SQL.Add('Select * from mesromcar where codfortra='+#39+'3941956000186'+#39+'and datsai = to_date('+#39+maskedit1.text+#39+',''dd/mm/YYYY'')'); Modulo.MESROMCAR1.Open; Abs. Progr'amador. B)

Olá, Já tive oportunidade de "mecher" com VB, ao mesmo tempo que comecei com Delphi, e preferi continuar só com o Delphi mesmo, já vi programadores que programam tanto em VB como em Delphi que preferem o Delphi. Com relação a achar que o Delphi esta ficando obsoleto, é uma opnião muito imatura, claro que a moda hoje é JAVA e tal, mas eu sou da opnião de que enquanto o programa que você estiver usando, esteja suprindo suas necessidades, necessidades do usuário, e de quem convir, ESSE É O MELHOR, seja qual for: Delphi, VB, C++, Clip, etc... Abs. Progr'amador. B)

É verdade, nem observei isso, no caso ficaria assim: Table1.FieldByName('valorbolsa').AsString := query1.fieldbyname('valorbolsa').AsString; Table1.FieldByName('estilo').AsString := query1.fieldbyname('estilo').AsString; Table1.FieldByName('codnome').AsString := query1.fieldbyname('codnome').AsString; Abs. Progr'amador. B)