[delphi-br] Fwd: URGENTE!!!

2007-09-24 Por tôpico Pablo Madi Dias
-- Forwarded message --
From: Regilene/S2 Tato ,você me completa/TE @MO S2 
[EMAIL PROTECTED]
Date: 15/09/2007 09:53
Subject: URGENTE!!!
To: meus amigos [EMAIL PROTECTED]

URGENT

Envio para ti, porque sei que o reencaminharas para muita gente. Pedido de
sangue!Por motivo de doença grave, um amigo está hospitalizado À espera de
ser operado.Ainda não o foi porque tem um sangue raro (B-).

Pede-se a quem tenha este tipo de sangue que contacte com urgência:Luís de
Carvalho - 931085403
Pedro Leal Ribeiro - 32041893
Fax: 222059125 Se não puderes ajudar, por favor divulga este e-mail..

Não custa nada passarHOJE POR ELE AMANHÃ PODE SER POR VC!!Esta mensagem foi
enviada por Regilene/S2 Tato ,você me completa/TE @MO S2. Para ver o perfil
de Regilene/S2 Tato, clique em:
http://www.orkut.com/Profile.aspx?uid=14145282080442130932

* * *

Para definir os e-mails de notificação, acesse as suas Configurações de
conta: http://www.orkut.com/Settings.aspx

Se você deseja ignorar , acesse o perfil de  e clique em ignorar:

Se você não for usuário do orkut e quiser impedir que usuários do orkut lhe
enviem e-mails, acesse: http://www.orkut.com/Block.aspx


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Fwd: IMPORTANTE!!!

2007-09-24 Por tôpico Pablo Madi Dias
-- Forwarded message --
From: Regilene/S2 Tato ,você me completa/TE @MO S2 
[EMAIL PROTECTED]
Date: 15/09/2007 09:56
Subject: IMPORTANTE!!!
To: meus amigos [EMAIL PROTECTED]

Quem tiver contatos no RJ, por favor, retransmita esta mensagem.
É mportante!!

(O INCA fica na Praça da Cruz Vermelha, no Bairro de Fátima, Centro
do Rio).

Repasse a mensagem para quem vocês puderem, pois a situação do
Instituto Nacional do Câncer é realmente dramática.
Eles não têm sangue nem doadores. Já saíram notas nos jornais e
pouco adiantou.

O Instituto Nacional de Câncer - INCA - está precisando urgentemente
de doadores de sangue.

O Banco de Sangue está quase vazio e o Hospital enfrenta dificuldades,
até para marcar cirurgias, muitas vezes, precisando recorrer a outros
bancos de sangue da cidade, que também passam pela mesma dificuldade:
falta de doadores.
A transfusão de sangue para pessoas com câncer é muito importante. Sem
ela, muitos Pacientes não conseguiriam sobreviver aos tratamentos que
envolvem drogas pesadas. Para doar, basta chegar na portaria do Hospital
com sua carteira de identidade ou qualquer documento similar,
apresentando-se como doador. NÃO vá em jejum, alimente-se de coisas
leves e não
gordurosas, evite o álcool por pelo menos 12 horas. Você deve estar em
boas condições de saúde, ter entre 18 e 60 anos e pesar 50kg ou mais.
A mulher pode doar a cada 3 meses e o homem a cada 2 meses. Esta
mensagem pode alcançar muitos doadores, se você enviar agora para outros
endereços. Por favor, colabore. Faça a sua parte!


OBS.: Mesmo que você não possa ou não esteja interessado em realizar a
doação, não deixe de repassar essa mensagem para seus conhecidos.. É
uma causa importante, todos podem colaborar de alguma maneira.Esta mensagem
foi enviada por Regilene/S2 Tato ,você me completa/TE @MO S2. Para ver o
perfil de Regilene/S2 Tato, clique em:
http://www.orkut.com/Profile.aspx?uid=14145282080442130932

* * *

Para definir os e-mails de notificação, acesse as suas Configurações de
conta: http://www.orkut.com/Settings.aspx

Se você deseja ignorar , acesse o perfil de  e clique em ignorar:

Se você não for usuário do orkut e quiser impedir que usuários do orkut lhe
enviem e-mails, acesse: http://www.orkut.com/Block.aspx


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Sugestão para Atualização de banco de dados.

2006-10-26 Por tôpico Pablo Madi Dias
Cara, vc pode fazer um processador de script e daí vc verifica, sempre ao
iniciar o aplicativo se existe um novo script sql a ser executado...

2006/10/26, Ricardo Lima Mariz [EMAIL PROTECTED]:

 Pessoal estou prestes a liberar a primeiro versão de um novo sistema que
 desenvolvemos, o novo sistema tem uma atualização automática, gostaria de
 saber como vocês fazem as atualizações de banco de dados(Strutura das
 tabelas).

 Obrigado a todos.

 At.
 Ricardo Lima

 [As partes desta mensagem que não continham texto foram removidas]

 



[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] IMPRESSÃO + de 1 impressora.

2006-10-26 Por tôpico Pablo Madi Dias
Se eu tivesse de fazer isto, desenvolveria um serviço win32 ou uma aplicação
mesmo, que fique aberta o tempo todo, mas o serviço win32 é mais elegante
e livre de problemas como o usuário fechar a aplicação... pois bem, este
serviço ficaria verificando o banco de dados, a cada 5 segundos, por
exemplo, para verificar se existe um novo pedido a ser impresso, se existir,
imprime o pedido... daí basta apenas imprimir normalmente no caixa e deixar
que o serviço busca os dados para imprimir na cozinha...

Em 18/10/06, Guaranta Almeida [EMAIL PROTECTED] escreveu:

   boa tarde a todos,

  Pessoal, será que alguem pode me ajudar... gostaria de poder
 enviar uma impressão pra mais de uma impressora... sendo rede ou ateh mesmo
 pra duas impressoras serias ao mesmo tempo entende..

  Ex: Pedidio feito no caixa... Impresso no caixa e  Impresso na
 cozinha ...


   Se alguem poder me ajudar desde jah agradeço...

 Abraço a Todos.


   Guarantã Almeida.


 -
 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]

 



[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] Oracle/SQLServer

2006-09-07 Por tôpico Pablo Madi Dias
SQL Server: Vá ao site da microsoft e procure por MSDE na pagina de
downloads (é uma versao gratuita para uso nao comercial e bancos de ate 2GB)
e o oracle, em http://oracle.com. É permitido baixar qq versao para usar por
ate 30 dias. a versao XE e gratuita, para fins academicos...


[\'s

Em 07/09/06, Antonio Perruci [EMAIL PROTECTED] escreveu:

 Olá
   Gostaria de saber onde conseguir preços dos BD´s SQLServer e Oracle.
   Obrigado



 -
 Yahoo! Search
 Música para ver e ouvir: You're Beautiful, do James Blunt

 [As partes desta mensagem que não continham texto foram removidas]

 



[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] Class EConvertError

2006-09-07 Por tôpico Pablo Madi Dias
É provavel que o banco esteja esperando uma data no formato americano e vc
esta informando a data no formato brasileiro...

Em 06/09/06, fabmacso [EMAIL PROTECTED] escreveu:

 Olá, pessoal.
 estou usando Delphi 7/Intebase.Quando tento inserir uma data em um
 DBedit recebo a seguinte mensagem: EConvertError with message 0.0'is
 not a valid timestamp.Pode ter alguma coisa a ver com a tabela, visto
 que declarei o campo data como TimeStamp default 'today'?

 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

 





Re: [delphi-br] Dbgrid...

2006-09-06 Por tôpico Pablo Madi Dias
Tente dar um locate no código 502 + quantidade de linhas da tela e depois um
locate no código 502 novamente... provavelmente o código ficará no topo do
DBGrid...

Em 06/09/06, Doretto [EMAIL PROTECTED] escreveu:

  Boa tarde..

 Ainda não consegui resolver o problema do dbgrid desposicionar os
 registros em tela...


 vamos imaginar um grid assim: num total de 1000 registros eu estou
 posicionado no codigo 502...

   Codigo  Descricao do Produto Preco de Venda
   500    30,50
   501    44,50
 502 ytttyy   10,50
   503 rrr  9,40
   504 b22,40
   505 f 33,30
   506 rrasfasdfasdfasdffasdf   48,00

 agora eu vou alterar o registro do codigo=502, e vou dar um close e um
 open
 no grid, com o locate eu volto para o registro de codigo=502 mas a tela
 nao
 fica a mesma, veja o resultado da tela:

   Codigo  Descricao do Produto Preco de Venda
   501    44,50
 502 ytttyy   10,50
   503 rrr  9,40
   504 b22,40
   505 f 33,30
   506 rrasfasdfasdfasdffasdf   48,00
   507 o39,00

 Podemos verificar que a posição relativa dos registros na tela mudou mas o
 registro permace posicionado no mesmo codigo.

 Como eu resolvo isto ?

 Abraço



 [As partes desta mensagem que não continham texto foram removidas]

 



[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] Atribuir resultado de um select a um campo

2006-09-06 Por tôpico Pablo Madi Dias
...Mas qual a mensagem de erro??

Em 06/09/06, Cristiano Rodrigo Gomes [EMAIL PROTECTED]
escreveu:

  Bom dia pessoal.
 Tenho uma trigger que atualiza o estoque na entrada de produtos. Preciso
 agora criar um novo campo na tabela de produtos, onde devo armazenar o custo
 médio dos produtos, ou seja, a soma de todos os preços de custos dividida
 pela quantidade de vezes que o mesmo foi adquirido.
 Eu consegui fazer este calculo através do select porém não consigo
 atribuir o resultado deste select para o camo Custo Médio.
 Vejam a trigger que estou usando, e como acho que deveria ser o cálculo do
 custo médio, porém o mesmo não está dando certo.
 Uso Firebird 1.5

 AS
 BEGIN
 IF (INSERTING) THEN
 UPDATE PRODUTO
 SET PRO_ULTCOMPRA = CURRENT_DATE,
 PRO_ESTOQUE = PRO_ESTOQUE + NEW.ITEM_QUANTIDADE,
 PRO_PRCUSTO = NEW.ITEM_CUSTO,
 PRO_PRVENDA = NEW.ITEM_VENDA
 PRO_CMEDIO = (SELECT SUM(ITEM_CUSTO) / COUNT(ITEM_CUSTO) FROM
 ITENSCOMPRA
 WHERE ITEM_PRODUTO = NEW.ITEM_PRODUTO)
 WHERE PRO_CODIGO = NEW.ITEM_PRODUTO;
 IF (UPDATING) THEN
 UPDATE PRODUTO
 SET PRO_ESTOQUE = PRO_ESTOQUE - OLD.ITEM_QUANTIDADE +
 NEW.ITEM_QUANTIDADE,
 PRO_PRCUSTO = NEW.ITEM_CUSTO,
 PRO_PRVENDA = NEW.ITEM_VENDA

 PRO_CMEDIO = (SELECT SUM(ITEM_CUSTO) / COUNT(ITEM_CUSTO) FROM
 ITENSCOMPRA
 WHERE ITEM_PRODUTO = NEW.ITEM_PRODUTO)
 WHERE PRO_CODIGO = NEW.ITEM_PRODUTO;
 END

 Se alguém puder me ajudar.
 Sds.
 Cristiano.

 [As partes desta mensagem que não continham texto foram removidas]

 



[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] Erro DataSet !

2006-09-06 Por tôpico Pablo Madi Dias
Isto ocorre quando tenta fazer o que? Quando abre? Quando dá refresh?

2006/9/6, Markos Suni [EMAIL PROTECTED]:

  Caro Colega,

 Qual o conteúdo do sua query que vinculada a este data set???

 --
 Cordialmente,

 Markos Suni
 Programador Delphi
 Instituto Damone


 [As partes desta mensagem que não continham texto foram removidas]




 



[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] Uso da função TO_CHAR( )

2006-08-29 Por tôpico Pablo Madi Dias
Cara, qual o banco que vc está usando?

Em 29/08/06, Sérgio [EMAIL PROTECTED] escreveu:

  Bom dia galera, blza?

 To com o segte probleminha: Tenho que gerar um arquivo TXT para enviar a
 um orgão publico. Cada campo deve estar previavemente formatado com os
 tamanhos especificados pelo orgão. No meu Select, fiz uso da função TO_CHAR(
 ) para formatar as colunas. Por exemplo: To_Char(campo1,'0') para trazer
 o resultado com 5 digitos. Porém, qdo uso essa função parece q ela INSERE UM
 ESPAÇO EM BRANCO antes de iniciar o 1º digito retornado. No meu arquivo TXT
 não pode conter esses espaços, é uma coluna(campo) colada a outra, aí vos
 pergunto: Como que faço pra evitar esses espaços Formato os campos com
 alguma outra função que nao seja o To_Char??? Espero contar com ajuda dos
 senhores..

 Obrigado..

 Sérgio
 Tecnologia da Informação - TI
 e-mail: [EMAIL PROTECTED]
 Usina Alta Mogiana S/A - Acucar e Alcool




 [As partes desta mensagem que não continham texto foram removidas]

 



[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] DBGrid com Cabeçalho Mesclado

2006-08-25 Por tôpico Pablo Madi Dias
Pessoal, alguém já viu ou sabe como posso fazer / criar um DBGrid que aceite
mesclar algumas colunas em seu cabeçalho?

Seria algo mais ou menos assim:

|2006-08| -Cabeçalho
| C1 | C2 | C2 | - Cabeçalho
|  1  |  52 | 13 | - Linha de Dados
|  2  |  37 | 25 | - Linha de Dados
|  3  |  48 | 32 | - Linha de Dados


Valeu!


Abs,

Pablo Madi


[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: RES: [delphi-br] Contatos do Outlook

2006-05-16 Por tôpico Pablo Madi Dias



Gerhard, realmente esta rotina funciona, mas apenas para a pasta de contatos... na verdade, estou usando um Outlook conectado a um servidor Exchange corporativo e a intensão é acessar a lista de endereços global... após postar esta mensagem, eu consegui uma semi-solução (pois a lista global é muito grande) e ainda quero adapta-la para melhorar o desempenho, mas estou fazendo o seguinte:
 
 procedure Lista_Contatos;
var
 olNameSpace : NameSpace;
 OlListaEnd : AddressList;
 OlItensEnd : AddressEntries;
 olContato : AddressEntry;
begin
 Outlook.Connect;
 olNameSpace := Outlook.GetNamespace('MAPI');
 olNameSpace.Logon('', '', False, False);
 olListaEnd := olNameSpace.AddressLists.Item(3); //Três é o índice da lista global no meu Outlook. A lista padrão do usuário é a indice 1... também pode utilizar o nome da lista, ao invés do número...
 olItensEnd := olListaEnd.AddressEntries;
 olContato := olItensEnd.Item(1);//Estou pegando apenas o primeiro cara, para teste...
 showmessage(olContato.Name);
 showmessage(olListaEnd.Name);
end;
 
 []´s

Gerhard Roger Nack [EMAIL PROTECTED] escreveu:
 Para ler o catalogo do exchange, vc pode usar a rotina abaixo:





Outlook := TOutlookApplication.Create(Application);



Outlook.Connect;

NmSpace := Outlook.GetNamespace('MAPI');

NmSpace.Logon(aUser, aPass, False, False);

ContactsFolder := NmSpace.GetDefaultFolder(olFolderContacts);

for i := 1 to ContactsFolder.Items.Count do

with (ContactsFolder.Items.Item(i) as ContactItem) do

begin

ShowMessage(FullName + ' - ' + Email1Address);

end;



Outlook.Free;



[ ] s



Gerhard Roger Nack

[EMAIL PROTECTED] 







De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Filipe Xavier Ramalho
Enviada em: segunda-feira, 15 de maio de 2006 16:56
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Contatos do Outlook



Existe um driver OLEDB para você acessar os dados do Outlook. Só não sei te
dar detalhes porque nunca utilizei, mas certamente alguém aqui na lista vai
complementar a minha informação.

Filipe


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de pablomadias
Enviada em: segunda-feira, 15 de maio de 2006 16:44
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Contatos do Outlook

Pessoal, alguém por ai saberia me explicar como faço para abrir no 
delphi o catálogo de endereços de um servidor Exchange? Seria através 
do OutlookApplication? O que devo fazer?

[]´s





[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos











Abraços,

Pablo Madi Dias
+55 21 8866-4418
  
-
 Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz. 

[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]






  




  
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!.











Re: RES: RES: [delphi-br] Contatos do Outlook

2006-05-16 Por tôpico Pablo Madi Dias



Qual o erro que aconteceu com a rotina do meu último post?

Eduardo Silva ® [EMAIL PROTECTED] escreveu: Galera, não consegui utilizar nenhuma das duas rotinas, estou tentando pegar
a lista de contatos do meu outlook já faz um bom tempo e até agora não
consegui nenhuma rotina com sucesso. Uma vez quase consegui fazer, mas deu
erro por causa dos grupos que eu tenho na lista.

Alguém pode me dar uma mãe.

PS: a rotina que eu quase consegui não consigo mais encontra-la pra enviar
aqui
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Pablo Madi Dias
Enviada em: terça-feira, 16 de maio de 2006 09:40
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Contatos do Outlook


Gerhard, realmente esta rotina funciona, mas apenas para a pasta de
contatos... na verdade, estou usando um Outlook conectado a um servidor
Exchange corporativo e a intensão é acessar a lista de endereços global...
após postar esta mensagem, eu consegui uma semi-solução (pois a lista global
é muito grande) e ainda quero adapta-la para melhorar o desempenho, mas
estou fazendo o seguinte:

procedure Lista_Contatos;
var
olNameSpace : NameSpace;
OlListaEnd : AddressList;
OlItensEnd : AddressEntries;
olContato : AddressEntry;
begin
Outlook.Connect;
olNameSpace := Outlook.GetNamespace('MAPI');
olNameSpace.Logon('', '', False, False);
olListaEnd := olNameSpace.AddressLists.Item(3); //Três é o índice da
lista global no meu Outlook. A lista padrão do usuário é a indice 1...
também pode utilizar o nome da lista, ao invés do número...
olItensEnd := olListaEnd.AddressEntries;
olContato := olItensEnd.Item(1);//Estou pegando apenas o primeiro
cara, para teste...
showmessage(olContato.Name);
showmessage(olListaEnd.Name);
end;

[]´s

Gerhard Roger Nack escreveu:
Para ler o catalogo do exchange, vc pode usar a rotina abaixo:





Outlook := TOutlookApplication.Create(Application);



Outlook.Connect;

NmSpace := Outlook.GetNamespace('MAPI');

NmSpace.Logon(aUser, aPass, False, False);

ContactsFolder := NmSpace.GetDefaultFolder(olFolderContacts);

for i := 1 to ContactsFolder.Items.Count do

with (ContactsFolder.Items.Item(i) as ContactItem) do

begin

ShowMessage(FullName + ' - ' + Email1Address);

end;



Outlook.Free;



[ ] s



Gerhard Roger Nack

[EMAIL PROTECTED]







De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Filipe Xavier Ramalho
Enviada em: segunda-feira, 15 de maio de 2006 16:56
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Contatos do Outlook



Existe um driver OLEDB para você acessar os dados do Outlook. Só não sei
te
dar detalhes porque nunca utilizei, mas certamente alguém aqui na lista
vai
complementar a minha informação.

Filipe


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de pablomadias
Enviada em: segunda-feira, 15 de maio de 2006 16:44
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Contatos do Outlook

Pessoal, alguém por ai saberia me explicar como faço para abrir no
delphi o catálogo de endereços de um servidor Exchange? Seria através
do OutlookApplication? O que devo fazer?

[]´s





[As partes desta mensagem que não continham texto foram removidas]



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos











Abraços,

Pablo Madi Dias
+55 21 8866-4418

-
Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no
celular e anti-spam realmente eficaz.

[As partes desta mensagem que não continham texto foram removidas]



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





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!.



__ Informação do NOD32 1.1454 (20060321) __

Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
http://www.nod32.com.br


[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos










Abraços,

Pablo Madi Dias
+55 21 8866-4418
  
-
 Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz. 

[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]






  




  
Yahoo! Grupos, um serviço oferecido por

[delphi-br] Ícone na Barra de Tarefas

2005-03-25 Por tôpico Pablo Madi Dias




Pessoal, alguem sabe como eu faço para colocar o icone da minha
aplicação na barra de tarefas ou até mesmo sem ícone nenhum?





Esta mensagem, incluindo seus anexos, pode conter informações privilegiadas
e/ou de caráter confidencial, não podendo ser retransmitida sem autorização
do remetente. Se você não é o destinatário ou pessoa autorizada a recebê-la,
informamos que o seu uso, divulgação, cópia ou arquivamento são proibidos.
Portanto, se você recebeu esta mensagem por engano, por favor, nos informe
respondendo imediatamente a este e-mail e em seguida apague-a.





-- 
 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