[delphi-br] Deadlock detected
Amigos, As vezes acontece o maldito Deadlock detected while waiting for resource quando estou inserindo dados no banco. Uso DBExpress e Oracle, como posso evitar esse erro? []'s -- MSN: [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] 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] Problemas com FieldByName().AsString!
Já fiz isso também e não funcionou.
On 7/21/06, Eduardo Silva dos Santos [EMAIL PROTECTED] wrote:
da uma olhada no painel de controle nas configurações regionais.. e use
DM.cdsReg61.FieldByName('PTP_PRECO_0').AsFloat;
2006/7/20, Joubert Rinaldi Vieira [EMAIL PROTECTED]:
Amigos,
Estou usando o comando DM.cdsReg61.FieldByName('PTP_PRECO_0').AsString
para pegar o conteudo de um campo do tipo Number no Oracle.
No Windows XP ele retorna por exemplo: 9,99 ou 100 ou 3,3 mas no Windows
2000 Server não vem a virgula, por exemplo: 9,99 = 999 ou 100 = 100 e
3,3
=
33.
Já tentei usar também DM.cdsReg61.FieldByName('PTP_PRECO_0').AsDouble
e
o
resultado é o mesmo.
O q pode estar acontecendo???
[]'s
--
MSN: [EMAIL PROTECTED]
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Links do Yahoo! Grupos
--
Eduardo Silva dos Santos
DRD Sistemas.
(27) 3218-4201
MSN: [EMAIL PROTECTED]
Site: http://www.drdsistemas.com/
[As partes desta mensagem que não continham texto foram removidas]
--
MSN: [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]
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] Problemas com FieldByName().AsString!
Não funcinou em nenhum dos dois casos...
[]'s
On 7/21/06, Romario (Listas) [EMAIL PROTECTED] wrote:
Tem alguma máscara especificada na propriedade EditMask do campo?
Faça um teste com as duas formas abaixo e nos dê um retorno.
DM.cdsReg61.FieldByName('PTP_PRECO_0').AsVariant
DM.cdsReg61.FieldByName('PTP_PRECO_0').Value
Sds,
Romario
Joubert Rinaldi Vieira escreveu:
Já fiz isso também e não funcionou.
___
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular.
Registre seu aparelho agora!
http://br.mobile.yahoo.com/mailalertas/
--
MSN: [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]
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] Problemas com FieldByName().AsString!
Amigos,
Estou usando o comando DM.cdsReg61.FieldByName('PTP_PRECO_0').AsString
para pegar o conteudo de um campo do tipo Number no Oracle.
No Windows XP ele retorna por exemplo: 9,99 ou 100 ou 3,3 mas no Windows
2000 Server não vem a virgula, por exemplo: 9,99 = 999 ou 100 = 100 e 3,3 =
33.
Já tentei usar também DM.cdsReg61.FieldByName('PTP_PRECO_0').AsDouble e o
resultado é o mesmo.
O q pode estar acontecendo???
[]'s
--
MSN: [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]
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] Identificar Digitais
Amigos, Preciso sabe como faço para integrar o Microsoft Fingerprint Reader ao sistema Dephi, alguem tem alguma informação a respeito? -- MSN: [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] 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] Aplicação Monitorar Pastas?
Amigos, Preciso de uma rotina que faça com que a aplicação monitore determinadas pastas e retorne conforme a ação tipo, arquivo excluido, arquivo copiado, arquivo novo gravado na pasta. Alguem tem algo assim? -- MSN: [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] 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] Erro: LOCK FILE IS GROW TOO LARGE?
Amigos, Já sei pq acontece o LOCK FILE IS GROW TOO LARGE e quero colocar uma rotina de verificação nos arquivos PDOXUSRS.NET, PDOXUSRS.LCK e PARADOX.LCK. Qual dos arquivos é o q causa esse problema e qual o tamanho maximo pra ele? []'s -- MSN: [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
Re: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Paulo, Sempre soube que o NET DIR tinha q ser a mesma coisa pra todas as estações... Isso q vc esta indicando é o contrario... É isso mesmo? []'s On Thu, 10 Mar 2005 11:47:05 -0300, Info Desenvolvimento [EMAIL PROTECTED] wrote: Já tive esse tipo de problema. Esta dizendo que o arquivos .LCK, arquivos de lock é muito grande, feralmente isso acontece quando o relatório é muito grande. O que eu fiz: Criei duas pastas NET e PRIV junto ao sistema e configurei o NET DIR Para a pasta NET e inclui um componente chamado SESSION e configurei ele apontando para a pasta PRIV. PAULO FERNANDES PORTO ALEGRE RS [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] 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!. -- MSN: [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
Re: RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Isso acontece quando vc faz uma SQL dentro de um Loop ou acessa um grande volume de dados e os arquivos .LCK passam do tamanho maximo. Acho q é isso mesmo... Ou tem mais alguma coisa? []'s On Thu, 10 Mar 2005 11:19:09 -0300, Eduardo Silva ® [EMAIL PROTECTED] wrote: Amigo, vc poderia dizer qual a causa desse erro. Uma vez aconteceu esse erro comigo e eu fiquei louco tentando corrigi-lo, e não lembro qual foi a solução. -Mensagem original- De: Joubert Rinaldi Vieira [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 11:09 Para: Delphi 2 Assunto: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE? Amigos, Já sei pq acontece o LOCK FILE IS GROW TOO LARGE e quero colocar uma rotina de verificação nos arquivos PDOXUSRS.NET, PDOXUSRS.LCK e PARADOX.LCK. Qual dos arquivos é o q causa esse problema e qual o tamanho maximo pra ele? []'s -- MSN: [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] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE 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!. -- MSN: [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] Operation not applicable
Amigos, Desenvolvi um pequeno aplicativo DCOM + DBExpress + Firebird 1.5 e estou com o seguinte erro ao executar o aplicativo Operation not applicable. O q pode ser? -- MSN: [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] Driver UIB para Firebird?
Amigos, Como esta a evolução do UIB para DBExpress []'s -- MSN: [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] Mestre/Detalhe/Sub-Detalhe X Nested Dataset
Amigos, Fiz aqui um Mestre/Detalhe/Sub-Detalhe usando a tecnica do Nested Dataset mas, sei lá pode ser bobeira mas acho q não vai funcionar legal. A tal da Lei de Murphy é foda Alguem já fez algo assim e esta dando certo? []'s -- MSN: [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] DLL UIB para DBExpress
Amigos, Alguém já compilou o novo driver UIB??? Não estou conseguindo compilar as DLL's para DBExpress e não acho nada q diz como compilar. []'s -- MSN: [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] InstallShield q vem no D3 ou D4?
Amigos, Estou precisando urgente do instalador do InstallShield q vem no Delphi 3 ou Delphi 4 não lembro qual versão acho q é a 4... Se alguém pudar mandar por e-mail agradeço desde já a ajuda. -- MSN: [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
Re: [delphi-br] Alguém desenvolve com o Pocket Stud io ?
Amigo, Qual versão vc esta usando? Na pasta demos tem exemplo de utilização de codigo de barras e acesso a dados é mais complicado um pouco []'s On Mon, 20 Dec 2004 10:51:08 -0200, Jorge Ericsson Silva PInheiro [EMAIL PROTECTED] wrote: Olá pessoal, Gostaria de saber se alguém dos apaixonados como eu, utiliza o PS Full para desenvolvimento de aplicativos para PALM (symbol). Preciso urgente de um exemplo de acesso a banco de dados e leitura de código de barras para Palm SPT1550. Agradeço a ajuda desde já, Grande abraço a todos. Jorge Ericsson Delphi 7 e 8 / Firebird, MySQL, SQL Server / ADO, IBX MSN: [EMAIL PROTECTED] ICQ: 21377155 -- 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 -- MSN: [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] Ajuda com autenticação de usuario em TNMSMTP?
Amigos, Uso o TNMSMTP para envio de e-mail's e desde o inicio de Dezembro estou tendo problemas para autenticar o usuario no servidor de SMTP (smtp.vix.terra.com.br). Retorna o erro 554. Alguem sabe como fazer isso usando esse componente? []'s -- MSN: [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] Delphi 3, onde tem?
Amigos, A algum tempo atraz saiu uma revista com o Delphi 3 Profissional, não lembro qual revista e nem q mês. Alguem sabe? Ou sabe onde tem o Delphi 3 Profissional? []'s -- MSN: [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] Fazer TImage ficar negativo?
Amigos, Alguem tem algum codigo ou pode indicar algum componente para fazer um TImage ficar negativo. Tipo filme de maquina fotografica. []'s -- MSN: [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] ApplyUpdates depois de um Delete???
Amigos,
Estou usando:
ClientDataSet1.Delete;
If ApplyUpdates(0) 0 Then
Raise Exception.Create('Erro!');
Porem se o registro tem alguma depencia com outra tabela (q é o caso)
é apresentado a msg de erro e ele some do ClientDataSet e so retorna
se fechar e abrir.
Qual seria o procedimento mais indicado para essa situação? Ou seja
tenho um registro q tem depencia com outra tabela NÃO quero deleção em
cascata e quando o usuario tentar apaga-lo o sistema exibe uma msg de
erro.
Achei um jeito pra isso mas queria sabe a opnião da galera.
[]'s
MSN: [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
Re: [delphi-br] Palm ou Pocket ? Qual o melhor ?
Amigos, Pra esse tipo de situação penso igual ao Bruce Lee. O q importa não é o equipamento ou ferramenta de programação e sim você. O programador é q faz a diferença. []'s On Fri, 19 Nov 2004 01:33:59 -0200, Rodrigo Americo [EMAIL PROTECTED] wrote: Acho que existe um problema filosófico e outro doutrinário ao se comparar Palm e Pocket PC. O filosófico está no fato de este se utilizar de um SO da Microsoft enquanto aquele, um SO proprietário. A questão doutrinária é basicamente a aplicação de cada um deles. O Palm OS é um sistema bastante interessante e que, de forma alguma, está fadado ao fracasso. Ele nasceu para ser, digamos, fitness e para ser utilizado em uma tela pequena de um aparelho de recursos limitados. No entanto ele cresceu! Hoje os Palms trabalham com milhões de cores, tiram fotografia digital, tocam MP3, leêm arquivos PDF e comunicam-se via bluetooth http://www.pdabuyersguide.com/tips/palm_BT.htm através de acessórios e nativamente http://www.palmone.com/us/products. Por sua vez os pockets pcs correram atrás do prejuízo e contam com uma algumas parafernalhas embutidas (bluetooth, wi-fi) além de com um sistema com cara de Windows. O preço já não é o grande problema porque a Dell, por exemplo, tem handhelds por preços abaixo dos 400 dólares. O que vai dar no final da briga é uma incognita? E só para levantar uma última coisa: PDA, pocket pc, handheld são termos genéricos para um mesmo tipo de aparelho e nenhum deles identifica o SO. Navegando por aí, pude constatar que a própria Palm tem chamado seu aparelho de handheld (com Palm OS), bem como o Compaq no seu Aero (com Windows Pocket) e a Dell no seu Axim (com Windows Mobile). Inté Rodrigo Américo -- 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!. -- MSN: [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] Acessar arquivos do Cobol?
Amigos, Alguem conhece algum componente ou forma de acessar arquivos de dados do Cobol? -- MSN: [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
Re: [delphi-br] DbExpress e Master Detail
Procura na NET por Nested DataSets, é a forma mais simples. []'s On Wed, 10 Nov 2004 15:34:45 -0200, Mario Conglom [EMAIL PROTECTED] wrote: Alguem tem um receita de bolo para trabalhar com DbExpress + Master/Detail no D7? []s, Mario. -- 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!. -- MSN: [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] Problemas com . e ,!!!!
Amigos,
Recentemente instalei o Windows XP Pro original (de verdade) q veio
no meu Notebook q é em Inglês.
Depois disso quando faço por exemplo:
ShowMessage(FormatFloat(',0.00', 100)) no meu note é exibido 100.00
no cliente q usa Windows 98 é exibido 100,00.
Já fui em Regional and Language Options e coloquei o formato para
Portuguese (Brazil) ou seja Decimal symbol é , e Digit grouping
symbol é .
Agora no cliente q usa Win98 quando vai digitar em um DBEdit 100,00
ele da a mensagem de erro de informando q 100,00 não é um valor
float e etc.
E também não aceita 100.00.
Qual a solução? Tem alguma configuração do WinXP Inglês ou Win98 (BR)
ou alguma coisa q faço no sistema para isso funcionar.
[]'s
--
MSN: [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
Re: [delphi-br] TExtraDevices? Alguem usa? Funciona?
Uso e funciona muito bem e uma boa compra. []'s On Fri, 5 Nov 2004 08:31:19 -0200, Wallace Cerqueira [EMAIL PROTECTED] wrote: Funciona... - Original Message - From: TONI To: [EMAIL PROTECTED] Sent: Friday, November 05, 2004 10:14 AM Subject: [delphi-br] TExtraDevices? Alguem usa? Funciona? Ola, estou pensando em comprar o componente ExtraDevices que permite gerar os relatorios do ReportBuilder em .RTF, alguem já usou? Ele funciona? Pois peguei a versao trial mas so funciona em tempo de projeto, se eu comprar vai funcionar em Runtime? Obrigado Toni --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.786 / Virus Database: 532 - Release Date: 29/10/2004 -- 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: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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] Yahoo! Grupos, um serviço oferecido por: 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!. -- MSN: [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] Alguem conhece Sebastião Elivaldo Ribeiro?
Amigos, Alguem conhece o Sebastião Elivaldo Ribeiro. Comprei alguns componentes dele a um tempo atraz e queria entrar com contato. []'s -- MSN: [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
Re: [delphi-br] Alguem conhece Sebastião Elivaldo Ribeiro?
Ok, Verifiquei e retornou: -- Você quis dizer: [EMAIL PROTECTED] Não foram encontradas páginas padrão na Web contendo todos os termos de sua consulta. Sua pesquisa - [EMAIL PROTECTED] - não encontrou nenhum documento correspondente. Sugestões: - Certifique-se de que todas as palavras estejam escritas corretamente. - Tente palavras-chave diferentes. - Tente palavras-chave mais genéricas. -- Antes de mandar o e-mail para a lista procurei também pelo nome completo. []'s On Wed, 3 Nov 2004 18:31:12 -0300, Maicon Gabriel Schmitz [EMAIL PROTECTED] wrote: Velho e bom amigo google ;) Verifica esse email :: [EMAIL PROTECTED] - Original Message - From: Joubert Rinaldi [EMAIL PROTECTED] To: Delphi 1 [EMAIL PROTECTED]; Delphi 2 [EMAIL PROTECTED]; Delphi 3 [EMAIL PROTECTED]; Delphi 4 [EMAIL PROTECTED] Sent: Wednesday, November 03, 2004 5:24 PM Subject: [delphi-br] Alguem conhece Sebastião Elivaldo Ribeiro? Amigos, Alguem conhece o Sebastião Elivaldo Ribeiro. Comprei alguns componentes dele a um tempo atraz e queria entrar com contato. []'s -- MSN: [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 [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] 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!. -- MSN: [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] Borland Database Engine (Error $251E)
Amigos, Ao abrir o programa da a msg de erro An error occurred while attempting the Borland Database Engine (Error #251E). Já vi q é Insufficient shared memory available. e aumentei no BDE Configuration/System/Init o parametro SharedMemSize de 2048 para 32768 e mesmo assim não funcionou. Qual o valor indicado? Pode ser outra coisa? O computador esta com WindowsXP Pro. -- MSN: [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] ApplyUpdates(-1)???
Amigos, Qual seria o procedimento mais aconselhado caso um ApplyUpdates(-1) retorne erros? Tipo, exibir a msg do banco, personalizar a msg ou oq? -- MSN: [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] DBNavigator??
Amigos, Se colocar os codigos no evento OnClick ou BeforeAction do DBNavigator tipo: If Button = nbInsert Then ou If Button = nbDelete Ele executa o default do botão + o codigo q coloquei, tem como fazer ele executar somente o codigo personalizado? []'s -- MSN: [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] Evento OnValidate e propriedade Required???
Amigos, No evento OnValidate da pra validar o q foi digitado no TField mas ele não executa quando o usuario não digita nada ou seja o valor é NULL. Tem como verificar isso em outro Evento? Se configurar a Required para True faz isso na hora do Post mas queria verificar quando o DBEdit perder o foco. []'s -- MSN: [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
Re: [delphi-br] Re: Envio de email pelo OutLook
:= ERRO_MAPI_FAILURE;
MAPI_E_INSUFFICIENT_MEMORY: Result:= ERRO_MAPI_INSUFFICIENT_MEMORY;
MAPI_E_NOT_SUPPORTED : Result:= ERRO_MAPI_NOT_SUPPORTED ;
else
Result:= 'Erro ('+IntToStr(iRetorno)+') desconhecido !';
end;
Exit;
end;
aRecipiente[i].ulReserved := pRecipiente.ulReserved;
aRecipiente[i].lpszName := pRecipiente.lpszName;
aRecipiente[i].lpszAddress := pRecipiente.lpszAddress;
aRecipiente[i].ulEIDSize:= pRecipiente.ulEIDSize;
aRecipiente[i].lpEntryID:= pRecipiente.lpEntryID;
aRecipiente[i].ulRecipClass := MAPI_BCC;
Delete( sCCo, 1, Pos( ';', sCCo ) );
Inc( I );
End;
iFiles := Length( aFiles );
// cria o tamanho do array de anexos
SetLength(aArquivoEnvio, iFiles);
// indica os parâmetros para cada recepiente de anexos
For I := 0 To High(aArquivoEnvio) Do
Begin
aArquivoEnvio[i].ulReserved := 0;
aArquivoEnvio[i].flFlags := 0;
aArquivoEnvio[i].nPosition:= 0;
aArquivoEnvio[i].lpszPathName := aFiles[I];
aArquivoEnvio[i].lpszFileName := Nil;
aArquivoEnvio[i].lpFileType := Nil;
End;
// configura o MapiMessage para ser usando pelo MapiSendMail
With MapiMessage Do
Begin
ulReserved := 0;
lpszSubject:= pAssunto;
lpszNoteText := pTexto;
lpszMessageType:= Nil;
lpszDateReceived := Nil;
lpszConversationID := Nil;
flFlags:= 0;
lpOriginator := Nil;
nRecipCount:= iRecip;
lpRecips := @aRecipiente[0];
nFileCount := iFiles;
lpFiles:= @aArquivoEnvio[0];
end;
// ativo o e-mail usado pelo usuário e coloca o destinatário,
Assunto,corpo do e-mail e anexos
// Result := MapiSendMail(0, 0, MapiMessage, MAPI_DIALOG or MAPI_LOGON_UI
or MAPI_NEW_SESSION, 0);
// caso você queira que não seja ativado o e-mail, apenas enviando a
mensagem use a linha abaixo no lugar da linha acima.
iRetorno := MapiSendMail( 0, 0, MapiMessage, 0, 0 );
If iRetorno 0 Then
iRetorno:=MapiSendMail(0, 0, MapiMessage, MAPI_DIALOG or MAPI_LOGON_UI
or MAPI_NEW_SESSION, 0);
If iRetorno 0 Then
Result:='Erro no envio ('+IntToStr(iRetorno)+')';
// libera a memória alocada para o Recipiente
MAPIFreeBuffer( pRecipiente );
End;
==
[ ]´s
Moacir
- Original Message -
From: Joubert Rinaldi [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 4:53 PM
Subject: Re: [delphi-br] Re: Envio de email pelo OutLook
Já procurei em tudo quanto é canto uma forma de mandar e-mail pelo
Outlook com anexo e não achei nada.
O melhor a fazer é mudar a forma de manda-los.
[]'s
On Tue, 26 Oct 2004 04:05:14 -, ms_goncalves [EMAIL PROTECTED]
wrote:
Oi Mariana,
Tenho um projeto de envio de email que foi desenvolvido por outro
programador a algum tempo.
foi desenvolvido por outro programador tudo bem ainda vai se
tiver bem documentado... mas, com a algum tempo aih eh mortal! :)
como meu gerente quer.
Sugiro vc refazer a funcao usando um daqueles componentes q ligam
o Delphi ao Office. Se estiver usando o Delphi5 pode usar o
componente TNMSMTP (paleta FastNet).
[]s
MSG
--- Em [EMAIL PROTECTED], Mariana [EMAIL PROTECTED] escreveu
Amigos...
Tenho um projeto de envio de email que foi desenvolvido por outro
programador a algum tempo.
Ele funciona legal, e envia o email pelo OutLook deixando uma cópia
nos itens enviados como meu gerente quer.
Só que agora eu tenho que anexar arquivos nos emails a serem
enviados, e eu gostaria de saber se existe uma maneira de fazer
isso
no código que já existe ou se tenho que refazer este código.
Segue o código:
AssignFile(Arq_mail, sFileN );
Rewrite(Arq_mail);
writeLn(Arq_mail,'From: ');
writeLn(Arq_mail,'To: '+ sMailDest );
writeLn(Arq_mail,'Cc: '+ sCopia );
writeLn(Arq_mail,'Bcc: '+ sCopiaOculta );
writeLn(Arq_mail,'Subject: '+ sSubject );
writeLn(Arq_mail,'Date: ');
writeLn(Arq_mail,'MIME-Version: 1.0');
writeLn(Arq_mail,'Content-Type: multipart/alternative;');
writeLn(Arq_mail,'boundary=
=_NextPart_000_003E_01C33CDC.81459AC0');
writeLn(Arq_mail,'X-Priority: 3');
writeLn(Arq_mail,'X-MSMail-Priority: Normal');
writeLn(Arq_mail,'X-Unsent: 1');
writeLn(Arq_mail,'X-MimeOLE: Produced By Microsoft MimeOLE
V6.00.2800.1165');
writeLn(Arq_mail,' ');
writeLn(Arq_mail,'This is a multi-part message in MIME format.');
writeLn(Arq_mail,' ');
writeLn(Arq_mail,'--=_NextPart_000_003E_01C33CDC.81459AC0');
writeLn(Arq_mail,'Content-Type: text/plain;');
writeLn(Arq_mail,'charset=iso-8859-1');
writeLn(Arq_mail,'Content-Transfer-Encoding: quoted-printable');
writeLn(Arq_mail
Re: [delphi-br] Re: Envio de email pelo OutLook
Já procurei em tudo quanto é canto uma forma de mandar e-mail pelo
Outlook com anexo e não achei nada.
O melhor a fazer é mudar a forma de manda-los.
[]'s
On Tue, 26 Oct 2004 04:05:14 -, ms_goncalves [EMAIL PROTECTED] wrote:
Oi Mariana,
Tenho um projeto de envio de email que foi desenvolvido por outro
programador a algum tempo.
foi desenvolvido por outro programador tudo bem ainda vai se
tiver bem documentado... mas, com a algum tempo aih eh mortal! :)
como meu gerente quer.
Sugiro vc refazer a funcao usando um daqueles componentes q ligam
o Delphi ao Office. Se estiver usando o Delphi5 pode usar o
componente TNMSMTP (paleta FastNet).
[]s
MSG
--- Em [EMAIL PROTECTED], Mariana [EMAIL PROTECTED] escreveu
Amigos...
Tenho um projeto de envio de email que foi desenvolvido por outro
programador a algum tempo.
Ele funciona legal, e envia o email pelo OutLook deixando uma cópia
nos itens enviados como meu gerente quer.
Só que agora eu tenho que anexar arquivos nos emails a serem
enviados, e eu gostaria de saber se existe uma maneira de fazer
isso
no código que já existe ou se tenho que refazer este código.
Segue o código:
AssignFile(Arq_mail, sFileN );
Rewrite(Arq_mail);
writeLn(Arq_mail,'From: ');
writeLn(Arq_mail,'To: '+ sMailDest );
writeLn(Arq_mail,'Cc: '+ sCopia );
writeLn(Arq_mail,'Bcc: '+ sCopiaOculta );
writeLn(Arq_mail,'Subject: '+ sSubject );
writeLn(Arq_mail,'Date: ');
writeLn(Arq_mail,'MIME-Version: 1.0');
writeLn(Arq_mail,'Content-Type: multipart/alternative;');
writeLn(Arq_mail,'boundary=
=_NextPart_000_003E_01C33CDC.81459AC0');
writeLn(Arq_mail,'X-Priority: 3');
writeLn(Arq_mail,'X-MSMail-Priority: Normal');
writeLn(Arq_mail,'X-Unsent: 1');
writeLn(Arq_mail,'X-MimeOLE: Produced By Microsoft MimeOLE
V6.00.2800.1165');
writeLn(Arq_mail,' ');
writeLn(Arq_mail,'This is a multi-part message in MIME format.');
writeLn(Arq_mail,' ');
writeLn(Arq_mail,'--=_NextPart_000_003E_01C33CDC.81459AC0');
writeLn(Arq_mail,'Content-Type: text/plain;');
writeLn(Arq_mail,'charset=iso-8859-1');
writeLn(Arq_mail,'Content-Transfer-Encoding: quoted-printable');
writeLn(Arq_mail,' ');
writeLn(Arq_mail,'--=_NextPart_000_003E_01C33CDC.81459AC0');
writeLn(Arq_mail,'Content-Type: text/html;');
writeLn(Arq_mail,'charset=iso-8859-1');
writeLn(Arq_mail,'Content-Transfer-Encoding: quoted-printable');
writeLn(Arq_mail,' ');
writeLn(Arq_mail,'!DOCTYPE HTML PUBLIC -//W3C//DTD HTML 4.0
Transitional//EN');
writeLn(Arq_mail,'HTMLHEAD');
writeLn(Arq_mail,'META http-equiv=3DContent-Type
content=3Dtext/html; = charset=3Diso-8859-1');
writeLn(Arq_mail,'META content=3DMSHTML 6.00.2800.1170
name=3DGENERATOR');
writeLn(Arq_mail,'STYLE/STYLE');
writeLn(Arq_mail,'/HEAD');
writeLn(Arq_mail,'BODY bgColor=3D#f0');
writeLn(Arq_mail,'');
For nQtLines := 0 to memoHtml.Lines.Count - 1 do
writeLn(Arq_mail, memoHtml.Lines.Strings[nQtLines]);
CloseFile(Arq_mail);
{$I+}
if lAbrir Then
ShellExecute(Handle,'open', PChar( sFileN ), nil, nil,
SW_SHOWNORMAL);
Desde já agradeço
Mariana
--
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!.
--
MSN: [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
