Re: [delphi-br] Como montar uma pesquisa por aprox imação

2008-02-08 Por tôpico Marcelo - Kappesberg
Se vc jah tem todos os dados pode usar o Filter, ou fazer um Locate para posicionar no registro pesquisado. QDataset.Filter := 'seucampo='+Edit1.Text; QDataset.Filtered := (QDataset.Filter<>''); ou QDataset.Locate('seucampo', Edit1.Text, []); Tudo depende tambem, como o Claudiney falou, do nu

Re: [delphi-br] Manipular Dados no DbGrid via SQL!!

2008-01-18 Por tôpico Marcelo - Kappesberg
Nao sei qual banco vc esta usando mas "DELETE *" tah esquisito Nao eh soh "DELETE FROM"? Marcelo Horlle - Original Message - From: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br Sent: Friday, January 18, 2008 12:48 PM Subject: RES: [delphi-br] Manipular Dados no

Re: RES: [delphi-br] dm.qProdutos.Locate

2008-01-17 Por tôpico Marcelo - Kappesberg
--- Em delphi-br@yahoogrupos.com.br, "Marcelo - Kappesberg" <[EMAIL PROTECTED]> escreveu > > Ok entao, sua tabela esta certa assim mesmo como character. > > Varchar eh um tipo especial de campo para economizar bytes no banco de dados, no qual > ele soh usa o

Re: [delphi-br] programa nao encerra

2008-01-17 Por tôpico Marcelo - Kappesberg
Se o programa nao encerra eh pq algum form ainda esta ativo. vc deve fecha-lo com "Close;" ou se deseja forcar o termino de sua aplicacao use o "Application.Terminate;". Mas eh sempre bom revisar seu codigo para nao deixar nada aberto na memoria, se o mesmo esta deixando alguma coisa aberta, na

Re: [delphi-br] programa nao encerra

2008-01-17 Por tôpico Marcelo - Kappesberg
Outra coisa, se vc esta rodando o programa pelo Delphi e acontece isso vc pode parar a execucao do programa pelo menu do Delphi "Run \ Program Reset". Marcelo Horlle - Original Message - From: Auriston Lopes To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 16, 2008 4

Re: RES: [delphi-br] dm.qProdutos.Locate

2008-01-16 Por tôpico Marcelo - Kappesberg
Ok entao, sua tabela esta certa assim mesmo como character. Varchar eh um tipo especial de campo para economizar bytes no banco de dados, no qual ele soh usa o tamanho necessario da string armazenada no registro. Tipo assim, se vc tem um campo char(10) e digitar "0123" ele assim mesmo ocupa os

Re: [delphi-br] Ref.Acess Violation

2008-01-16 Por tôpico Marcelo - Kappesberg
Ola Omar.. Veja no menu Project \ Options se este form nao esta relacionado na coluna auto-create... Se nao me engano isso provoca o erro pq vc estaria recriando o mesmo form com o Application.CreateForm. Marcelo Horlle - Original Message - From: Omar Marques To: delphi-br@yah

Re: [Spam] [delphi-br] Colocar Botão na StatusBa r1

2008-01-16 Por tôpico Marcelo - Kappesberg
Ola Evaldo... Procure na net pela propriedade psOwnerDraw do panel do statusbar... Encontrei exemplos de se colocar uma progressbar no statusbar a algum tempo, e pelo que entendi setando esta propriedade pode-se colocar qualquer tipo de objeto... Avise de der certo!! Marcelo Horlle -

Re: [delphi-br] [OFF-TOPIC] Abandonaram o barco. E agora ?

2008-01-10 Por tôpico Marcelo - Kappesberg
Esse sistema eh tao bom assim? jah que vc esta pensando que o sistema pode "dar dor de barriga" entao nao seria hora de trocar de sistema mesmo? Lembro que qdo trabalhava numa software house, nos faziamos de tudo para importar todas as informacoes de cadastro, compras e vendas do antigo sistema

Re: [delphi-br] Soma SELECT

2007-12-03 Por tôpico Marcelo - Kappesberg
Depende do banco. Mas de qualquer maneira vc deve evitar de somar ou juntar valores null com outros valores, pois o resltado sempre sera null. No cado do SQL Server vc deve testar o valor do campo antes de somar. Seriam dias maneiras: Com ISNULL: - Original Message - From: welling

[delphi-br] Imagem no quick report

2007-10-19 Por tôpico Marcelo - Kappesberg
Ola pessoal. Preciso implementar uma impressao de lista de precos com imagens, porem eu precisaria que esta imagem ocupasse todas as linhas dos registros do mesmo tipo de produto. Tipo assim: tenho tres produtos de cores diferentes mas para nao imprimir uma foto de cada cor eu colocasse apenas

Re: [delphi-br] DUvidas com sql

2007-10-16 Por tôpico Marcelo - Kappesberg
Hudson, o que o Marlon te passou tah certo. mas como vc implementou eh que esta errado. Aquela instrucao eh na selecao dos campos nao no where assim: select case when DP1_CLIENTE like ''%'+Buscar+'%'' then "Vem do DP1" when DP2_CLIENTE like ''%'+Buscar+'%'' then "Vem do DP2" when DP3_CLIENTE lik

Re: [delphi-br] Off: DIA MUNDIAL SEM CARRO (Sábado 22/09)

2007-09-24 Por tôpico Marcelo - Kappesberg
Otima ideia, mas espero que nao facam o "DIA MUNDIAL SEM COMPUTADOR" hehehe - Original Message - From: Red Mosquito To: delphi-br@yahoogrupos.com.br Sent: Saturday, September 22, 2007 9:45 AM Subject: RES: [delphi-br] Off: DIA MUNDIAL SEM CARRO (Sábado 22/09) Há 31 anos a

Re: [delphi-br] Re: Novato...

2007-07-03 Por tôpico Marcelo - Kappesberg
E ai Carlos, blz? Nao sei o que pode estar errado pra ti, o que o pessoal postou ai esta certo... Para pegar a posicao do caractere numa string usa-se o POS mesmo Entao, seguindo o teu exemplo seria algo do tipo: POS1:=COPY((ListForm.mtaclock.AsString),1,1); // pega o primeiro caractere POS2:=CO

Re: [delphi-br] Quick report - novas paginas.

2007-07-03 Por tôpico Marcelo - Kappesberg
opa errei na minha query coloquei p.Caixa e era p.Via pra pegar a descricao da via a ser impressa... Select p.Pag, p.Via, c.Data, c.Cliente, c.Valor from Caixa c cross join (select 1 as Pag, 'CAIXA' as Via union select 2, 'CLIENTE' union select 3, 'ARQUIVO') p whe

Re: [delphi-br] Quick report - novas paginas.

2007-07-03 Por tôpico Marcelo - Kappesberg
Acho que a primeira coisa eh preparar teu dataset para repetir os mesmos registros o numero de vzs necessarios... em SQL Server poderia ser algo parecido com isso! Select p.Pag, p.Caixa, c.Data, c.Cliente, c.Valor from Caixa c cross join (select 1 as Pag, 'CAIXA' as Via union se

Re: [delphi-br] Re: Duvida sobre SQL no Delphi

2007-06-28 Por tôpico Marcelo - Kappesberg
Acho que o problema neste caso eh as aspas simples, jah que ela tambem eh usada para carregar o SQL... tente fazer assim:.. SQL.Add('CAST('+#34#34+' AS Char(1)) as TipoRec,'); o #34 eh o codigo asc das aspas simples... Marcelo Hörlle [EMAIL PROTECTED] - Original Message - From:

Re: [delphi-br] Re: Sugestão qual melhor forma de tr abalhar vocês acham?

2007-06-28 Por tôpico Marcelo - Kappesberg
Vc deve pensar no seguinte, se vc colocar legendas em todas as consultas vc devera testar manualmente o que representa cada legenda na hora de mostrar algum relatorio. sem contar nas telas onde vc possivelmente devera colocar o combo para o usuario escolher a opcao, se for criado uma nova condic

Re: [delphi-br] Componente WebBrowser

2007-06-26 Por tôpico Marcelo - Kappesberg
, basta invocar o método Lines.LoadFromFile do seu Memo, uma vez que um arquivo HTML é no formato texto puro. Abraço. Fernando Nappe Em 26/06/07, Marcelo - Kappesberg <[EMAIL PROTECTED]> escreveu: > > Ola pessoal.. > > Estou usando o componente WebBrowser do D

[delphi-br] Componente WebBrowser

2007-06-26 Por tôpico Marcelo - Kappesberg
Ola pessoal.. Estou usando o componente WebBrowser do Delphi 7. Esta tudo funcionando legal quando tenho meu HTML num arquivo. WebBrowser1.Navigate('C:\MeuHTML.html'); Beleza, ateh consegui visualizar e imprimir o HTML. Porem, surgiu uma situacao que preciso carregar o HTML num memo e exibi-lo

Re: [delphi-br] Dúvidas sobre quickreport.

2007-06-21 Por tôpico Marcelo - Kappesberg
dia. Eu especifiquei isso sim, mas continua gerando aquele resultado que eu apresentei anteriormente... Será pq os componentes de acesso aos dados estão num datamodule? Em 21/06/07, Marcelo - Kappesberg <[EMAIL PROTECTED]> escreveu: > > Ola, veja se vc especificou o ag

Re: [delphi-br] Dúvidas sobre quickreport.

2007-06-21 Por tôpico Marcelo - Kappesberg
Ola, veja se vc especificou o agrupamento na propriedade Expression da banda do grupo... La vc deve informar qual eh o agrupamento. tipo QRGroup1.Expression := 'SqlTeste.mes'; falow!!! - Original Message - From: ricardo_sx To: delphi-br@yahoogrupos.com.br Sent: Wednesday,

[delphi-br] Componente para traducao

2007-06-20 Por tôpico Marcelo - Kappesberg
Bom dia pessoal... Alguem sabe se existe tal componente em Delphi para traduzir textos?? mesmo que seja pago... Ou algum servico na web que possa ser usado pelo Delphi para este fim? um webservice talvez Valeu!!! Marcelo Hörlle [EMAIL PROTECTED] [As partes desta mensagem que não continham

Re: [delphi-br] Form não abre de jeito nenhum !!!

2007-06-05 Por tôpico Marcelo - Kappesberg
Para abrir um form como Modal vc deve deixa-lo invisivel antes... entao defina a propriedade Visible como falso para o form a ser chamado... vai dar certo... Marcelo Hörlle [EMAIL PROTECTED] - Original Message - From: "Itabyte®" <[EMAIL PROTECTED]> To: Sent: Tuesday, June 05, 2007 7:47

Re: [delphi-br] Fwd: RELATORIO RAVE QUE NAO APARECE

2007-05-31 Por tôpico Marcelo - Kappesberg
Bah amigo, nao conheco o Rave... mas nos demais relatorios se vc nao colocasse o dataset numa propriedade do proprio relatorio ele aparecia em branco pois nao "sabia" qual era o dataset padrao do relatorio entende!!! - Original Message - From: Vinicius Latini To: delphi-br S

Re: [delphi-br] instalador

2007-05-29 Por tôpico Marcelo - Kappesberg
Ola, nao precisa incluir nada no instalador.. Ele inclui as dlls, bitmaps, etc.. tudo no EXE mesmo... O instalador soh serviria para criar o diretorio copiar o exe pra lah e fazer atalhos... A unica coisa que vc precisara instalar eh o banco, mas ai vai depender do banco que ira adotar. Marce

Re: [delphi-br] Função de Data

2007-05-11 Por tôpico Marcelo - Kappesberg
, mes, 1) - 1; end; - Original Message - From: Marcelo - Kappesberg To: delphi-br@yahoogrupos.com.br Sent: Friday, May 11, 2007 3:03 PM Subject: Re: [delphi-br] Função de Data A ideia eh a seguinte: Avancar um mes na frente e setar como se fosse o primeiro dia do mes

Re: [delphi-br] Função de Data

2007-05-11 Por tôpico Marcelo - Kappesberg
A ideia eh a seguinte: Avancar um mes na frente e setar como se fosse o primeiro dia do mes seguinte... depois disto converter para data novamente e diminuir um dia, pronto tem-se o ultimo dia... function UltimoDiaMes(Mdt: TDateTime) : TDateTime; var ano, mes, dia: word; begin DecodeDate(M

Re: [delphi-br] Agenda Médica

2007-05-11 Por tôpico Marcelo - Kappesberg
Poh Ricardo, assim fica dificil te ajudar... Qual eh a tua duvida afinal? Nada que vc falou foge da nossa rotina de trabalho com programacao. O que vc precisa saber? Nao sabe como comecar? Modelar o banco? Que componetes usar? sera isso? Seja mais especifico!!! Marcelo Hörlle [EMAIL PROTECT

Fw: [delphi-br] AJUDA! Mudar .ico do atalho no desktop?? como?

2007-05-09 Por tôpico Marcelo - Kappesberg
mandei esta mensagem antes mas pra min nao apareceu na lista. de qualquer forma estou enviando novamente... - Original Message - From: Marcelo - Kappesberg To: delphi-br@yahoogrupos.com.br Sent: Wednesday, May 09, 2007 11:34 AM Subject: Re: [delphi-br] AJUDA! Mudar .ico do atalho no

Re: [delphi-br] AJUDA! Mudar .ico do atalho no desktop?? como?

2007-05-09 Por tôpico Marcelo - Kappesberg
Veja o metodo SetIconLocation do IShellLink with MySLink do begin SetArguments(''); SetPath(PChar(FileName)); SetWorkingDirectory(PChar(InitialDir)); SetIconLocation(PChar('C:\INFOR\seuicone.ico'), 0); end; Nao testei talvez precise de ajustes... Marcelo Hörlle [EMAIL PROT

Re: [delphi-br] Mudar .ico do atalho no desktop?? como?

2007-05-09 Por tôpico Marcelo - Kappesberg
Ola, soh uma dica: Se vc quer criar um icone para sua propria aplicacao vc pode definir lah nas opcoes do projeto em "Application" item "Icon". Assim qdo for criado o seu icone sera com o que estiver definido lah ao invez do padrao do delphi. Nao sei se era esta a tua intencao mesmo... Falow!!

Re: [delphi-br] ExecSQL

2007-05-08 Por tôpico Marcelo - Kappesberg
Nao falta a clausula Where? Ele deve estar atualizando todos os registros por isso demora... ps: jah passei por isso sim... hehe Marcelo Hörlle [EMAIL PROTECTED] - Original Message - From: "Mauro Paes Corrêa <[EMAIL PROTECTED]>, "@hostlivre.com To: delphi-br@yahoogrupos.com.br

Re: [delphi-br] TDBGrid com valores

2007-04-27 Por tôpico Marcelo - Kappesberg
Ola.. Eu formato os dados aqui no DataSet e ele reflete no grid... Marcelo Hörlle [EMAIL PROTECTED] - Original Message - From: Fernando Luiz Bortolanzza To: delphi-br@yahoogrupos.com.br Sent: Friday, April 27, 2007 11:18 AM Subject: [delphi-br] TDBGrid com valores Olá pe

Re: [delphi-br] Alterar o tipo do campo

2007-04-19 Por tôpico Marcelo - Kappesberg
As vzs as mensagens no yahoo voltam com mensagens de Timeout de qqr forma estou enviando denovo... - Original Message - From: Marcelo - Kappesberg To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 19, 2007 8:15 AM Subject: Re: [delphi-br] Alterar o tipo do campo Ola

Re: [delphi-br] Dúvida Com Rotinas Que Congelam A Applicação

2007-04-18 Por tôpico Marcelo - Kappesberg
Nao sei trabalhar com threads mas enfim para atualizar a tela vc pode emitir o comando ProcessMessages do Applicaton... Faca assim, no evento OnTimer do seu timer ao final de tudo coloque o comando Application.ProcessMessages. Isso devera forcar o windows a redesenhar a tela... Marcelo Hörlle

[delphi-br] Traducao erros ADO

2007-04-18 Por tôpico Marcelo - Kappesberg
Ola pessoal, Alguem tem ai ou sabe me dizer onde conseguir uma relacao de erros do ADO em portugues. Penso em fazer uma janela de erros com a traducao e algumas sugestoes para a correcao. Obrigado Marcelo Hörlle [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram remov

Re: [delphi-br] Aplicativos em execução

2007-04-13 Por tôpico Marcelo - Kappesberg
Ola Wanderlei!! Conheco o ProcessKill que faz o papel do TaskManager no windows... Abbaixo seque o codigo do form principal que lista os programas na tela e ateh eh possivel finaliza-lo.. Soh nao sei se nao eh necessario mais alguma unit para funcionar, mas qualquer coisa procure na Net por P

[delphi-br] Off-topic - somente teste

2007-04-12 Por tôpico Marcelo - Kappesberg
Desconsiderar... - Original Message - From: Djonatas Tenfen To: [EMAIL PROTECTED] Sent: Thursday, April 12, 2007 1:37 PM Subject: [delphi-br] QuickReport Etiquetas !!! Olá Amigos... Seguinte preciso de uma ajuda com o QuickReport estou tentando emitir etiquetas em li

Re: [delphi-br] Dúvida Com Rotinas Que Congelam A Applicação

2007-04-10 Por tôpico Marcelo - Kappesberg
Ola Rafael!!! Tenta emitir o comando Application.ProcessMessages; cada vez que rodar o OnTimer... Se nao me engano era isso... Marcelo Hörlle [EMAIL PROTECTED] - Original Message - From: Rafael B. Mello To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 10, 2007 10:41 A