Re: [delphi-br] Captura de Imagens no Delphi
Tudo bom Rafael Utilizo este componente em meus projetos http://dprogrammer.blogspot.com/2007/08/capturando-imagens-da-webcam-no-delphi.html -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.blogspot.com/ 2008/4/18 rafaelpinto19 [EMAIL PROTECTED]: Olá galera, Eu estou começando a trabalhar comcaptura de imagens(Para fotos em cadastros)e não tenho idéia de como começar. Quero saber dos colegas se tem em algum lugar(Site, tutorias, apostilas e etc) que explique ou ensinem e mexer com isso. Quero saber qal componente seria melhor e mais fácil para eu usar. programa com a Tecnologia IBX. Quero mnuito aprender a implementar essas funções nos meus sistemas...abraços... _ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Questionário no Delphi
Tudo bom juliano Voce pode utilizar o TNoteBook.Fica na Aba Win 3.1 Ou usar o TPageControl, aba Win32 e esconder todas as abas do componente, mostrando só a aba da questão atual -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.blogspot.com/ 2008/4/17 Juliano Silva - Yahoo [EMAIL PROTECTED]: Pessoal Tenho um grande problema... tenho questionário grande no delphi, são várias perguntas, cada pergunta tem uma série de opções... bem o problema é o seguinte, tenho que colocar tudo isso em um FORM, são ao todos 40 questões, estou procurando alguma forma de fazer o FORM rolar automaticamente ou qualquer outra coisa, mas está muito difícil, gostaria de alguma sugestão, não posso colocar em ABAS... att. Juliano Silva [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Consulta de CEPs
HI, fiz um teste agora e deu certo. mostrou meu endereço. -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.wordpress.com/ Em 26/07/07, Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu: Eu Tb fiz um teste com pesquisa de CEP e não tinha funcionado. Mas eu falei com o cara do site e parece que tinha um problema com o '-' (89110-000) Pelo visto ele arrumou.. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Palm-one
HI, você precisa criar uma conduit com esse componente você consegue criar uma facin facin http://www.tabdee.ltd.uk/Downloads/TurboSync.html no exemplo vem justamente um código para acessar essas tabelas que já vem no palm -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.wordpress.com/ Em 25/06/07, Alexandre [EMAIL PROTECTED] escreveu: Alguem sabe como acessar arquivos do palm-one pelo delphi? tipo datebook.dat, address.dat? Não entendo de palm e preciso acessar esses arquivos e pegar o conteúdo. Alex ._,___ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Video Aula
HI, eu utilizo o Wink para essa finalidade, criar um screencast tem vários recursos para incrementar o vídeo, tipo linkar uma tela, colocar balões explicativos, etc. http://dprogrammer.wordpress.com/2007/01/24/criando-um-screencast-com-o-wink/ aí tem o link de uma versão para linux -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.wordpress.com/ Em 06/06/07, Alcistemas Informática [EMAIL PROTECTED] escreveu: Alguém conhece algum programa Free para gravar tipo video aula daquilo que faço no computador. Para usar nos meus aplicativos que escrevo, para economizar tempo em treinamento e apresentação de sistema. sei que é off, mais me perdoem já procurei de monte e free não acho nada. - Original Message - From: sampaiobrito To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Wednesday, June 06, 2007 4:23 PM Subject: [delphi-br] DBGrid O que faço!!!??? Alguém sabe como fazer para remover as barras de rolagem vert, hori do dbgrid... Desde já agradeço! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Ref. Startar programa Delphi
HI, aproveitando a pergunta como criar uma entrada no agendador de tarefas do windows usando o programa em Delphi ? -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.wordpress.com/ Em 04/06/07, Omar Marques [EMAIL PROTECTED] escreveu: Olá Delphianos, Bom dia/tarde, Alguém sabe como startar um programa Delphi em um determinado horário e com determinados parâmetros ? Preciso disso para rodar um programa automaticamente em cada madrugada e com determinados parâmetros. Qualquer ajuda é bem-vinda. Abços. Omar M. Haddad Analista de Sistemas [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Abrir arquivo do FTP com Indy
HI, tem um comando para listar o diretório no ftp, aí vc verifica no resultado se o arquivo existe pode-se aplicar até um filtro tipo listar só os txts código que utilizo. tem um trecho para pegar os arquivos do diretório procedure TfmFTPGet.ChageDir(DirName: String); Var LS: TStringList; I : Integer; Name : String; begin LS := TStringList.Create; try IdFTP1.ChangeDir(DirName); IdFTP1.TransferType := ftASCII; DirCorrente := IdFTP1.RetrieveCurrentDir; ListArquivos.Items.Clear; // TListBox // lista filtrando IdFTP1.List(LS, Mascara, True); // mascara é o filtro, tipo *.txt // pega o nome do arquivo for I := 0 to LS.Count - 1 do begin Name := IdFTP1.DirectoryListing.Items[I].FileName; ListArquivos.Items.Add(Name); end; finally LS.Free; end; end; qualquer coisa é só dizer -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.wordpress.com/ Em 30/05/07, pcinfowave [EMAIL PROTECTED] escreveu: Ola... Estou usando um sisteminha de FTP feito com componentes Indyz e gostaria de enviar mensagens a meus usuarios através da leitura de um arquivo texto que encontra-se em minha pasta de FTP. Assim: eu procuro na lista de arquivos a existencia de um arquivo de texto, ao encontrá-lo, quero abrir ele para exibir o conteudo do texto em um Memo ou qualquer outro meio. Entao, eu já consegui fazer todo o processo, só me falta abrir o arquivo de texto. Como fazer isso, abrir o arquivo via FTP? Tentei : Memo2.Lines.LoadFromFile('ftp://MEUFTP/LEIAME.TXT'); mas não deu certo. Se alguem puder ajudar, agradeço. []´s Paulo [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Bloquear o focus de uma dbgrid
HI, procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState); begin DBEdit1.SetFocus end; -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.wordpress.com/ Em 02/05/07, Henrique Cristiano Rodrigues [EMAIL PROTECTED] escreveu: Em um form tenho um edit e uma grid, o focus está no edit, mas quando rolo a grida para cima e abaixo, o focus vai para um doa campos dela, tem como tirar isso? Henrique Cristiano Rodrigues tel.: 9122-4471 Messeger: [EMAIL PROTECTED] henrique_mail%40yahoo.com.br Orkut: http://www.orkut.com/Profile.aspx?uid=10107590976039686513 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Dúvidas em Delphi!!
HI, vc pode hospedar a imagem aqui http://imageshack.us/ caso cada pedaço tenha uma cor, vc pode verificar qual é quando clicar e fazer o tratamento que vc deseja, associar ao campo, etc. se cada pedaço for um componente vc trata no onclick disponibiliza ae a figura -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.wordpress.com/ Em 02/05/07, Vantuil [EMAIL PROTECTED] escreveu: Pessoal, bom dia!...estou precisando criar uma figura em delphi que seria um circulo e dentro deste circulo um outro circulo menor. No circulo maior tenho que subdividir em quatro partições e cada partição terei que tratar com um campo que terá que ser ligado a um dataset, assim também vale para o circulo menor. Tentei colar a figura no email para ficar mais ilustrado mas infelizmente não consegui, então tentei anexar o arquivo jpg, mas também não deu certo, pois segundo a regra da lista não permiti arquivos anexados. Bem , se alguém da lista puder me ajudar qual melhor caminho a seguir eu agradeço. Abraços, Vantuil. Analista Programador [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Rotina de Extenso.
HI, precisei dessa rotina e peguei nesse site http://www.delphi.eti.br/ver_dica.php?id=5632 -- Paulo Alexsandro - dprogrammer Delphi, PHP, Ajax, Padrões Web, etc http://dprogrammer.wordpress.com/ Em 01/05/07, Marcos Antonio [EMAIL PROTECTED] escreveu: Colegas do grupo , boa tarde , alguel teria um exemplo de rotina de extenso para valores , uso o Delphi7 , desde já agradeço muito a vossa colaboração. Abraço à todos. Marco Antônio - Consultor em Sistemas. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Biblioteca de imagens
achei hoje esse serviço de busca de ícones IconFinder http://www.dreamplay.dk/icon aqui tem o exemplo de duas imagens (não são *.ico hehehe, tem de vários tamanhos) http://www.cdmj.com.br/forum/index.php?showtopic=6566 e eu peguei o arquivo do teu blog, já tou usando em meus sistemas e já vou catar imagens nesse sistema aí -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 21/04/07, Adriano Santos (Yahoo) [EMAIL PROTECTED] escreveu: Galera, Tô querendo atualizar meu sistema com uns ícones mais modernos, tipo do Windows XP, Office 2007 ou algo assim. Incluir, alterar, excluir e talz. Alguém tem alguma biblioteca legal ou link que possa me passar? Achei uma legal, mas não tem muitos ícones pra usar, a maioria não se encaixa muito com as aplicações que eu desenvolvo. Coloquei a biblioteca que encontrei disponível para download no meu blog, quem quiser pode pegar. www.delphitodelphi.blogspot.com Vlw -- -- Adriano Santos Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Colunista e Comissão Editorial da revista ClubeDelphi. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Gerar PDF
no link que foi passado pelo Wanderlei tem o componente TPrintPDF ele num serve não ? el componente que es utilizado por ExportPack para guardar a PDF, no tiene pérdida, es simplemente fundamental. Permite crear documentos PDF facilmente desde delphi. Gracias K.Nishita. -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 20/04/07, Rafael Marques [EMAIL PROTECTED] escreveu: Bom dia Wanderlei eu uso o Report Builder e até consegui um componente pra exportar os relatorios dele pra PDF, q por sinal deu um monte de prob e tive q remover! :( . O q eu gostaria é o q escrevi abaixo, q da tela mesmo o usuario clicar em um botao somente e ja gerar o PDF (onde posso criar manualmente mesmo), sem ter q abrir relatorios. obrigado Rafael - Original Message - From: Wandarlei To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Friday, April 20, 2007 8:14 AM Subject: RES: [delphi-br] Gerar PDF Bom dia Rafael Se você usa o QuickReport acesse o site http://usuarios.lycos.es/isma/expack.htm aqui tem um componente free para exportação para pdf. Wandarlei eu tenho ele instalado no cliente mas o prob é q pra isso tenho q gerar uma impressao e tudo +! minha intenção seria algo da seguinte forma (relato aqui apenas um exemplo simples): eu tenho uma tela que mostra o extrato do cliente e dali mesmo o usuario clicaria em um botao q gera-se o PDF e anexa-se em um email pra ja enviar pro cliente dele. Tudo apenas clicando em um botao. é +/- dessa forma q eu utilizaria!! to pesquisando no google e ainda num achei nada. Se eu achar eu vo postar aqui pra galera! mto obrigado Rafael - Original Message - From: Leandro To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Thursday, April 19, 2007 3:07 PM Subject: Re: [delphi-br] Gerar PDF Sem passar pelo gerador de relatorios nao conheço, mas tem o FreePDF que instala uma impressora virtual no seu computador... tudo que vc mandar imprimir nela fica no formato PDF (não só do seu programa)... att, Leandro - Original Message - From: Rafael Marques To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Thursday, April 19, 2007 1:17 PM Subject: [delphi-br] Gerar PDF Boa Tarde! Alguem conhece alguma rotina ou componente Free pra gerar um arquivo PDF a partir do Delphi??? eu gostaria de utilizar pra gerar Arquivos diretamente pra PDF (sem passar por algum gerador de relatorios, por exemplo montar manualmente algo e gerar o PDF dele) mto Obrigado Rafael [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Insert com problema (data e horario)
HI, qual a mensagem de erro ? e vc num acha melhor trocar esses #39 por QuotedStr ? +#39+FormatDateTime('mm/dd/',HORARIO.Time)+#39+ por + QuotedStr( FormatDateTime('mm/dd/',HORARIO.Time) ) + e passando a vista de novo, vi que no final tem essas aspas +); tira elas, deixa assim '+#39+FormatDateTime('mm/dd/',HORARIO.Time)+#39); seria o caso de usá-las se fosse assim ','''+ FormatDateTime('mm/dd/',HORARIO.Time) + ); -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 13/04/07, marciot2 [EMAIL PROTECTED] escreveu: Ola pessoal bom dia Estou com um problema, minha instrucao sql da erro, alguem poderia me ajudar obrigado. with DM do EDTCODEVENTO.Text:='0'; DM.IBQryevento.Close; DM.IBQryevento.SQL.Clear; DM.IBQryevento.SQL.Add('INSERT INTO EVENTO (EVE_CODIGO, CUR_CODIGO, EVE_NOME, EVE_RESPONSAVEL, EVE_LOCAL, EVE_DATAINICIO, EVE_DATAFIM, EVE_HORARIO) VALUES ('+EDTCODCURSO.Text+','+EDTCODCURSO.Text+','+#39+EDTNOMEEVENTO.Text+#39+','+#39+EDTRESPONSAVEL.Text+#39+','+#39+ EDTLOCAL.Text+#39+','+#39+FormatDateTime('mm/dd/',DATAINICIO.Date )+#39+','+#39+FormatDateTime('mm/dd/',DATAFIM.Date )+#39+','+#39+FormatDateTime('mm/dd/',HORARIO.Time)+#39+); DM.IBQryevento.ExecSQL; showmessage('Dados gravados com sucesso'); [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como enviar um texto pra outro programa
HI, lembrei que se faz isso usando comunicação DDE catei no google a mesma dúvida http://www.forumweb.com.br/foruns/index.php?showtopic=4195 aqui tem um exemplo http://www.geocities.com/SiliconValley/Bay/1058/exemplo.html DDE http://www.geocities.com/SiliconValley/Bay/1058/dde.zip Como fazer dois computadores se comunicarem entre si. -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 13/04/07, Fellipe Henrique [EMAIL PROTECTED] escreveu: Olá.. estou tentando enviar uma string de um programa para outro, tentei DLL e não consegui, agora queria saber se é possível eu tendo 2 programas, cada um com um TMemo, eu de um programa pra outro, clicar num botao, e passar os dados do TMEmo do Prog1 para o TMemo do Prog2... como faço isso? Desde já agradeço. []s -- _ Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [maf] Tipos de dados valor
HI, ShowMessage( DecimalSeparator ); sabendo se é . ou , é só usar StringReplace para trocar -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 12/04/07, Marcos Abreu Ferreira [EMAIL PROTECTED] escreveu: Pessoal Desenvolvi uma aplicação que recebe informações via porta serial. Dentre as informacoes, existem valores com campos decimais. Só que a aplicação vai ser usada aqui e no EUA. Queria saber como faço para saber se a máquina está configurada para separação decimal por '.' ou por ','. Alguém tem uma dica? Os valores que recebo são assim. $G,4,19,18,00:35:19.469 $H,7,19,14,00:01:50.429 ou $G,4,19,18,00:35:19,469 $H,7,19,14,00:01:50,429 Preciso substituir o '.' por ',' e ',' por '.' conforme a máquina estiver configurada! Alguém poderia me dar uma dica. Att Marcos Ferreira [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Criação de selects pelo usuário
como tou com o Delphi aberto aqui, quase 3 da madruga, tá facinho de responder tenho instalado aqui no d7 o ActiveQueryBuider, mas ainda não utilizei ele em nenhum sistema meu What is Active Query Builder? Active Query Builder is a visual SQL query builder component that allows your end-users to build complex SQL queries via an intuitive visual query building interface easily. http://www.activequerybuilder.com/index.html pegue o Active Query Builder VCL Free Edition http://www.activequerybuilder.com/download.html só não sei se é esse que foi mencionando aqui na lista -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 09/04/07, Murillo Proença [EMAIL PROTECTED] escreveu: Fala aí galera, blzinha? Um tempo atrás eu vi aqui na lista o pessoal falando sobre um componente que monta os Selects automaticamente, onde o usuário escolhe os campos que quer visualizar, os campos que quer filtrar e aí esse componente já monta o Select automaticamente. Só que andei pesquisando no histório e não encontrei nada. Alguém tem o nome deste componente? Vlw, abraço Murillo Proença [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Dúvidas sobre backup
HI, programa baum para fazer backup de GDB GBAK Scheduler http://www.comunidade-firebird.org/modules.php?name=Downloadsd_op=viewdownloadcid=20 vc agenda os dias, pode gravar em dois caminhos, definir o número de cópias, etc. acredito que vc encontre um aqui que tenha os fontes, aí caso queira, vc implementa a sua rotina http://www.firebase.com.br/fb/downloads.php?categ=5 Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 09/04/07, tatianajvieira [EMAIL PROTECTED] escreveu: Olá, preciso fazer uma rotina que gere um backup de um banco de dados .gdb através de uma tabela cliente.Desde já agradeço. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Semana do ano
HI, é vero Edu aproveitei e olhei o Help também Returns a TDateTime that represents a specified day of a specified week in a specified year. Unit DateUtils Category datetime routines Delphi syntax: function EncodeDateWeek(const AYear, AWeekOfYear: Word; const ADayOfWeek: Word = 1): TDateTime; -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 09/04/07, Edu Nicácio [EMAIL PROTECTED] escreveu: Dê uma olhada no Help do Delphi e procure pela unit DateUtils. Há um monte de rotinas prontas lá para o que você precisa. Abraço. -- Atenciosamente: Eduardo Cláudio Nicácio Analista Programador Fábrica 02 - CTIS Tel.: (11) 3150-6834 [EMAIL PROTECTED] rsn01.web03%40telesp.com.br - Original Message - From: Natanael Rodrigues To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, April 05, 2007 11:44 AM Subject: [delphi-br] Semana do ano Existe componente ou função que retorne de acordo com o número da semana do ano e o númedo do dia semana(Seg-Do o dia do calendário? Por exemplo: A Semana numero: 14 O dia da Semana: 4 retornaria 05/04/2007 Grato. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Selecionar todos os Registros na Grid
HI, tem sim um SelectALL RxDBGrid1.Options := RxDBGrid1.Options + [dgMultiSelect]; RxDBGrid1.SelectAll; -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 09/04/07, Tiago Vendemiatti [EMAIL PROTECTED] escreveu: Caros... Estou usando o código abaixo para selecionar todos os resgistro em uma DbGrid..porém está muito lento..pois ele vai registro a registro..e minha tabela tem mais de 200 Alguém faz de outra forma? tipo um SelectALL ?? Abs. Tiago var vlLinha: Integer;beginif CheckBox1.Checked = True thenbeginwith DBGrid1.DataSource.DataSet dobeginFirst;for vlLinha := 0 to RecordCount - 1 dobeginDBGrid1.SelectedRows.CurrentRowSelected := True;Next;end;end;DBGrid1.SelectedRows.Refresh;endelsewith DBGrid1.DataSource.DataSet dobeginFirst;for vlLinha := 0 to RecordCount - 1 dobeginDBGrid1.SelectedRows.CurrentRowSelected := false;Next;end;end;DBGrid1.SelectedRows.Refresh;end; [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Importar arquivo CSV
HI, O objetivo deste artigo é mostrar um método de importação de arquivos textos, padrão ASCII, com delimitador, independente da linguagem de programação utilizada na sua aplicação. Quem desenvolve sistemas em VB ou Delphi, por exemplo, geralmente depara-se com a necessidade de importar para um banco de dados, gerenciado pelo Access ou Paradox entre outros, algumas informações que estão armazenadas em um arquivo texto, de forma rápida e de fácil adaptação para outras rotinas do sistema. continua... http://linhadecodigo.com.br/artigos.asp?id_ac=354pag=1 -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 10/04/07, Rodrigo Magno [EMAIL PROTECTED] escreveu: Delphianos, Alguem tem alguma rotina ou função aonde faz a importação de um arquivo .csv Atenciosamente, Rodrigo Magno [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Selecionar todos os Registros na Grid
HI, digae tiago Estava desconfiado disso, hehehe o Grid que utilizo é da biblioteca RxLib, o TRxDBGrid olhando agora, vi que a biblioteca JEDI, o TJvDBGrid (Paleta jv Data Controls), também possui a propriedade SelectAll. Links RxLib http://www.delphibr.com.br/download.php JEDI http://www.delphi-jedi.org/ qualquer coisa o Google diz mais links. e precisando é só dizer -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 10/04/07, Tiago Vendemiatti [EMAIL PROTECTED] escreveu: Fala ae Paulo... Eu já deixei setado por default a opção MultSelect... Porém a Grid que estou usando não tem essa opção SelectAll. Qual componente vc está usando? Muito Obrigado abs.. Tiago To: [EMAIL PROTECTED] delphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] dprogrammer.listas%40gmail.comDate: Tue, 10 Apr 2007 03:15:35 -0300Subject: Re: [delphi-br] Selecionar todos os Registros na Grid HI,tem sim um SelectALLRxDBGrid1.Options := RxDBGrid1.Options + [dgMultiSelect];RxDBGrid1.SelectAll;--Paulo Alexsandro - dprogrammerhttp://dprogrammer.wordpress.com/Em 09/04/07, Tiago Vendemiatti [EMAIL PROTECTED] tiago.vendemiatti%40hotmail.com escreveu: Caros... Estou usando o código abaixo para selecionar todos os resgistro em uma DbGrid..porém está muito lento..pois ele vai registro a registro..e minha tabela tem mais de 200 Alguém faz de outra forma? tipo um SelectALL ?? Abs. Tiago var vlLinha: Integer;beginif CheckBox1.Checked = True thenbeginwith DBGrid1.DataSource.DataSetdobeginFirst;for vlLinha := 0 to RecordCount - 1 dobeginDBGrid1.SelectedRows.CurrentRowSelected := True;Next;end;end;DBGrid1.SelectedRows.Refresh;endelsewith DBGrid1.DataSource.DataSet dobeginFirst;for vlLinha := 0 to RecordCount - 1 dobeginDBGrid1.SelectedRows.CurrentRowSelected := false;Next;end;end;DBGrid1.SelectedRows.Refresh;end;[As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Filter dinâmico
HI, acredito Em 10/04/07, marcio_cbj [EMAIL PROTECTED] escreveu: Pessoal, alguém já precisou trabalhar com filtro dinâmico do ClientDataSet.Filter. tenho uma aplicação que o usuário faz uma consulta e exibe os dados na GRID, com o resultado dessa consulta o usuário pode escolher até três campos para fazer o filtro em cima dos valores consultados. Sei que é só ir colocando AND após uma condição de filtro, mas como fazer? Os campos que o usuário escolhe eu coloca em outra grid que contém a informação a ser consultada. Deu pra entender? Se alguém puder me ajudar. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Impressão de Imagem.
HI, vc pode criar um form com o quickreport por exemplo, colocar um componente de imagem depois carrega a imagem nesse componente e manda imprimir -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 10/04/07, Régis Bender [EMAIL PROTECTED] escreveu: Bom dia Pessoal. Tenho uma imagem em um determinado caminho (c:\imagens\imagem.jpg) e gostaria de imprimir esta imagem direto pelo delphi sem visualizar. Alguém pode me ajudar? sds Bender Desenvolvimento de Sistemas e Serviços Contábeis (Régis) (51) 98470699 Novo Hamburgo/RS MSN: [EMAIL PROTECTED] regissk8%40terra.com.br [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Filter dinâmico
HI, pressionei o tab sem querer e foi o que eu tinha digitado, hehehe vc vai ter que saber o tipo do campo para montar isso aí, por que se for uma data vai ter que botar no formato americano e dá um QuotedStr como vai ser a tela para o usuário escolher os campos que deseja ? pergunto, porque se tiver uma lista de 10 campo e ele colocar um valor em 3, aí vc usar um for, testa qual ele informou o valor e e monta a condição for 1 to 10 if Length(ValorCampo) 0 then Condicao := Condicao + NomeCampo = FormataValorCampo(ValorCampo) + ' AND ' ; end; depois vc deleta as última 5 posições da string FormataValorCampo() é para retornar de acordo com o tipo do campo é por aí -- Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 10/04/07, Paulo Alexsandro [EMAIL PROTECTED] escreveu: HI, acredito Em 10/04/07, marcio_cbj [EMAIL PROTECTED] escreveu: Pessoal, alguém já precisou trabalhar com filtro dinâmico do ClientDataSet.Filter. tenho uma aplicação que o usuário faz uma consulta e exibe os dados na GRID, com o resultado dessa consulta o usuário pode escolher até três campos para fazer o filtro em cima dos valores consultados. Sei que é só ir colocando AND após uma condição de filtro, mas como fazer? Os campos que o usuário escolhe eu coloca em outra grid que contém a informação a ser consultada. Deu pra entender? Se alguém puder me ajudar. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Componente WebCam
já testou esse ? Capturando imagens da WebCam no Delphi http://dprogrammer.wordpress.com/2007/01/27/capturando-imagens-da-webcam-no-delphi/ utilizo em um sistema para tirar foto dos funcionários para imprimir crachás Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 05/04/07, Vinicius Florido [EMAIL PROTECTED] escreveu: Estou precisando de um componente freeware ou opensource para tirar fotos com a webcam para utilizar em um modulo de cadastro... Estou procurando e até agora não encontrei nenhum que me agrade... Alguém pode dar dicas de algum bom ? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Semana do ano
HI, Estava aqui brincando de implementar essa rotina Primeiro arrumei uma função para retornar a semana do ano function TForm1.DateToWeek(Datum:TDateTime; var Year:Word):Word; var Y,M,D : Word; FDay : Word; Days : Integer; JanF : TDateTime; begin try DecodeDate(Datum,Y,M,D); Year:=Y; JanF:=EncodeDate(Y,1,1); FDay:=DayOfWeek(JanF); Days:=Trunc(Int(Datum)-JanF)+(7-DayOfWeek(Datum-1))+(7*ord(FDay in [2..5])); Result:=Days div 7; if Result=0 then begin if (DayOfWeek(EncodeDate(Y-1,1,1))5) or (DayOfWeek(EncodeDate(y-1,12,31))5) then Result:=52 else Result:=53; Year:=Y-1; end else if Result=53 then begin if (FDay5) or (DayOfWeek(EncodeDate(Y,12,31))5) then begin Result:=1; Year:=Y+1; end; end; except Result:=0; end; end; depois implementei uma rotina para retornar a data com base na semana do ano e no dia da semana (1=D, 2=S,.., 7=Sab) procedure TForm1.BitBtn2Click(Sender: TObject); Var DataDaSemana : TDate; SemanaDaData : Integer; SemanaInformada : Integer; DiaDaDemana : Integer; Ano : Word; begin Ano := 0; SemanaInformada := StrToInt(Edit3.Text); DataDaSemana := (SemanaInformada * 7) + StrToDate('01/01/2007'); // Depois implemente a rotina assim // DataDaSemana := (SemanaInformada * 7) + StrToDate('01/01/' + PegaAnoAtual); DiaDaDemana := DayOfWeek(DataDaSemana); SemanaDaData := DateToWeek(DataDaSemana, Ano); Label1.Caption := DateToStr(DataDaSemana) + ' = (Dia da Semana: ' + IntToStr(DiaDaDemana) + ') e (Semana do Ano: ' + IntToStr(SemanaDaData) + ')' ; Label2.Caption := IntToStr(DiaDaDemana); // apenas um teste para saber se a semana da data é maior que a semana informada if SemanaInformada SemanaDaData then Label3.Caption := 'Menor'; // caso a Semana da Data (var DataDaSemana) seja maior que a Semana do Ano informado // e o Dia da Semana seja maior que o informado, repete até encontrar a Data Correta // para o dia da semana informado // Repeat DataDaSemana := DataDaSemana - 1; Until (DateToWeek(DataDaSemana, Ano) = SemanaInformada) and (Edit4.Text = IntToStr(DayOfWeek(DataDaSemana))); Label4.Caption := DateToStr(DataDaSemana) + ' = (Dia da Semana: ' + IntToStr(DayOfWeek(DataDaSemana)) + ') e (Semana do Ano: ' + IntToStr(DateToWeek(DataDaSemana, Ano)) + ')' ;; end; tem essa imagem da tela do programinha que fiz http://img218.imageshack.us/img218/2055/teladiasemanaeu0.jpg tentei colocar toda a unit no pastebin.com, mas dá erro quando vai incluir e depois vou ver se tá correta essa função que retorna a semana do ano é que 07/01/2007 deu semana 1 dia 1, num é semana 2 não ? hehehe Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 05/04/07, Natanael Rodrigues [EMAIL PROTECTED] escreveu: Existe componente ou função que retorne de acordo com o número da semana do ano e o númedo do dia semana(Seg-Do o dia do calendário? Por exemplo: A Semana numero: 14 O dia da Semana: 4 retornaria 05/04/2007 Grato. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Operation not applicable
Essa mensagem de erro é familiar, hehehe, só não tava lembrando o que ocasionou ela olhei no google e lembrei que no meu caso foi relacionado ao midaslib.dll eu adiciono a unit MidasLib no uses do dpr, aí a dll é incorporada ao executável e não tem problema de encontrar em outro micro uma midaslib diferente e o campo do tipo DATE e TIME só funfam no dialect 3 Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com Em 30/01/07, Rafael Marques [EMAIL PROTECTED] escreveu: Boa tarde eu tenho alguns sistemas desenvolvido com dbexpress e bd Interbase 6 (ou FB 1.5) e/ou dbexpress/Sql Server . tem alguns computadores q dão a seguinte msg de erro qdo eu acesso algumas tabelas: Operation not applicable isso acontece em alguns computadores mas n acontece em outros!!! eu instalei a mesma versao do Firebird em todas!! ja tentei trocar pelo Interbase e nada!! eu fiz algo na epoca q ajudou q foi voltar o dialeto pra 1 e mudar os campos TimeStamp pra Date ( no caso do IB/FB)!! no Sql n funfa d jeito nenhum!! esta msg é sempre qdo acesso algum campo tipo Data e em só alguns PCs mto obrigado Rafael [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Layout extrato bancário
Boa tarde Alguém sabe aonde consigo o layout de extrato bancário para que eu possa implementar a importação em um sistema que estou desenvolvendo sobre controle de finanças pessoais desde já eu agradeço Paulo Alexsandro - dprogrammer dprogrammer.wordpress.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Layout extrato bancário
vou fazer, entrarei em contato com os bancos valeu pela dica eu vi que no site da caixa tem uma opção do Money, da microsoft ele gerou um arquivo .ofc com o conteúdo do extrato olhando a descrição de outros sistemas, vi que alguns arquivos importados tem a extensão .ofc e .ofx achei até um componente para ler arquivo no formato OFC http://www.torry.net/pages.php?id=274 especificação do OFC http://ferraroa.dyndns.org:8200/MnyBank/help/Specs_Ofc.html sobre o OFX http://www.ofx.net/ofx/default.asp caso eu achei mais coisas sobre o assunto eu coloco aqui Em 07/01/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Esse layout segue o padrão CNAB, mas ele (o arquivo) varia conforme o banco. Informe-se com o(s) banco(s) que seu software irá trabalhar a respeito do manual de layout do arquivo de conciliação bancária. É desse manual que vc irá precisar. Sds. From: Paulo Alexsandro [EMAIL PROTECTED]dprogrammer.listas%40gmail.com Reply-To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: [delphi-br] Layout extrato bancário Date: Sun, 7 Jan 2007 17:05:37 -0300 Boa tarde Alguém sabe aonde consigo o layout de extrato bancário para que eu possa implementar a importação em um sistema que estou desenvolvendo sobre controle de finanças pessoais desde já eu agradeço Paulo Alexsandro - dprogrammer dprogrammer.wordpress.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ç provoca erro em WebService
HI, estou usando o WebService http://www.xmethods.net/sd/2001/BabelFishService.wsdl E quando tento traduzir Heart dá esse erro (notem que para no cora) Caractere inválido encontrado no texto. ?xml version=1.0 encoding=UTF-8?SOAP-ENV:Envelope xmlns:SOAP-ENC= http://schemas.xmlsoap.org/soap/encoding/; SOAP-ENV:encodingStyle= http://schemas.xmlsoap.org/soap/encoding/; xmlns:xsi= http://www.w3.org/2001/XMLSchema-instance; xmlns:SOAP-ENV= http://schemas.xmlsoap.org/soap/envelope/; xmlns:xsd= http://www.w3.org/2001/XMLSchema;SOAP-ENV:Bodynamesp1:BabelFishResponse xmlns:namesp1=urn:xmethodsBabelFishreturn xsi:type=xsd:stringcora já tentei mudar aqui a propriedade Converter.Encoding para ISO-8859-1, mas não adiantou, não consigo resolver essa bronca. estou duas noites caçando a solução no google e o mais perto que cheguei foi um texto de outra pessoa com o mesmo problema desde já eu agradeço [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] HTTP POST + Google Translator, como ?
HI, tudo bom PessoALL estou aqui quebrando a cabeça para pegar o resultado de uma tradução usando o Google Translator Achei uma Classe em PHP e como pegar o resultado do metodo POST usando o delphi Classe PHP - http://www.phpclasses.org/browse/package/3285.html invoke a HTTP Post request? http://www.swissdelphicenter.ch/torry/showcode.php?id=1855 Tento usar o exemplo, mas dá erro de Bad Request. Alguém aqui já pegou o resultado do google translator ? poderia dizer como se faz ? vou continuar tentando, caso eu consiga achar a solução, coloco aqui uses IdMultipartFormData; procedure TfmPrinc.JvXPButton2Click(Sender: TObject); var data: TIdMultiPartFormDataStream; begin data := TIdMultiPartFormDataStream.Create; try { add the used parameters for the script } data.AddFormField('langpair', 'en|pt'); data.AddFormField('text', Memo1.Lines.Text); { Call the Post method of TIdHTTP and read the result into TMemo } Memo2.Lines.Text := IdHTTP1.Post(' http://translate.google.com/translate_t', data); finally data.Free; end; end; desde já eu agradeço [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como fazer help?
http://dprogrammer.wordpress.com/2006/03/23/html-help/ usa o HelpNDoc, tem versão free. Paulo Alexsandro http://dprogrammer.wordpress.com/ Em 13/12/06, tatianajvieira [EMAIL PROTECTED] escreveu: Olá, estou precisando fazer um help para o sistema que estou fazendo, alguém pode me dar uma dica de como fazer? Obrigada, Tatiana [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Programação Delphi Para Palm
Utilizo o NSBasic para fazer meus programas para PalmOS http://www.nsbasic.com/ visita esse site http://www.clubepda.com.br/index.asp Paulo Alexsandro dprogrammer.wordpress.com Em 11/12/06, [EMAIL PROTECTED] [EMAIL PROTECTED] escreveu: Não. Eu quero dizer Palm com Sistema Palm Os Garnet 5.4.8 ou outros. Não é Windows Mobile... São os sistemas usados no LifeDrive, TX, Zire72 e etc... Windows Mobile, PocketPC é outra plataforma completamente diferente. _ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Busca por data
Tenta assim DM.CDSAgendamento.Close; DM.QryAgendamento.SQL.Clear; // DM.QryAgendamento.SQL.Text:='SELECT * FROM AGENDAMENTO WHERE COD_ALUNO = '+pcod+ ' and DATA Between ' + QuotedStr(FormatDateTime('dd/mm/yyy', pdtini)) + ' and ' + QuotedStr(FormatDateTime('dd/mm/yyy', pdtfim)); DM.CDSAgendamento.Open; Paulo Alexsandro http://dprogrammer.wordpress.com/ Em 08/12/06, Marciot2 [EMAIL PROTECTED] escreveu: ola pessoal Estou tentando fazer uma bucar por data mais da o seguinte erro conversion error from string 0 alguem saber como posso tratar deste erro, abaixo vai a procedure de busca DM.CDSAgendamento.Close; DM.QryAgendamento.SQL.Clear; // DM.QryAgendamento.SQL.Text:='SELECT * FROM AGENDAMENTO WHERE COD_ALUNO = '+pcod+ ' and DATA Between '+DateToStr(pdtini)+ ' and '+DateToStr(pdtfim)+''; DM.CDSAgendamento.Open; -- no delphi compilando passo a passo ele encontra-se desse jeito DM.QryAgendamento.SQL.Text:='SELECT * FROM AGENDAMENTO WHERE COD_ALUNO = 50 and DATA between (12/06/2006) and (31/12/2006)' [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ERRO
tenta essas dicas http://www.activedelphi.com.br/modules.php?op=modloadname=Newsfile=articlesid=399mode=threadorder=0thold=0 http://www.webmundi.net/forum/printer_friendly_posts.asp?TID=158 Programa para backup GBak Scheduler http://www.comunidade-firebird.org/modules.php?name=Downloadsd_op=viewdownloadcid=20 http://www.comunidade-firebird.org/modules.php?name=Downloadsd_op=viewdownloadcid=20 Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ 2006/12/6, Ana Amélia Souza Pereira [EMAIL PROTECTED]: Olá, Alguém pode me ajudar com este erro: database file appears corrupt{} bad checksum checksum error on database page 290. O que devo fazer para resolver. Ana Amélia [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [off] Quanto vc cobra por hora?
HI, tudo bom camaradas vou vender meu peixe aqui, hehehe Eu fiz um programa para controlar as horas dispensadas em um projeto. É freeware. Download http://baixaki.ig.com.br/site/detail38772.htm Página que eu fiz para ele http://dprogrammer.cetasistemas.com.br/timertrab/ Help On-line http://dprogrammer.cetasistemas.com.br/timertrab/help/timertrab.htm Um pouco sobre o desenvolvimento dele http://dprogrammer.wordpress.com/tag/timer-trab/ Não instala nada, não mexe no registro, não coleta informações e não se conecta à internet. Utiliza o Mybase (.cds) para armazenar os dados. Eu usava o Tarifador, mas eu precisava de mais recursos então acabei fazendo esse. Espero que seja útil. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Form
você cria um procedure/function no form que vai ser chamado com o código que vc precisa que seja executado e no dbgrid, antes de chamar o form ( form.show{modal} ), você chamar a procedure/function passando o valor cria form form.executaalgo(valor); form.showmodal; form.release; Paulo Alexsandro - dprogrammer http://dprogrammer.wordpress.com/ Em 05/12/06, Ricardo Cabral [EMAIL PROTECTED] escreveu: OLá pessoal ! Utilizo o delphi 7 e problema é o seguinte: Renho um dbgrid e gostaria de que no envento do clique duplo um form fosse aberto a executasse um evento com um valor vindo do form onde está o dbgrid. Desde de já agradeço. Ricardo Cabral Mensagens neste tópico http://br.groups.yahoo.com/group/delphi-br/message/31103;_ylc=X3oDMTM3YnBjZWVwBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE2NTEwNQRzZWMDZnRyBHNsawN2dHBjBHN0aW1lAzExNjUzMzM2MTkEdHBjSWQDMzExMDM-( 6) Responder (através da web) http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJyYzJpcDVzBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE2NTEwNQRzZWMDZnRyBHNsawNycGx5BHN0aW1lAzExNjUzMzM2MTk-?act=replymessageNum=165105| Adicionar um novo tópico http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJlZDM0NmxiBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTE2NTMzMzYxOQ-- Mensagenshttp://br.groups.yahoo.com/group/delphi-br/messages;_ylc=X3oDMTJlazBwdTQ1BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA21zZ3MEc3RpbWUDMTE2NTMzMzYxOQ--| Arquivoshttp://br.groups.yahoo.com/group/delphi-br/files;_ylc=X3oDMTJmYmFnNG04BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2ZpbGVzBHN0aW1lAzExNjUzMzM2MTk-| Fotoshttp://br.groups.yahoo.com/group/delphi-br/photos;_ylc=X3oDMTJlZ2tiZDkxBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA3Bob3QEc3RpbWUDMTE2NTMzMzYxOQ--| Linkshttp://br.groups.yahoo.com/group/delphi-br/links;_ylc=X3oDMTJmZzU5YmkwBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2xpbmtzBHN0aW1lAzExNjUzMzM2MTk-| Banco de dadoshttp://br.groups.yahoo.com/group/delphi-br/database;_ylc=X3oDMTJjdGk2azZhBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2RiBHN0aW1lAzExNjUzMzM2MTk- -- [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Erro ADO + Delphi, loucura, socorro, hehehe
HI, blz galera tou aqui quebrando a cabeça de um sistema que tenho com Access e Delphi utilizando ADO tá dando esse erro O provedor atual não oferece suporte para a interface necessária à funcionalidade Índice a tabela tem 2 campos e eu coloquei os 2 como chave primaria o erro acontece quando uso o Seek if tabela.seek(ArrayVarOf([v1, v2], SoFirstEQ) then dá erro nisso o interessante é que essa mensagem de erro só acontece quando eu tou no Delphi, quando executo o sistema pelo explorer, essa msg não aparece, mas também ele não localiza, e a chave atende, era para dizer que achou uso XP prof, o delphi 5 tá com o ADO atualizado eu nunca que tinha visto esse erro no 98 tive que usar o locate enquanto eu num resolvo essa parada, hehehe é preciso eu atualizar o SP2, atualizar o MDAC ? o que fazer ? hehehe enquanto eu tava digitando eu tava no windows update e já vi coisa relacionado a ADO Atualização de segurança para o Microsoft Data Access Components (KB832483) vou mandar esse email e qialquer cosia digo se funcionou e desde já agradeço Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 Yahoo! Mail - Com 250MB de espaço. Abra sua conta!http://mail.yahoo.com.br/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Capturar evento de minimizar/maximizar formulário
HI, tem sim em Public vc declara procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; procedure TForm1.WMSysCommand; begin if (Msg.CmdType = SC_MINIMIZE) then quando minizar else if (Msg.CmdType = SC_MAXIMIZE) then quando maximizar DefaultHandler(Msg); end; Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- Osmar de Souza Júnior [EMAIL PROTECTED] wrote: Para maximizar não tem. Mas acho que o evento OnRestore deva servir para o que você quer fazer... Você deve criar 2 rotinas, uma para tratar quando a aplicação é minimizada, e a outra para quando o usuário restaurar a aplicação. Essas rotinas devem, obrigatoriamente, ter os seguintes parâmetros: procedure appRestauracao(Sender: TObject); begin Timer.Enabled := true; end; procedure appMinimiza(Sender: TObject); begin Timer.Enabled := false; end; Aí, você passa essas rotinas para aplicação, por exemplo, no Data Module (ao criar); Application.OnRestore := appRestauracao; Application.OnMinimize := appMinimiza; Isso deve bastar... Que a força esteja com você! --- Em delphi-br@yahoogrupos.com.br, Andre - Yahoo [EMAIL PROTECTED] escreveu Gostaria de saber se alguem da lista saberia como capturar os eventos que ocorrem quando minimizo e quando maximizo um formulário. Preciso saber quando o formulário principal foi minimizado para poder disparar um TTimer e quando ele for maximizado preciso parar o TTimer. Alguem pode me ajudar ??? André Luis da Silveira Desenvolvedor Latícinios Morrinhos Ind Com Ltda [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] DbLockup com item nulo
HI, no RXLib tem um componente para isso, só não lembro o nome (tou sem poder abrir o delphi agora senão trava tudo, hehehe ), mas eu uso ele. tem uma propriedade que é EmptyValue, tipo vc coloca nessa propriedade por exemplo, Escolha um Item Qualquer, aí aparece essa descrição e os itens cadastrados e também vc testa se a opção escolhida foi a do Empty Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 angela_cristinaa wrote: Ola a todos da lista. Caso minha pergunta ja tenha sido respondida peco desculpas antecipadas. É que nunca consegui fazer um Dblockup com um item nulo, caso o usuario nao queria relacionar nenhum item para aquele campo. Há alguma forma de eu fazer isto? Com ListBox ou outro componente? Agradeço qualquer dica. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Manipulação de vários TPanels.
HI, testa assim TPanel(FindComponent('paQtde' + IntToStr(Qtde))).Height := 1; se acorrer erro, acredito que ele tá querendo acessar um panel que não existe Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- Rodrigo de Moura [EMAIL PROTECTED] escreveu: Bom dia Senhores, Tenho o seguinte problema: possuo uma query que me retorna a quantidade de depósitos de uma determinada propriedade. Diante disso mostro ao usuário o volume de cada depósito. Para visualização desses volumes construi uma série de imagens e panels onde mostro como está a capacidade de cada depósito. Na tela tenho 10 imagens com 10 panels onde faço os devidos ajustes na altura desse panel para mostrar esse volume. O meu problema é que quando vou calcular esse volume e atribuí-lo à altura do componente Panel dá um acess violation. Faço o seguinte: TPanel(FindComponent('paQtde' + IntToStr(Qtde))).Height := Trunc(Altura*(1-(ParamByName('@qtd_saldo').AsFloat/Capacidade))); onde Altura, é a altura fixa dos Panels, @qtd_saldo é o volume atual que o depósito possui e capacidade é o volume total que cada depósito suporta. Claro que tenho um for para fazer esse cálculo para cada depósito da propriedade caso esta tenha mais de um depósito, por isso a variável Qtde é o número do respectivo depósito o qual é concatenado com a string 'paQtde', que é o nome incial de todos os panels, os quais são diferenciados pelo seu número, ou seja, tenho paQtde1, paQtde2, paQtde3 ... até o 10. Não sei se estou sendo claro na minha dúvida, mas qualquer ajuda é válida. Atenciosamente, Rodrigo de Moura [EMAIL PROTECTED] ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Capturar qual formulario esta ativo, para log de erro.
HI, tenta este indica qual o form esta com o foco Screen.ActiveForm NomeForm := Screen.ActiveForm.Name; Acredito que para saber o controle que tava com o foco seja este Screen.ActiveForm.ActiveControl qualquer coisa tu dá uma oiada no help por ActiveForm Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- adrianolista [EMAIL PROTECTED] escreveu: Bom dia! Como fasso para capturar o nome do formulario que esta ativo e gerou erro na minha aplicação? Estou gerando um rotina de log de erro, so falta informar o formulario ativo e qual dos componentes do formulario estava ativo. Atenciosamente Adriano ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Inserir texto no memo na posição X,Y - como ?
HI, tudo bom camaradas tou tentando fazer aquele esquema do IBExpert de arrastar o campo para o memo onde a pessoa digita a SQL quero fazer um esquema para montar a SQL, já fiz um tree com as tabelas e seus campos e a parte de digitar a SQL só que quando eu arrasto (drag drop) ele sempre insere na linha de baixo gostaria que ele fosse inserido onde está o cursor tem alguma propriedade do memo para isso, ou eu vou ter que criar algum esquema para isso ? já usei Text := Text + String, Insert, Add desde já agradeço Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Inserir texto no memo na posição X,Y- como ?
HI, tudo bom camaradas tou tentando fazer aquele esquema do IBExpert de arrastar o campo para o memo onde a pessoa digita a SQL quero fazer um esquema para montar a SQL, já fiz um tree com as tabelas e seus campos e a parte de digitar a SQL só que quando eu arrasto ele sempre inseri na linha de baixo gostaria que ele fosse inserido onde está o cursor tem alguma propriedade do memo para isso, ou eu vou ter que criar algum esquema para isso ? já usei Text := Text + String, Insert, Add desde já agradeço Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Inserir texto no memo na posição X,Y - como ?
HI, consegui resolver essa parada pesquisei no google por drag drop insert text RichEdit e de cara já veio a solução http://www.swissdelphicenter.ch/en/showcode.php?id=733 e foi mauls por ter duas msg, eu mandei para outra lista e coloquei errado o endereço, por isso veio uma seguunda msg Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- Paulo Alexsandro [EMAIL PROTECTED] escreveu: HI, tudo bom camaradas tou tentando fazer aquele esquema do IBExpert de arrastar o campo para o memo onde a pessoa digita a SQL quero fazer um esquema para montar a SQL, já fiz um tree com as tabelas e seus campos e a parte de digitar a SQL só que quando eu arrasto (drag drop) ele sempre insere na linha de baixo gostaria que ele fosse inserido onde está o cursor tem alguma propriedade do memo para isso, ou eu vou ter que criar algum esquema para isso ? já usei Text := Text + String, Insert, Add desde já agradeço Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Programa de Help
HI, HTML Help da microsoft que cria os helps no novo padrão, os chm, estilo página web e o helpscrible, esse é das antigasm eu usava no colegio, caso vc não pague por ele, ele só faz inserir um link no final do help. ele cria help no formato antigo, hlp, mas acredito que o mesmo fabricante possua alguma ferramenta para os help chm ae mano, tou meio com sono agora, v se tu pega o link no google, tou quase operando no piloto automático, hehehe, tou catando aqui no google como colorir palavras chaves no rich, mas o sono tá sodz, e fois mausl aí o email, muitos caracteres digitados, hehehe Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- [EMAIL PROTECTED] escreveu: Pessoal, alguém poderia me indicar um programa free para a criação de help. GRato ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] JPG no OpenPictureDialog
HI, declara a Unit JPEG na clausula Uses Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- Erika Lemes [EMAIL PROTECTED] escreveu: Boa tarde pessoal! Eu gostaria de saber como abrir imagens JPG no OpenPictureDialog, pois só consigo abrir imagens Bitmap Obrigado!! - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Winzip
HI, cabei de colocar um exemplo desses lá no meu site, espero que sirva http://dprogrammer.cjb.net Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- Adenes I. Freire Junior [EMAIL PROTECTED] escreveu: Utilizo o arj.exe para gerar backup dos banco de dados dos meus aplicativos, verifiquei que só funciona no windows 98, no XP ele não gerar o arquivo de backup. Pensei em usar o WinZip, como faço para compactar e descompactar pelo winzip? Quais são os comando? Adenes I. Freire Junior [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Impressora Matricial em rede
HI, acredito que seja na opção Capturar Porta da Impressora, onde vc relaciona um caminho da rede a uma porta do micro Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- Ulisses [EMAIL PROTECTED] escreveu: Boa noite a todos! Como faço para imprimir direto para um impressora matricial em rede usando o código abaixo? AssignFile(F,Porta); Rewrite(F); Write(F,'Teste'); Tem jeito? Grato. Ulisses = Paulo Alexsandro - dprogrammer http://dprogrammer.cjb.net Delphi, NSBasic, etc. Fontes, artigos, visitem. ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] depurar SQL, tem como ?
HI, há muito tempo atrás quando eu estudava C no colegio o prof. ensinou a escrever na tela para saber oq ue estava acontecendo com o programa, tipow um debug então vc poderia criar uma tabale, e dá um insert antes do update com os valores que vc tá passando para ele. BEGIN UM INSERT AQUI, PARA CRIAR UM LOG UPDATE ESTOQUE SET ESTOQUE = (ESTOQUE - NEW.SAIDAS) WHERE CODIGO = NEW.COD_MAT; END obs: como tou no delphi, eu ainda uso esse esquema, hehehe, dificilmente eu uso o debug, uso o ShowMessage, hehehe Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- auristonlopes [EMAIL PROTECTED] escreveu: dados os codigos abaixo pergunto: CREATE TRIGGER MovprodBI FOR Movprod ACTIVE BEFORE INSERT POSITION 0 AS declare variable ES Varchar(1); declare variable MOVIES Varchar(1); declare variable CANCELADA Varchar(1); BEGIN Select ES,MOVIES,CANCELADA from MOVPROD where COD_MAT = NEW.COD_MAT INTO :ES, :MOVIES, :CANCELADA; IF ((CANCELADA = 'N') AND (MOVIES = 'S') AND (ES = 'S')) THEN BEGIN UPDATE ESTOQUE SET ESTOQUE = (ESTOQUE - NEW.SAIDAS) WHERE CODIGO = NEW.COD_MAT; END ELSE IF ((CANCELADA = 'N') AND (MOVIES = 'S') AND (ES = 'E')) THEN BEGIN UPDATE ESTOQUE SET ESTOQUE = (ESTOQUE + NEW.ENTRADAS) WHERE CODIGO = NEW.COD_MAT; END END CREATE TRIGGER MovprodBU FOR Movprod ACTIVE BEFORE UPDATE POSITION 0 AS declare variable ES Varchar(1); declare variable MOVIES Varchar(1); declare variable CANCELADA Varchar(1); BEGIN Select ES,MOVIES,CANCELADA from MOVPROD where COD_MAT = OLD.COD_MAT INTO :ES, :MOVIES, :CANCELADA; IF ((CANCELADA = 'N') AND (MOVIES = 'S') AND (ES = 'S')) THEN BEGIN UPDATE ESTOQUE SET ESTOQUE = (ESTOQUE + OLD.SAIDAS) - NEW.SAIDAS WHERE CODIGO = NEW.COD_MAT; END ELSE IF ((CANCELADA = 'N') AND (MOVIES = 'S') AND (ES = 'E')) THEN BEGIN UPDATE ESTOQUE SET ESTOQUE = (ESTOQUE - OLD.ENTRADAS) + NEW.ENTRADAS WHERE CODIGO = NEW.COD_MAT; END END CREATE TRIGGER MovprodBD FOR Movprod ACTIVE Before DELETE POSITION 0 AS declare variable ES Varchar(1); declare variable MOVIES Varchar(1); declare variable CANCELADA Varchar(1); BEGIN Select ES,MOVIES,CANCELADA from MOVPROD where COD_MAT = OLD.COD_MAT INTO :ES, :MOVIES, :CANCELADA; IF ((CANCELADA = 'N') AND (MOVIES = 'S') AND (ES = 'S')) THEN BEGIN UPDATE ESTOQUE SET ESTOQUE = ESTOQUE + OLD.SAIDAS WHERE CODIGO = OLD.COD_MAT; END ELSE IF ((CANCELADA = 'N') AND (MOVIES = 'S') AND (ES = 'E')) THEN BEGIN UPDATE ESTOQUE SET ESTOQUE = ESTOQUE - OLD.ENTRADAS WHERE CODIGO = OLD.COD_MAT; END END^ SET TERM ;^ por que o evento delete funciona e os outros nao funciona, se alguem puder me ajudar, me socorra. fiz um teste com o ibexpert e os eventos funcionaram, so nao funciona na minha aplicacao, sera que tem uma maneira de depurar estes codigos, para que eu veja se ele realmente estao sendo chamados pelo BD ??? sds auriston ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] OFF-TOPPIC - Totalmente desanimado com programação...
HI, isso aí é verdade, eu mesmo sempre tive em mente deixar de trabalhar por um salário. além de ser baixo, vc desenvolve um produto e num ganha nem um parabéns muitas das vezes, e seu chefe ganha muita grana muita das vezes. eu no nivel que tou hj, só aceitaria trabalhar numa empresa de desenvolvimento se eu tivesse participação nos lucros e muitos dos problemas que acontence é de um programador não trabalhar num empresa de desenvolvimento, eu tava numa empresa assim, uma distribuidora. vc nunca é reconhecido quando trabalha de progamador num empresas assim, caso seus chefe nem saiba o que vc tá fazendo, hehehe. e se vc entregar o que ele pede rapinho ele vai achar que seu trabalho é uma moleza, hauahuauha. sem falar que eu fazia muita coisa que num tinha nada a ver com programação. MAS EU SOU BRASILEIRO, NÃO DESISTO NUNCA, hehehe programar é minha vida e agora tou tendo a chance de trabalhar em casa (pedi para sair da empresa, fiquei muito estressado), sem estresse, só dando gás no produto que desenvolvi, e as coisas tão começando a melhorar tenho um socio, eu desenvolvo e ele vende, e tá muito bom assim. fazendo um pouco de propaganda, hehehe http://cetasistemas.no-ip.info e como agora tou com um pouquinho de tempo disponivel, tou voltando com meu site sobre programação. Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- Williams Diaz [EMAIL PROTECTED] escreveu: Felipe, você está certissimo. Eu já tinha colocado esse assunto de salário baixo aqui na lista. Sugestões, o Walter já as deu todas e bem explicadinhas (faculdade e especialização-não esqueça). Bom, eu sei que nem todo mundo gosta de trabalhar autónomo, mas se você puder desenvolva um produto, bom, que possa ser vendido-Nunca mais você vai precisar de emprego. abraços, williams *--- Williams Díaz [EMAIL PROTECTED] http://www.interban.com.br - Original Message - From: Felipe Pasqualotto [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Friday, February 18, 2005 5:14 PM Subject: [delphi-br] OFF-TOPPIC - Totalmente desanimado com programação... Desculpem o OFF, mas eu recebo os resumos do CEVIU e assino a lista Delphi-Empregos, sou um programador Delphi/IB-FB a 5 anos e estou desanimado pois vejo na maioria dos e-mail um valor de salário baixo para nossa profissão, sempre na faixa de 1.000,00 a 1.500,00 (e nem cheguei no primeiro ainda) e pouquíssimas vezes vi uma salário acima de 2.000,00. Eu só queria saber se a realidade por esse Brasil é essa mesma. Isto cada vez mais me leva a crer que estou no ramo errado, não que não goste de programar, é minha vida programar, mas é uma pena que se ganhe tão pouco. Claro, lembrando que sou funcionário ou colaborador como alguns preferem dizer, eu ainda prefiro falar pião e não o patrão. Caso alguém queira comentar peço que faça em private, não quero causar um tumulto aqui. Abraços e sucesso a todos... Felipe Pasqualotto MSN: [EMAIL PROTECTED] YAHOO!: [EMAIL PROTECTED] ICQ: 208461306 ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Query
HI, tudo bom camarada coloquei 2 apostilas que tratam do uso de SQL, tabelas, etc. mas vc poderia por exemplo dizer qual a sua dificuldade, tipos de como criar uma SQL para ser usadas com parametros no Delphi, etc. qualquer coisa eu faço um pequeno exemplo e mando para teu email Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- villacortamiguel [EMAIL PROTECTED] escreveu: Pessoal, alguem possui e poderia enviar algum material de como trabalhar com consultas no delphi, segui o conselho de muitos e procurei na net, mas achei muito pouco. Grato Miguel -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] [OFF-TOPIC] Ferramenta p/ desenvolver HELP
HI, vc pode utilizar o HTML Help da microsoft para desenvolver Help no novo padrão, os Help que são no estilo HTML ou no esquema antigo, um bom progama é o HelpScrible procura no google por Html Help, eu tenho um link de um site sobre o desenvolvimento de Help utilizando o padrão do HTML Help para delphi, mas tá me casa Intel + Paulo Alexsandro - dprogrammer http://dprogrammer.cjb.net - Delphi NSBasic --- Jéferson [EMAIL PROTECTED] escreveu: Pessoal, Qual ferramenta devo utilizar para desenvolver arquivos de HELP para os meus sistemas??? Qual vcs utilizam??? Aceito qualquer sugestão: (software, artigos, links, etc...) Pesso a gentileza que respondam em PVT para [EMAIL PROTECTED] para não poluirmos nossa lista. []s Jéferson Mehlecke -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html = Paulo Alexsandro - dprogrammer http://dprogrammer.cjb.net Delphi, NSBasic, etc. Fontes, artigos, visitem. ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Configurações Regionais!!!!
HI, sempre eu uso para determinar o formato da data, o ShortDateFormat ShortDateFormat := 'dd/mm/' tem vario, pesquisa no help do delphi qe tem muitas opções Intel + Paulo Alexsandro - dprogrammer http://dprogrammer.cjb.net - Delphi NSBasic --- Andre Nunes [EMAIL PROTECTED] escreveu: como faço para configurar via Delphi as configurações regionais Andre Nunes -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Configurações Regionais!!!!
HI, o problema é que a aplicação dessa maneira muda a máquina do cliente, e se ele num queiser usar a data assim, etc e tem como formatar as tadas, o separador de milhar, etc, usando comando do delphi mesmo DecimalSeparator, ShortDateFormat Intel + Paulo Alexsandro http://dprogrammer.cjb.net - Delphi NSBasic --- Ulisses [EMAIL PROTECTED] escreveu: Boa tarde! Utilize a função abaixo para configurar o formato de data. Faça o mesmo para os demais itens, basta alterar também os demais valores no Registro do Windows. procedure ConfiguracoesRegionais; var Reg: TRegistry; begin Reg := TRegistry.Create; //HKEY_CURRENT_USER\Control Panel\International try Reg.RootKey := HKEY_CURRENT_USER; if Reg.OpenKey('\Control Panel\International', True) then begin Reg.WriteString('sShortDate','dd/MM/'); Reg.WriteString('sDate','/'); Reg.CloseKey; end; finally Reg.Free; inherited; end; end; Boa sorte. Ulisses - Original Message - From: Andre Nunes To: delphi-br@yahoogrupos.com.br Sent: Thursday, February 17, 2005 11:44 AM Subject: [delphi-br] Configurações Regionais como faço para configurar via Delphi as configurações regionais Andre Nunes [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Sugestão para Tabelas Pai-Filh o?=
Hi, vc testa antes se a tabela pai esta em mode de Edit ou insert só deixa iniciar o trabalho a tabela filha se a tabela não estiver em nenhum desses estados if Not tabela.state in [dsEdit, dsInsert] then Intel + Paulo Alexsandro http://dprogrammer.cjb.net - Delphi NSBasic --- moacirponti [EMAIL PROTECTED] escreveu: Olá a todos. Quero sugestões para resolver um problema com tabelas pai-filho. Uso Firebird e Delphi 6. O sistema que estou desenvolvendo possui duas tabelas para registro de contas a pagar: 1) CONTASPAGAR 2) CONTASPAGAR-PARCELAS A tabela CONTASPAGAR tem como chave primária o campo CODIGO, e a tabela CONTASPAGAR-PARCELAS tem chave primária composta (CODIGO, PARCELA), sendo que CODIGO também é chave estrangeira que referencia CODIGO em CONTASPAGAR. Quando fiz um formulário para cadastrar Contas a Pagar percebi que não poderia fazer assim: ContasPagar.Insert; for i=1 to TotParcelas begin ContasPagarParcelas.Insert; ContasPagarParcelas.Post; end; ContasPagar.Post; Isto porque, como não salvei o registro em CONTASPAGAR antes de iniciar a inserção das parcelas, o CODIGO ainda não existe para ser salvo em CONTASPAGAR-PARCELAS. Como fazer para contornar este tipo de problema? Abraços e obrigado, Moacir. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Time em Firebird...
HI, o campo é do tipo TIME ou TIMESTAMP se num me fai a memoria, tipo TIME só no dialect 3 qual msg de erro ? Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 --- Sávio Cler [EMAIL PROTECTED] escreveu: Como faço pra salvar um hora no Firebird pelo Delphi? Tudo que tentei deu erro. Agradeço a todos. Tentei: TBLogsDATA.AsString ou TBLogsDATA.AsFloat ou TBLogsDATA.AsInteger ou TBLogsDATA.AsDateTime. Com FB 1.0 + IBX( IBDataSet) + D6 Sávio Cler ICQ 142428832 WWW www.stc.eti.br MSN [EMAIL PROTECTED] Sto A. de Pádua - Rio de Janeiro Contato Pessoal: (22)9812-0656 ~ ~ ( @ @ ) ---o0Oo-(_)-oO0o--- Precisando de dicas? www.deephi.rg3.net --- Mais de 4 downloads -ooO---Ooo- z -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.8.8 - Release Date: 14/02/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Commit naum commita...
HI, blz camarada eu tive problemas assim com o IBX um mano programador me ensinou a resolver este problema usando tbExemplo.Transaction.CommitRetaining e tbExemplo.Transaction.RollbackRetaining; e no componente IBTrabsaction vc define a propriedade DefaultAction = TACommitRetaining espero ter ajudado, té + --- Filipe [EMAIL PROTECTED] escreveu: olá... uso FB + D7 + IBX e estou com o seguinte problema: tenho um cadastro de pessoas no que faço: if Not transaction.InTransaction then Transaction.startTransaction; try with query do begin close; sql.clear; sql.add(insert into blablabla); execSql; close; sql.clear; sql.add(insert into blablabla); execSql; close; sql.clear; sql.add(insert into blablabla); execSql; end; transaction.CommitRetaining; - usar assim showmessage('Comitou!'); except transaction.RollbackRetaining; - usar assim showmessage('Não Comitou!'); end; Coloquei breakpoints, o editor passa pelo commit normalmente, mas logo depois, preciso fazer uma consulta com esses dados, e o dado recém inserido naum aparece, ou melhor, as vezes aparece e as vezes naum!!! Existe alguma forma de commitar mais eficazmente? Alguém jah passou por isso??? No Aguardo, Obrigado!!! Filipe Geyer Programador [EMAIL PROTECTED] www.bludata.com.br = Paulo Alexsandro - dprogrammer http://dprogrammer.cjb.net Delphi, NSBasic, etc. Fontes, artigos, visitem. ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Gerador de Relatórios para incluir na aplicação
HI, blz galera alguém conhece algum gerador de relatório que eu possa incluir em qualquer aplicativo meu ? que seja possivel imprimir para windows e matricial, tipos o fortesreport mas eu tou querendo um que o usuário possa fazer seus próprios relatórios se alguém souber de algum exemplo ou um que esteja a venda, eu agradeço vou testar o Scribes 3.1 http://scribes.ipnetwork.eti.br/ desde já agradeço -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Mapear etiquetas
HI, para os registros que vc não queira imprimir, vc deixa os campos em branco, grava apenas os dados das etiquetas que vc deseja tipow imprimir as etiquetas 1 e 3 grava assim 1 - teste - rua tal 2 - null - null 3 - etiqueta 3 - rua sei lá Intel + Paulo Alexsandro - dprogrammer http://dprogrammer.cjb.net - Delphi NSBasic --- Em delphi-br@yahoogrupos.com.br, [EMAIL PROTECTED] [EMAIL PROTECTED] escreveu Faala, seguinte to tentando fazer um relatório com etiquetas, mas queria fazer com a pessoa que está usando, pudesse escolher em qual etiqueta os dados irão ser impressos, caso estejam faltando etiquetas na folha. Já penssei em algoi, mas queria saber dos amigos se já viram ou tem alguma idéia de como fazer. falowss. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Tabela de país
HI, tenta pegar do código HTML de algum site depois vc utilizar o comando Substituir do wordpad para remover as TAGS e deixa somente os nomes dos países Intel + Paulo Alexsandro - dprogrammer http://dprogrammer.cjb.net - Delphi NSBasic --- Em delphi-br@yahoogrupos.com.br, Eduardo Silva ® [EMAIL PROTECTED] escreveu Galera, alguém tem uma tabela com todos os países que poderia estar me enviando. Obrigado _ ___ _ / )| |( \ / / | Eduardo de Almeida Silva | \ \ _( (_ | _[EMAIL PROTECTED] _ | _) )_ (((\ \)|_/ )___( \_|(/ /))) ( \_/ / \ \_/ ) \ / \ / \_/ \_/ / / \ \ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Abatimento
HI, vc tem que criar um esquema de Baixa Parcial vc vai gravar um registro como se estivesse baixando os prego dele, vai ter um campo com o valor total da dívida e outro com o valor baixado, isso relacionado ao documento que originou o prego quando ele for efetuar outro pagamento, vai se a mesma coisa se não quitar a dívida, vai ser outra baixa parcial ou seja, documento 002365, vai ter dois registro relacionados a ele 002365 - R$250,00 Pagamentos para 002365 R$200,00 R$50,00 isso vai envolver Flags, etc. e para saber os registros liquidados, é só somar os valores pagos do registros de baixa parcial e verificar se bate com o valor total acredito que seja +/- isso Intel + Paulo Alexsandro - dprogrammer http://dprogrammer.cjb.net - Delphi NSBasic --- Em delphi-br@yahoogrupos.com.br, Anderson de Oliveira Furtilho - BR3 [EMAIL PROTECTED] escreveu Saudações caros amigos da lista!!! Preciso criar um tipo de abatimento em saldo devedor e nem tenho idéia em como fazer. Exemplo. Chave Remédio Valor 002 Novalgina 30,00 003 Doril 50,00 004 Anador 55,00 O Cliente Antonio deve esses medicamentos acima e ele vem pagar a continha na farmácia e da apenas 60,00 para descontar No que ele esta devendo. Como devo proceder para dar um abatimento na conta dele e ainda ficar devendo o restante. Alguém provavelmente já passou por isso e se puder me ajudar ficarei agradecido pois não tenho idéia nenhuma do que poderia ser feito. Uso Delphi/FireBird Se alguém tiver algum exemplo e me indicar onde posso pegar ficarei agradecido. Um forte abraço a todos Anderson [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html