[delphi-br] Verificar execução do Word
Olá, Como verifico se existe uma instância do Word em execução? Caso afirmativo, como usar esta instância para, por exemplo, abrir um arquivo. Onde consigo referências sobra automação Word/Delphi. Obs. Na lista tem um projeto que usa automação com Word/Excel mas eu gostaria de ter uma documentação mais extensa. No help do Delphi (7) faz referencia a automação mas de forma muito genérica e eu preciso de alguma coisa mais direcionada para o Word. Qualquer dica é bem vinda. Obrigado [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] 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] Off Topic - Fortes Report : Qual o endereço na lista do Yahoo? Quem tem um manual ?
Desculpem o Off Topic, Fortes Report : Qual o endereço na lista do Yahoo? Quem tem um manual ? Obrigado. [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] 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] Dica:Como mudar estrutura de tabelas ACCESS via Delphi ?
Olá, Será que alguém pode me dar uma dica de como incluir, alterar, excluir campos de uma tabela access pelo Delphi. Procurei na do cumentação do Delphi(7 ADO) e nada encontrei. Desde já agradeço. [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] 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] Como criar quebras de linha dentro de controles memo ?
Olá, Eu preciso criar quebras de linha em controles Memo. Não quero utilizar o método add. Já tentei atribuir 'linha1'+chr(11)+chr(13)+'linha2' mas tudo que consigo são caracteres estranhos dentro do memo. Será que alguém tem uma pista de como fazer isto? Obrigado. [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] 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] Já envio email pelo meu programa. Como anexar um arqui vo?
Olá, Criei um programa para enviar emails. Está rodando belezinha, só que procurei na documentação do Delphi (7) e não encontrei nada que explique como anexar um arquivo ao meu email. Estou utilizando os componentes Indy IdSMTP e IdMessage. Será que alguem pode me dar uma pista? Obrigado. [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] Onde encontro um componente tipo VclSkin Free?
Amigos, Onde encontro um componente tipo VclSkin Free? Obrigado. [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
Re: RES: RES: [delphi-br] Acessar conteúdo de um arq uivo .DAT criado pelo COBOL
Se quiser, posso analizar um desses arquivos e te dar uma posição a respeito de uma possível conversão. Já fiz isso com um sistema inteiro. Escolha um arquivo sem maior importância (uma tabela básica por exemplo) e me envie. [EMAIL PROTECTED] - Original Message - From: silvio_listas [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, July 07, 2005 11:41 AM Subject: Re: RES: RES: [delphi-br] Acessar conteúdo de um arquivo .DAT criado pelo COBOL Muito obrigado a todos que estão respondendo, Só para confirmar: - O cliente tem certeza que o programa foi feito em COBOL; - Não há rotina para conversão em TXT - Ninguém sabe a estrutura das tabelas (quais campos e seus tamanhos) - Eu tenho comigo somente os arquivos DAT Antes de postar a pergunta no grupo procurei na Internet e só achei pessoas dizendo que eu precisaria saber a estrutura de cada arquivo DAT para poder escrever um programa que lesse cada linha para poder fazer a migração. Vou procurar as ferramentas que foram aqui citadas: dfquery e flexql, caso eu tenha sucesso com uma delas darei um retorno para o grupo. Obrigado, Silvio. --- Em delphi-br@yahoogrupos.com.br, Walter Alves Chagas Junior [EMAIL PROTECTED] escreveu Mas eu não critiquei isto não. O que eu insinuei ser orelhada é o cara simplesmente pegar um arquivo .DBF e renomear pra .DAT e fazer o mesmo com o índice. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Evandro [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 6 de julho de 2005 11:29 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Acessar conteúdo de um arquivo .DAT criado pelo COBOL Mas perai pessoal... ele afirmou q o sistema foi desenvolvido em cobol! Evandro Siqueira Programador Recife/PE - Original Message - From: Rubem Nascimento da Rocha [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, July 06, 2005 11:13 AM Subject: RE: RES: [delphi-br] Acessar conteúdo de um arquivo .DAT criado pelo COBOL Por isso, meu amigo walter, é que pra tanto Orelha nesse mundo, precisamos estar de Olho Vivo! HEHE!!! []s From: Walter Alves Chagas Junior [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: 'delphi-br@yahoogrupos.com.br' delphi- [EMAIL PROTECTED] Subject: RES: [delphi-br] Acessar conteúdo de um arquivo .DAT criado pelo COBOL Date: Wed, 6 Jul 2005 11:06:39 -0300 Já vi neguinho escrevendo sistemas em Clipper e renomeando DBFs pra .DAT e NTX pra .IDX! Não é tão simples assim! hehehe, Rubem, Oreia nesse nosso mundo é que mais tem... []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Rubem Nascimento da Rocha [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 6 de julho de 2005 10:54 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Acessar conteúdo de um arquivo .DAT criado pelo COBOL Prioridade: Alta Cara, .DAT pode ser qualquer coisa. Arquivo COBOL, arquivo DATAFLEX, etc. Teria que ter um programa pra editar esse arquivo em hexa e desvendar o cabeçalho dele. Daí sim poderia se descobrir o que realmente esse arquivo é. Já vi neguinho escrevendo sistemas em Clipper e renomeando DBFs pra .DAT e NTX pra .IDX! Não é tão simples assim! []s From: Vinicius Barreira [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Acessar conteúdo de um arquivo .DAT criado pelo COBOL Date: Wed, 6 Jul 2005 10:23:08 -0300 normalmente .DAT é dataflex e só existe driver pago. se for aquelas versões DOS antigas, tem um utilitario chamado dfquery que lê as tabelas e pode gerar um TXT dos principais arquivos pra vc importar. Vinicius Barreira São Bernardo do Campo - SP Delphi 7 + Firebird + DBExpress Software para Hoteis Skipe: vinibarr Icq 74495946 - Original Message - From: silvio_listas [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, July 05, 2005 3:52 PM Subject: [delphi-br] Acessar conteúdo de um arquivo .DAT criado pelo COBOL Oi, Um posível cliente chegou com uma série de arquivos .DAT que compõe um banco de dados, dizendo que o cara que criou o programa para eles desapareceu a muitos anos e que precisam comprar um programa novo, mas
[delphi-br] ADO - Consultar por parte do nome - não funciona?
Olá, Será que alguém já passou por este problema? No access faço a seguinte consulta: SELECT * FROM CLIENTES WHERE NOME LIKE *SOUZA* que me retorna todos os registros que possuem SOUZA no nome, ao efetuar a mesma consulta no Delphi usando ADO não me retorna nada. Já substituí aspas duplas por simples, tirei os asteriscos, fiz uma série de variações, várias deram erro. A documentação do Delphi não diz nada a respeito. Será que alguém pode me dar uma dica? Desde já agradeço [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] Conversao de string para char
Amigos, Desculpem a pergunta básica, mas procurei na documentação do Delphi e não encontrei (de repente estava no meu nariz e nao vi!). Como faço para converter uma variável string (tam=1) em uma variável char ? Obrigado. [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] VPN / Delphi / Firebird : É seguro? Tem bom desempenho?
Amigos, Estou estudando uma forma de ligar duas empresas (matriz/filial) usando ADSL nas duas pontas. Gostaria de saber se posso fazê-lo usando VPN. Qual a experiência de vocês com esta tecnologia? Obrigado. [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] Fast Report ou Free Report tem exportacao para Word/Excel ?
Amigos, Preciso criar relatórios exportáveis para o word/excel. Já consegui faze-lo em RTF só que perco elementos gráficos como logotipos, linhas, etc. Algum destes editores exporta 100% do meu relatório para o word/excel? Fiquei sabendo que o Cristal faz isto. O Cristal funciona bem com o Delphi 7? Obrigado. [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] Como criar gráficos no RAVE
Amigos, Li toda a documentação do RAVE (4.x) e não achei nada a respeito de criação de gráficos de barra, pizza, etc. Será que alguém tem uma pista de onde eu devo procurar um componente para gerar estes gráficos? Obrigado. [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] Como criar relacionamento entre tabelas de forma gráfica?
Amigos, Alguém conhece uma ferramenta para interbase que crie SQL a partir de relacionamentos entre tabelas de forma gráfica? Obrigado. [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] Editor de relatórios multi-plataforma - Qual?
Amigos, Estou iniciando o desenvolvimento de uma aplicação CLX (multi plataforma). Bom, só trabalho com Windows. Gerar relatórios pelo Quick Report é tranquilo, porém meus relatórios em Quick funcionarão em Linux? E quanto ao Rave ou Report Builder, qual é o mais idicado para gerar meus relatórios multi-plataforma ? Desde já agradeço a colaboração de todos. [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
Re: [delphi-br] Importação de TXT
Bom dia!!!
Estou precisando importar dados de um txt para uma tabela, só que o txt esta
gravado uma informação em cada linha, ou seja, codigo do cliente, nome,
endereço, cidade, e estado, tudo embaixo um do outro, e como é a primeira
vez que tentarei fazer isto, alguem teria alguma sugestão para facilitar ou
de como posso proceder.
Abraços.
==esta procedure funciona perfeitamente bem
procedure TConversao_Principal.CentrosdeCusto1Click(Sender: TObject);
begin
NomeArqTXT:='c:\arquivo.TXT';
NomeTabela:='sua tabela';
IBTable1.Active:=false;
IBTable1.TableName := NomeTabela;
if IBTable1.Exists then
begin
ibquery1.SQL.Clear;
ibquery1.SQL.Add('DELETE FROM '+NomeTabela+';');
ibquery1.ACTIVE:=TRUE;
ibtransaction1.Commit;
ShowMessage('Registros excluidos para '+NomeTabela);
end
else
begin
ShowMessage('Não foi encontrada tabela '+NomeTabela);
exit;
end;
assignfile(f,NOMEARQTXT);
RESET(F);
TotReg:=13; //Número total de LINHAS
progressbar1.Max:=totreg;
SHOWMESSAGE('Início do processamento');
ContReg:=0;
ContImp:=0;
IBTable1.Active:=false;
IBTable1.TableName := NomeTabela;
ibtable1.open;
while not eof(f) do
begin
readln(f,s);
contreg:=contreg+1;
progressbar1.Position:=contreg;
IBTABLE1.Append;
ibtable1.FieldByName('c1').AsINTEGER :=strtoint(copy(s,1,3));
ibtable1.FieldByName('C2').AsSTRING :=TRIMRIGHT(copy(s,4,30));
Ibtable1.post;
contIMP:=contIMP+1;
end;
ibtransaction1.COMMIT;
ibtable1.Close;
closefile(f);
showmessage(inttostr(contIMP)+' Registros de '+NomeTabela+'
convertidos.')
end;
Tasquim
[EMAIL PROTECTED]
[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
Re: [delphi-br] Rave
Tenho manuais em inglês, se servir. - Original Message - From: Renato [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Saturday, December 04, 2004 8:38 AM Subject: [delphi-br] Rave Meu nome é Renato, e estou desenvolvendo uma aplicação em Delphi 7 + MySQl para controlar processos produtivos e gostaria de saber como faço para gerar relatótios através do rave. Pois não tenho a mínima idéia de como começo a criar relatóios com o Rave. Grato, Renato -- 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] Validação CPF e CNPJ
Tá na mão - Original Message - From: Valcir José Tasquim [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Wednesday, December 01, 2004 1:17 PM Subject: [delphi-br] Validação CPF e CNPJ Boa Tarde Será que alguem teria a programação para validação de CPF e CNPJ. Grato Tasquim Verifica validade de CGC e CPF unit CPFeCGC; interface function cpf(num: string): boolean; function cgc(num: string): boolean; implementation uses SysUtils; function cpf(num: string): boolean; var n1,n2,n3,n4,n5,n6,n7,n8,n9: integer; d1,d2: integer; digitado, calculado: string; begin n1:=StrToInt(num[1]); n2:=StrToInt(num[2]); n3:=StrToInt(num[3]); n4:=StrToInt(num[4]); n5:=StrToInt(num[5]); n6:=StrToInt(num[6]); n7:=StrToInt(num[7]); n8:=StrToInt(num[8]); n9:=StrToInt(num[9]); d1:=n9*2+n8*3+n7*4+n6*5+n5*6+n4*7+n3*8+n2*9+n1*10; d1:=11-(d1 mod 11); if d1=10 then d1:=0; d2:=d1*2+n9*3+n8*4+n7*5+n6*6+n5*7+n4*8+n3*9+n2*10+n1*11; d2:=11-(d2 mod 11); if d2=10 then d2:=0; calculado:=inttostr(d1)+inttostr(d2); digitado:=num[10]+num[11]; if calculado=digitado then cpf:=true else cpf:=false; end; function cgc(num: string): boolean; var n1,n2,n3,n4,n5,n6,n7,n8,n9,n10,n11,n12: integer; d1,d2: integer; digitado, calculado: string; begin n1:=StrToInt(num[1]); n2:=StrToInt(num[2]); n3:=StrToInt(num[3]); n4:=StrToInt(num[4]); n5:=StrToInt(num[5]); n6:=StrToInt(num[6]); n7:=StrToInt(num[7]); n8:=StrToInt(num[8]); n9:=StrToInt(num[9]); n10:=StrToInt(num[10]); n11:=StrToInt(num[11]); n12:=StrToInt(num[12]); d1:=n12*2+n11*3+n10*4+n9*5+n8*6+n7*7+n6*8+n5*9+n4*2+n3*3+n2*4+n1*5; d1:=11-(d1 mod 11); if d1=10 then d1:=0; d2:=d1*2+n12*3+n11*4+n10*5+n9*6+n8*7+n7*8+n6*9+n5*2+n4*3+n3*4+n2*5+n1*6; d2:=11-(d2 mod 11); if d2=10 then d2:=0; calculado:=inttostr(d1)+inttostr(d2); digitado:=num[13]+num[14]; if calculado=digitado then cgc:=true else cgc:=false; end; end. -- 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] Oportunidade de trabalho em Goiânia
Olá, Preciso de alquém que queira trabalhar comigo em Goiânia-GO nas áreas de desenvolvimento e suporte. Interessados devem ter afinidade com programação, alguma experiência em desenvolvimento em Delphi, disponibilidade de tempo em pelo menos meio período. Estudantes com interesse em estágio podem ser aproveitados. Contato: Florentino(62) 211-3557 / 9637-8763 [EMAIL PROTECTED] [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] Oferta de estágio
Amigos, Estou oferecendo estágio para trabalhar com desenvolvimento em Delphi e suporte na cidade de Goiânia-GO. Interessados devem enviar curriculo constando disponibilidade de tempo, experiência e pretensão salarial para a: [EMAIL PROTECTED] Obrigado. [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] Comportamento da tecla [enter] em formulários
Amigos, Pergunta básica: Como faço para dentro de um formulário a tecla [enter] tenha comportamento igual a [tab] (ir para o próximo campo) ? Obrigado, [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] Componente Edit/DbEdit - Alguém conhece ?
Amigos, Componente Edit/DbEdit - Alguém conhece um que formate um campo numérico da direita para a esquerda, do tipo que funciona nos caixas eletrônicos em que a medida que a gente digita, são preenchidos primeiro os centavos e depois os valores já formatados? Saudações a todos! [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] Delphi 8 - .NET - Alguém Usa?
Amigos, Sou novo na lista. Programo em D-7 e há algum tempo tenho ensaiado começar a trabalhar com Delphi-8 e .NET. Desculpem ,talvez , a minha ignorância, mas porque o Delphi 8 praticamente não é abordado na lista? Será que o .NET ainda não emplacou? Saudações a todos. [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
Re: [delphi-br] Usar Apollo VCL
Amigos, Também preciso migrar minhas aplicações em clipper para delphi. Como conseguir o Apollo? Florentino Goiânia-GO - Original Message - From: Prisma Sistemas - Moacir [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Tuesday, October 05, 2004 7:28 AM Subject: Re: [delphi-br] Usar Apollo VCL Werner, Já uso o Apollo a uns 5 anos e não tive maiores problemas com ele. Comecei migrando minhas aplicações Clipper para Delphi e ainda mantenho algumas aplicações em que o usuário ainda usa terminais com DOS rodando a aplicação clipper e outros rodando Delphi + Apollo. [ ]´s Moacir - Original Message - From: Werner Thiede [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Monday, October 04, 2004 1:19 PM Subject: [delphi-br] Usar Apollo VCL Colegas, Preciso utilizar um biblioteca/método de acesso a arquivos .DBF que atualize os meus indices também (arquivos .ntx). É que estou convertendo meu antigo sistema em clipper, porém, estou fazendo em etapas, visto que é muito grande. Enquanto isto gostaria de ir migrando algumas rotinas. Encontrei algumas indicações na web sobre o APOLLO VCL. Alguém usa ? é seguro ? Ele não corrompe os meus índices do clipper e tal ? Um abraço a todos e obrigado. pernalongaSC -- 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 -- 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] Access
A revista Forum Access já publicou matérias a respeito de utilitários de recuperação de arquivos .mdb. Ela disponibiliza uma coletânea de edições anteriores em CD, base de conhecimento, etc. Sendo assinante da revista vc pode solicitar suporte técnico via email. Tente em www.forumaccess.com.br. - Original Message - From: Edivaldo David [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Wednesday, September 29, 2004 9:54 AM Subject: Re: [delphi-br] Access Já tentei, não resolveu. Existe algum utilitário para recuperar banco de dados Access? Florentino - Agrosoft [EMAIL PROTECTED] wrote: Tente, no access recuperar e compactar o banco de dados. - Original Message - From: Edivaldo David To: delphi-br Sent: Tuesday, September 28, 2004 4:34 PM Subject: [delphi-br] Access Olá Galera! A minha aplicação é delphi + access, durante uma operação meu computador reiniciou e, vocês já sabem... O banco de dados não abre mais. O que eu faço? __ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com [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 -- 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 - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador 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 -- 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] Firebird, IBX e transações
Dê um commit na transação relacionada. O problema é que o commit fecha os datasets abertos. - Original Message - From: Artur Anjos [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Wednesday, September 29, 2004 4:46 PM Subject: Re: [delphi-br] Firebird, IBX e transações mestredigital wrote: Estou com seguinte problema quando acabo de inserir um registro em um BD Firebird rodando em rede os outros usuários só conseguem vê-lo se fechar o programa e voltar. Como faço para que um usuário enxergue os registros que acabaram de ser inseridos por outros usuários? Se que é algo relacionado com o componente IBTransaction mas como faria isso? Uso Firebird e componentes IBX Você precisa de entender as Transações em Firebird. No site da CFLP tem um artigo optimo feito pelo Eugenio Reis: http://www.comunidade-firebird.org Artur -- 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 -- 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] Como diminuir o tamanho do meu executável?
Amigos, Como diminuir o tamanho do meu executável? Já percebi que nas opções do projeto, na guia packages eu tenho a opção build with runtime packages, mas como saber quais os packages a minha aplicação faz uso? Obrigado. [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] Como pesquisar sub-string em uma instrução SQL
Amigos, Preciso fazer uma pesquisa em um banco interbase/firebird do tipo: SELECT * FROM CIDADES WHERE LEFT(DESCRICAO,2)='GO' LEFT não é reconhecido pelo interbase. Alguém sabe como fazê-lo? Desde já, Agradeço. [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
Re: [delphi-br] Como instalar componente xbase - acesso .dbf
Baixei da página da lista - Original Message - From: CARLOS CASTRO [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Thursday, September 23, 2004 5:27 PM Subject: Re: [delphi-br] Como instalar componente xbase - acesso .dbf Amigo , sei que nao estou lhe ajudando , mas gostaria de saber onde baixou este compomente , pois o gostaria de faze-lo tambem, e ai talvez possa ajuda-lo. Carlos fsfilho03 [EMAIL PROTECTED] wrote: Amigos, Baixei o componente de acesso a arquivos .dbf porém não consegui instalá-lo. Alguém sabe como faze-lo? Obrigado. -- 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] Yahoo! Grupos, um serviço oferecido por: - 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 Termos do Serviço do Yahoo!. - Yahoo! Messenger 6.0 - jogos, emoticons sonoros e muita diversão. Instale 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 -- 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] Como atualizar um DbEdit de outro formulário - Florentino
Olá, Estou com o seguinte problema: preciso atualizar um campo em um formulário a partir de outro formulário. Só que, em tempo de execução só sei o endereço deste campo através de uma string que eu mesmo crio. Preciso dar um comando do tipo Cad_Pessoas.Codigo.text:=ValorAAtribuir; só que Cad_Pessoas.Codigo é o conteúdo de uma variável tipo string. Você já fez isso? Desde já agradeço; Florentino Goiânia-GO [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
