Re: [delphi-br] Duplicatas

2004-10-27 Por tôpico Vinicius Mommensohn

Talvez alguma coisa desse tipo:

procedure TForm1.Button1Click(Sender: TObject);
   function arredondar(Valor: Extended; Casas: Integer): Extended;
   begin
  Result := StrToFloat(Copy(FloatToStr(Valor), 1, Pos(',', FloatToStr(Valor)) + 
Casas));
   end;

var
   ValorTotal, Total_Tmp, ValorParcela: extended;
   i, NumerodeParcelas: integer;

begin
   ValorTotal := 103.48;
   Total_Tmp := ValorTotal;
   NumerodeParcelas := 3;

   for i := 1 to NumerodeParcelas do begin
   if i = NumerodeParcelas then begin
  ValorParcela := ValorTotal;
   end
   else begin
  ValorParcela := Arredondar(Total_Tmp / NumerodeParcelas, 2);
   end;
   // aqui vc atribuiu derrepente a um array o valor de cada parcela - Parcela[i] 
:= ValorParcela;
   ValorTotal := ValorTotal - ValorParcela;
   ShowMessage(FloatToStr(ValorParcela));
   end;
end;

Foi a idéia que me veio a cabeça.. se alguem tiver algum melhor em mente :) 

Não lembro se tem função no delphi pra arredondar as casas decimais.. então escrevi a 
função emcima!

Espero ter ajudado :)

[]s

Vinicius


- Original Message - 
From: waldir 
To: [EMAIL PROTECTED] 
Sent: Tuesday, October 26, 2004 10:21 PM
Subject: [delphi-br] Duplicatas


Pessoal, gostaria de uma ajuda se possivel,


Tenho uma venda e gostaria de gerar as duplicatas,


ex: 103,48 em 3 parcelas

seria 1 de 34,50  e 2 de 34,49


como chegaria nesses valores sendo de 103,48 / 3 = 34,49




Ficaria muito agradecido sendo atendido...











[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

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

2004-10-27 Por tôpico emerson

Como devo proceder para fazer uma aplicação
3 camadas com o Bco no Linux.

o Data Module Remoto tem necessariamente 
que ficar em Windows.


[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

 





RES: [delphi-br] HELP - Problemas com consulta!

2004-10-27 Por tôpico Cícerot

Aqui em baixo,
Identtermoautoriz = seu codigo do item
termoautorizado   = nome do remedio

na minha tabela principal,

Bem = tabela principal
bem.termoautorizado = seu codigo do remedio


entao aa query fica assim:

  dmEstrutBD.qryGRID.Close;
   dmEstrutBD.qryGRID.SQL.Clear;

  cmdosql := 'SELECT Autorizado.IdentTermoAutoriz,
Autorizado.TermoAutorizado AS Autorizado_TermoAutorizado, '
  + ' Bem.uf, Bem.Ident, Bem.TermoAutorizado AS
Bem_TermoAutorizado'
  + ' FROM Autorizado INNER JOIN Bem ON
Autorizado.IdentTermoAutoriz = Bem.TermoAutorizado'
  + ' where uf = ' + wuf + '';


   dmEstrutBD.qryGRID.SQL.Add(cmdoSQL);
   dmEstrutBD.qryGRID.Open;


qualquer duvida me chame em [EMAIL PROTECTED]

-Mensagem original-
De: Erika [mailto:[EMAIL PROTECTED]
Enviada em: terça-feira, 26 de outubro de 2004 17:40
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] HELP - Problemas com consulta!




Boa tarde... estou com problemas na minha consulta! É o seguinte:

Tenho 3 tabelas:
- Item (preciso da quantidade de medicamentos)
- Pedido (preciso saber quais itens referem-se ao pedido)
- Medicamento (preciso do nome do medicamento)

Queria listar em um DBGrid os medicamentos contidos nos itens de um
pedido. Mas não só o código e sim o nome.
Então meu DBGrid teria: Nome Medicamento e Quantidade.
Fiz esta procedure, mas dá erro de falta de parâmetros, o que será
que está errado? Estou usando banco access e conexão ADO.

procedure TFormPedido.BuscaItem;
begin
   with DM.QrItem do
   begin
close;
sql.Clear;
sql.add('SELECT item_quantidade, med_nome');
sql.Add('FROM item,medicamento');
sql.Add(('WHERE(item.item_med_numero=:nummed)AND
(item.item_ped_num =:numped))');
Parameters.ParamByName('numped').Value := StrToFloat
(EditPedNum.Text);{Edit com o número do pedido}
Parameters.ParamByName('nummed').Value := StrToFloat
(EditPedMedNum.Text); {edit com o número do medicamento}
Open;
  end;
end;

Bom, não sei se consegui me expressar direito desculpe se está
muito confuso...
Obrigado
[]'s
Erika





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








---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.698 / Virus Database: 455 - Release Date: 02/06/2004

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.698 / Virus Database: 455 - Release Date: 02/06/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]
 
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] [1/2 OFF-TOPIC]Stored procedure em Interbase 6

2004-10-27 Por tôpico Alisson

Este erro ocorre quando se tenta atribuir a um campo um valor maior do que
ele suporta, poderia ser que, por exemplo a variável :Descricao seja
Varchar(50) e o campo Descricao seja Varchar(60). Pode ser que os 11
primeiros registro tenham tamanho menor ou igual a 50 e o 12º seja maior que
isso. Espero ter dado alguma luz.

- Original Message - 
From: Fernando [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Wednesday, October 27, 2004 12:36 AM
Subject: [delphi-br] [1/2 OFF-TOPIC]Stored procedure em Interbase 6


Boa noite,

Estou com um problema utilizando stored procedure no interbase 6.01 win.

Tenho uma tabela com a seguinte estrutura:

ID INTEGER NOT NULL,
CODIGO INTEGER NOT NULL,
DESCRICAO  VARCHAR(60) NOT NULL,
VALOR   NUMERIC(4,2)

possuindo 712 registros. Estou executando a seguinte SP:

begin
  counter = 0;
  for select p.id, p.codigo, p.descricao, p.valor
  from produtos p
  into :id, :codigo, :descricao, :valor
  do
  begin
if (counter = :start + :num) then
  exit;
else
  if (counter = :start) then suspend;
counter = counter +1;
  end
  suspend;
end

Se eu requisito mais de 11 registros ( select * from paginado(0,12) ), seja
via aplicação ou isql recebo o seguinte erro:

Arithmetic exception, numeric overflow, or string truncation
Statement: select * from paginado(0,12)

sendo que de 11 registros para baixo tudo funciona. Estive e estou
procurando no Google alguma indicação, agradeço se alguem puder me ajudar.

Obrigado

Fernando Silva



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




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] [OFF-TOPIC]Profissões

2004-10-27 Por tôpico Alisson

Procure na internet por CBO (Código Brasileiro de Ocupação) e você deve
encontrar muita coisa.

- Original Message - 
From: Sil-jo Evsan [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 5:36 PM
Subject: [delphi-br] [OFF-TOPIC]Profissões


Olá pessoal blz!?

Desculpe pelo off!

Seguinte gostaria de saber se alguém possui uma listagem (em banco de
dados, txt...) com vários

tipos de profissões?

caso possua pode mandar em pvt para o meu e-mail ou mande o link onde eu
possa conseguir.

[EMAIL PROTECTED]

Desde já agradeço a toda e qualquer ajuda.



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




-- 
 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 usa o componente ImgScan1 para scanear fotos

2004-10-27 Por tôpico Evandro Araujo de Abreu

Estou scaneando uma imagem bmp com o seguinte codigo abaixo:

if ImgScan1.ScannerAvailable then
try
  ImgScan1.OpenScanner;
  ImgScan1.ScanTo := 2;
  ImgScan1.Image := 'G:\newsys\fotos\teste.bmp';
  ImgScan1.StartScan;
  Application.ProcessMessages;
finally
  ImgScan1.CloseScanner;
end;

  Coloquei um componente imagem no form e coloquei a imagem que scanei via componente 
ImgScan1,
  quando eu coloco a imagem que scanei acontece o seguinte erro:
  Acesss violation at addres 77F59393 in modulo 'GDI32.DLL'

  Alguem ja ocorreu este erro??

  Evandro

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] Re: Alguem tem outro componente para scanear foto

2004-10-27 Por tôpico Evandro Araujo de Abreu

Alguem tem outro componente para scanear foto sem ser o ImgScan1,
que estou com alguns problemas com este componente

  poderia me mandar no email [EMAIL PROTECTED]

  Evandro

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

2004-10-27 Por tôpico Danilo Antonio Leite

Para a aplicação o fato de o banco estar no Linux não interfere. Você
precisa definir qual o tipo de conexão com o banco pretende usar: por
exemplo, se estiver utilizando PostGreSQL, deve ter um driver ODBC que
permita a conexão com o banco, ou via ADO, DBExpress, etc.
Na aplicação servidora você pode criar RemoteDataModules e incluir as suas
queries, que deverão ter um DataSetProvider associado para disponibilizar
os dados para os clientes.

Na aplicação cliente você poderá utilizar SocketConnection e
SharedConnection para se conectar aos RDM's no servidor, e ClientDataSets
para trazer os dados para o cliente. A partir daí é normal o
desenvolvimento.

Espero ter ajudado.

Danilo Antônio Leite
Arcadian Tecnologia SA
[EMAIL PROTECTED]
(31)3241-8228 ramal 216



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

 





RES: [delphi-br] 3 Camadas

2004-10-27 Por tôpico Walter Alves Chagas Junior

Danilo, cê trabalha ai como Alan Alencar? Eu conheço ele da lista-cruzeiro
;)

 
 
 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia 
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 

 -Mensagem original-
 De: Danilo Antonio Leite [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 27 de outubro de 2004 11:14
 Para: [EMAIL PROTECTED]
 Cc: [EMAIL PROTECTED]
 Assunto: Re: [delphi-br] 3 Camadas
 
 
 
 Para a aplicação o fato de o banco estar no Linux não interfere. Você
 precisa definir qual o tipo de conexão com o banco pretende usar: por
 exemplo, se estiver utilizando PostGreSQL, deve ter um driver ODBC que
 permita a conexão com o banco, ou via ADO, DBExpress, etc.
 Na aplicação servidora você pode criar RemoteDataModules e 
 incluir as suas
 queries, que deverão ter um DataSetProvider associado para 
 disponibilizar
 os dados para os clientes.
 
 Na aplicação cliente você poderá utilizar SocketConnection e
 SharedConnection para se conectar aos RDM's no servidor, e 
 ClientDataSets
 para trazer os dados para o cliente. A partir daí é normal o
 desenvolvimento.
 
 Espero ter ajudado.
 
 Danilo Antônio Leite
 Arcadian Tecnologia SA
 [EMAIL PROTECTED]
 (31)3241-8228 ramal 216
 
 
 
 -- 
  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]
 
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

2004-10-27 Por tôpico Joubert Rinaldi

Valeu,

Não testei ainda mas vou guarda-la para uso futuro.

[]'s


On Tue, 26 Oct 2004 17:01:59 -0200, Prisma Sistemas - Moacir
[EMAIL PROTECTED] wrote:
 Joubert,
 
 Uso esta função com de maneira satisfatoria  no outlook express. Veja se te 
 serve.
 
 Inclua a unit   MAPI no uses do modulo
 
 ==
 Function  SendMail( pTo,
 pCC,
 pCCo,
 pAssunto,
 pTexto: pChar;
 aFiles: Array Of PChar ) : String;
 var
   iRetorno : cardinal;
   sTo, sCC, sCCo, sAux: String;
   MapiMessage: TMapiMessage;
   pRecipiente: PMapiRecipDesc ;
   aRecipiente :array of TMapiRecipDesc ;
   aArquivoEnvio: array of  TMapiFileDesc ;
   i, iRecip, iFiles:integer;
 Const
ERRO_MAPI_AMBIGUOUS_RECIPIENT= 'O destinatário não pode ser resolvido!!';
ERRO_MAPI_FAILURE= 'Ocorreram erros não 
 especificados!'+#13+'Verifique se o Outlook Express é o sistema de mensagens
 padrão.';
ERRO_MAPI_INSUFFICIENT_MEMORY= 'Memória insuficiente!!';
ERRO_MAPI_NOT_SUPPORTED  = 'Operação não suportada pelo sistema de 
 mensagens!';
 begin
   iRecip := 0;
   //  Define destinatários TO
   sTo:= '';
   If Assigned( pTo ) Then
   Begin
 sAux := pTo;
 If sAux[Length(sAux)]  ';' Then
   sAux := sAux + ';';
 While Pos( ';', sAux )  0 Do
 Begin
   Inc( iRecip );
   sTo := sTo + Copy( sAux, 1, Pos( ';', sAux ) );
   Delete( sAux, 1, Pos( ';', sAux ) );
 End;
   End;
   //  Define destinatários CC
   sCC:= '';
   If Assigned( pCC ) Then
   Begin
 sAux := pCC;
 If sAux[Length(sAux)]  ';' Then
   sAux := sAux + ';';
 While Pos( ';', sAux )  0 Do
 Begin
   Inc( iRecip );
   sCC := sCC + Copy( sAux, 1, Pos( ';', sAux ) );
   Delete( sAux, 1, Pos( ';', sAux ) );
 End;
   End;
   //  Define destinatários CCo
   sCCo:= '';
   If Assigned( pCCo ) Then
   Begin
 sAux := pCCo;
 If sAux[Length(sAux)]  ';' Then
   sAux := sAux + ';';
 While Pos( ';', sAux )  0 Do
 Begin
   Inc( iRecip );
   sCCo := sCCo + Copy( sAux, 1, Pos( ';', sAux ) );
   Delete( sAux, 1, Pos( ';', sAux ) );
 End;
   End;
 
   // cria  o tamanho do array de recipiente
   SetLength(aRecipiente, iRecip);
 
   I := 0;
   // Define recipientes TO
   While sTO  '' Do
   Begin
   iRetorno  := MAPIResolveName( 0, 0, PChar( Copy( 
 sTo, 1, Pos(';', sTo) - 1 ) ), 0, 0, pRecipiente );
 
 // VERIFICA  SE NÃO OCORREU ERROS
 If (iRetorno  SUCCESS_SUCCESS) Then
 begin
Case iRetorno Of
  MAPI_E_AMBIGUOUS_RECIPIENT: Result:= ERRO_MAPI_AMBIGUOUS_RECIPIENT;
  MAPI_E_FAILURE: Result:= 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_TO;
 Delete( sTO, 1, Pos( ';', sTO ) );
 Inc( I );
   End;
   // Define recipientes CC
   While sCC  '' Do
   Begin
 iRetorno := MAPIResolveName( 0, 0, PChar( Copy( sCC, 1, Pos(';', sCC) - 
 1 ) ), 0, 0, pRecipiente );
 // VERIFICA  SE NÃO OCORREU ERROS
 If (iRetorno  SUCCESS_SUCCESS) Then
 begin
Case iRetorno Of
  MAPI_E_AMBIGUOUS_RECIPIENT: Result:= ERRO_MAPI_AMBIGUOUS_RECIPIENT;
  MAPI_E_FAILURE: Result:= 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_CC;
 Delete( sCC, 1, Pos( ';', sCC ) );
 Inc( I );
   End;
   // Define recipientes BCC
   While sCCo  '' Do
   Begin
 iRetorno := MAPIResolveName( 0, 0, PChar( Copy( sCCo, 1, Pos(';', 
 sCCo) - 1 ) ), 0, 0, pRecipiente );
 // VERIFICA  SE NÃO OCORREU ERROS
 If (iRetorno  SUCCESS_SUCCESS) Then
 begin
Case iRetorno Of
  MAPI_E_AMBIGUOUS_RECIPIENT: Result:= ERRO_MAPI_AMBIGUOUS_RECIPIENT;
  MAPI_E_FAILURE: Result:= 

Re: [delphi-br] 3 Camadas

2004-10-27 Por tôpico emerson

Danilo eu entendi,

Mas minha dúvida maior na verdade é:  tem como colocar
a aplicação servidora no Linux junto com o banco?


Muito Obrig. por enquanto.



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

2004-10-27 Por tôpico Danilo Antonio Leite

Acho que você vai ter que optar entre Windows ou Linux, neste caso. O
banco pode ficar no Linux, mas não necessariamente a aplicação tem que
ficar também. Mas caso queira que a aplicação rode no Linux, acho que vai
ter que desenvolver tudo para Linux usando o Kylix.

Danilo



-- 
 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] Vaga PHP BH

2004-10-27 Por tôpico Ricardo de Souza


Estamos contratando programador PHP/MySql com experiência em 
webdesign.
Interessados deverão enviar CV com pretensão salarial e portifólio.

A vaga é para BH - Região de Venda Nova.

Atenciosamente,
Ricardo Souza






-- 
 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] Chamar Calculadora do Windows

2004-10-27 Por tôpico Erika


Como eu faço para quando clicar em um botão, chamar a calculadora do 
Windows?
Obrigado
[]'s





-- 
 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] Download via HTTP

2004-10-27 Por tôpico Alosi

Alguém saberia me dizer se é possível e como, fazer download de arquivo via HTTP no 
Delphi.

Hoje faço o mesmo download através de FTP, porém, meu ftp tem limite de conexões, e 
assim, não é possível todos os usuários do sistema fazerem o download do arquivo ao 
mesmo tempo, quero alterar para o HTTP, pois esse não tem limite.

obrigado
Alosi


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

2004-10-27 Por tôpico info.suporte

Alguem já conseguiu rodar um relatório gerado pelo quickreport no Word:

Aguardo resposta!


PAULO FERNANDES
PORTO AELGRE  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]
 
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

 





RES: [delphi-br] Chamar Calculadora do Windows

2004-10-27 Por tôpico Eduardo Silva ®

Se win98
 winexec('c:\windows\calc.exe',AW_CENTER);
Se win NT, 2000 ou XP
 winexec('c:\winnt\system32\calc.exe',AW_CENTER);
  -Mensagem original-
  De: Erika [mailto:[EMAIL PROTECTED]
  Enviada em: quarta-feira, 27 de outubro de 2004 10:46
  Para: [EMAIL PROTECTED]
  Assunto: [delphi-br] Chamar Calculadora do Windows



  Como eu faço para quando clicar em um botão, chamar a calculadora do
  Windows?
  Obrigado
  []'s





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

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



---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.772 / Virus Database: 519 - Release Date: 01/10/2004


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

2004-10-27 Por tôpico Rafael Stoever

[Linux]
Banco de dados
Servidor Web - PHP com acesso ao banco

[Windows]
Aplicação Delphi com acesso WEB


No servidor de Web podes criar consultas ou cadastramentos conforme solicitações de 
sua aplicação delphi, para interagir utilize XML entre as aplicações (PHP e Delphi)
[  Linux  -   WEB  -  User  ]
BD - PHP - XML - Delphi


.Rafael Stoever .Desenvolvimento
- Original Message - 
From: emerson [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Wednesday, October 27, 2004 6:36 AM
Subject: [delphi-br] 3 Camadas



Como devo proceder para fazer uma aplicação
3 camadas com o Bco no Linux.

o Data Module Remoto tem necessariamente 
que ficar em Windows.


[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




 





[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] Vaga PHP BH

2004-10-27 Por tôpico Rafael Stoever

Cadastre no
http://www.ceviu.com


[]'s
.Rafael Stoever .Desenvolvimento

- Original Message - 
From: Walter Alves Chagas Junior [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Wednesday, October 27, 2004 10:56 AM
Subject: RES: [delphi-br] Vaga PHP BH



Ricardo, poste esta mensagem também na lista delphi-empregos

 [EMAIL PROTECTED]



 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200



 -Mensagem original-
 De: Ricardo de Souza [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 27 de outubro de 2004 10:41
 Para: [EMAIL PROTECTED]
 Assunto: [delphi-br] Vaga PHP BH




 Estamos contratando programador PHP/MySql com experiência em
 webdesign.
 Interessados deverão enviar CV com pretensão salarial e portifólio.

 A vaga é para BH - Região de Venda Nova.

 Atenciosamente,
 Ricardo Souza






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

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

2004-10-27 Por tôpico alisson_delphi


Gostaria de saber se alguem tem um tutorial ou até apostila que 
ensina a mexer com o rave reports na sua totalidade





-- 
 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] SOcorro com IBQUERY e autoincremento

2004-10-27 Por tôpico Rafael Jorge

estou urgentemente precisando de ajuda com o sequinte:
eu tenho um sistema que utilizava banco de dados paradox, migrei ele
pra firebird. criei todas as tabelas generators e triggers. ta tudo
correto.

no datamodule eu coloquei ibquerys setando a propiedade GeneratorField
corretamente e tudo o mas.
estou usando compoentes do data controls.

tentei inserir dados (insert) e recebi a mensagem dizendo que a query
esta em read-only procurei o requestlive mas esse compoente ibquery
nao possui tal propiedade. desisti e botei ibtable, so que continuo
com um problema:
se eu adiciono o campo codigo por exemplo a listagem dos campos (duplo
click no compoente tibtable). o trigger já nao funciona! ai o que eu
fiz retirei ele da listagem! funcionou beleza! so que existem tabelas
que eu faço referencia ao campo codigo delas usando fieldbyname ai da
pau dizendo que o campo nao existe! o pior e que tenho qe mascarar os
campos por isso preciso adicionalos a listagem!

estou desisperado! o prazo ta acabando e eu to barrado nessas bronca.
qualquer ajuda, conselho, macumba, resa, sei la, ajudaria bastante!
t+


-- 
 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] Descrever em 2 linhas

2004-10-27 Por tôpico Charlles Ferdinand

Pessoal tenho um relatorio no Qreport, mas acontece que um dos campos é para
trazer a descrição de um bem patrimonial, só que esta descrição é muito
grande e teria que continuar numa segunda linha, como acontece por exemplo
no excel, tem aquele retorno automatico de texto, e o que não cabe na mesma
linha joga para linha de baixo.

Alguem sabe como se tem jeito de fazer isto?

Abraços.


Charlles Ferdinand
Analista Contábil
Tel.: (22) 2622-9739


[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] Descrever em 2 linhas

2004-10-27 Por tôpico Rafael Stoever

if (lenght(campo)  limite)
  primeiralinha := copy(campo,1,limite);
  segundalinha := copy(campo,limite,(lenght(campo))); // claro.. aqui na
segunda linha podes tratar melhor mas seria +/- isso.
end;

.Rafael Stoever .Desenvolvimento
- Original Message - 
From: Charlles Ferdinand [EMAIL PROTECTED]
To: Delphi-Br [EMAIL PROTECTED]
Sent: Wednesday, October 27, 2004 1:00 PM
Subject: [delphi-br] Descrever em 2 linhas



Pessoal tenho um relatorio no Qreport, mas acontece que um dos campos é para
trazer a descrição de um bem patrimonial, só que esta descrição é muito
grande e teria que continuar numa segunda linha, como acontece por exemplo
no excel, tem aquele retorno automatico de texto, e o que não cabe na mesma
linha joga para linha de baixo.

Alguem sabe como se tem jeito de fazer isto?

Abraços.


Charlles Ferdinand
Analista Contábil
Tel.: (22) 2622-9739


[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

 





RES: [delphi-br] Descrever em 2 linhas

2004-10-27 Por tôpico Charlles Ferdinand

Não consegui adptar para colocar isto em um relatório, poderia me explicar
melhor?

Agradeço desde ja a atenção dispensada.

Charlles Ferdinand
Analista Contábil
Tel.: (22) 2622-9739

-Mensagem original-
De: Rafael Stoever [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 27 de outubro de 2004 15:13
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Descrever em 2 linhas


if (lenght(campo)  limite)
  primeiralinha := copy(campo,1,limite);
  segundalinha := copy(campo,limite,(lenght(campo))); // claro.. aqui na
segunda linha podes tratar melhor mas seria +/- isso.
end;

.Rafael Stoever .Desenvolvimento
- Original Message -
From: Charlles Ferdinand [EMAIL PROTECTED]
To: Delphi-Br [EMAIL PROTECTED]
Sent: Wednesday, October 27, 2004 1:00 PM
Subject: [delphi-br] Descrever em 2 linhas



Pessoal tenho um relatorio no Qreport, mas acontece que um dos campos é para
trazer a descrição de um bem patrimonial, só que esta descrição é muito
grande e teria que continuar numa segunda linha, como acontece por exemplo
no excel, tem aquele retorno automatico de texto, e o que não cabe na mesma
linha joga para linha de baixo.

Alguem sabe como se tem jeito de fazer isto?

Abraços.


Charlles Ferdinand
Analista Contábil
Tel.: (22) 2622-9739


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



  Yahoo! Grupos, um serviço oferecido por:









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

2004-10-27 Por tôpico emerson

ok pessoal , obrig. pelas dicas.


-- 
 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] [OFF Topic] Delphi x Report Builder

2004-10-27 Por tôpico Elazar Dornelles Ceza

Ola pessoal...
 to com uma dúvida

tem como usar um label com um texto na vertical no ReportBuilder


Uso delphi 5, IBX  e ReportBuilder 5 Enterprise.


desde ja 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: [delphi-br] Copia de arquivos com atributo read-only( somente-leitura )

2004-10-27 Por tôpico Fabio Giro


Douglas, peguei esta dica aqui na lista. Não testei. Para o que você quer,
talvez tenha que alterar o parâmetro onde está o num. 6. Faça os testes e
adapte para as suas necessidades.

mudar um de seus atributos para arquivo oculto

solucao

SetFileAttributes(PChar(Temp_Diretorio+'\Arquivo.txt'),6);

Esper ter ajudado

- Original Message -
From: Douglas - CPD [EMAIL PROTECTED]
To: Delphi - grupos [EMAIL PROTECTED]; Delphi-Br
[EMAIL PROTECTED]; [EMAIL PROTECTED] Com. Br
[EMAIL PROTECTED]; Delphi-Total
[EMAIL PROTECTED]; Lista-Delphi
[EMAIL PROTECTED]
Sent: Monday, October 25, 2004 10:44 AM
Subject: [delphi-br] Copia de arquivos com atributo read-only(
somente-leitura )



Preciso de uma função que copie sobre arquivos com atributo read-only,
alguém teria ??


Obrigado.


Att.
Douglas - CPD.
---
Email enviado sem vírus - ¿?
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.782 / Virus Database: 528 - Release Date: 22/10/2004


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

2004-10-27 Por tôpico -=SchiavoR=-


Me interessei pelo assunto, você poderia disponibilizar um pequeno 
exemplo do cliente e servidor por e-mail pra mim por favor?

Felipe Guerço Oliveira escreveu:

 Tem como fazer em multicamadas com servidor de aplicação e BD Linux e o
 resto windows.

 É só usar WevbServices; a parte servidora em Kylix e a cliente em Delphi.
 Funciona bem.

 Atenciosamente,
 Felipe Guerço Oliveira

 - Original Message -
 From: emerson
 To: [EMAIL PROTECTED]
 Sent: Wednesday, October 27, 2004 9:36 AM
 Subject: Re: [delphi-br] 3 Camadas


 Danilo eu entendi,

 Mas minha dúvida maior na verdade é:  tem como colocar
 a aplicação servidora no Linux junto com o banco?


 Muito Obrig. por enquanto.




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

 * 
 http://br.rd.yahoo.com/SIG=12acis9ic/M=264105.3931087.6562589.1588051/D=brclubs/S=2137111264:HM/EXP=1098971017/A=2361264/R=6/SIG=10v4acpp0/*http://br.shopping.yahoo.com/*
   


 
 *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]
   mailto:[EMAIL PROTECTED]

 * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
   Serviço do Yahoo! http://br.yahoo.com/info/utos.html.







-- 
 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] Chamar Calculadora do Windows

2004-10-27 Por tôpico infomark_miguel


É só chamar

winexec('calc.exe',1)

que funciona para qualquer caso.

___

Miguel Franco Galego
I n f o m a r k   S o l u ç õ e s
[EMAIL PROTECTED]
icq 332006521
___


  - Original Message - 
  From: Eduardo Silva ® 
  To: [EMAIL PROTECTED] 
  Sent: Wednesday, October 27, 2004 11:59 AM
  Subject: RES: [delphi-br] Chamar Calculadora do Windows


  Se win98
   winexec('c:\windows\calc.exe',AW_CENTER);
  Se win NT, 2000 ou XP
   winexec('c:\winnt\system32\calc.exe',AW_CENTER);
-Mensagem original-
De: Erika [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 27 de outubro de 2004 10:46
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] Chamar Calculadora do Windows



Como eu faço para quando clicar em um botão, chamar a calculadora do
Windows?
Obrigado
[]'s





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

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



  ---
  Outgoing mail is certified Virus Free.
  Checked by AVG anti-virus system (http://www.grisoft.com).
  Version: 6.0.772 / Virus Database: 519 - Release Date: 01/10/2004


  [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

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




--


  Incoming mail is certified Virus Free.
  Checked by AVG Anti-Virus (http://www.grisoft.com).
  Version: 7.0.269 / Virus Database: 264.12.3 - Release Date: 25/10/04

  --

Outgoing mail is certified Virus Free.
Checked by AVG Anti-Virus (http://www.grisoft.com).
Version: 7.0.269 / Virus Database: 264.12.3 - Release Date: 25/10/04


[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] Bloqueio de registro

2004-10-27 Por tôpico Ronaldo Melo


Olá a todos,

Estou com o seguinte problema:

Tenho duas tabelas que tem que ser alimentadas em dois computadores. Uma de convites e 
outra de convidados.

No computador 1 dou um startransition abro a tabela convites para inserir um novo 
convite (insert), abro a tabela convidados pra inserir um novo convidado (insert) e 
vou cadastrando o convidado. No computador 2 faco a mesma coisa que fiz no 1.

Quando vou gravar os registros no primeiro computador que gravo funciona normalmente, 
no segundo quando vou gravar da registro bloquedo por outro usuario e so grava quando 
gravo o convite no primeiro.

Tenho pouco conhecimento sobre delphi/redes e gostaria da ajuda de vcs para solucionar 
esse problema.

Sem mais
antecipadamente agradeço.
Ronaldo Melo


[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] Descrever em 2 linhas

2004-10-27 Por tôpico infomark_miguel


Charles

Alterer a propriedade AutoStretch do componente TQRDBText que esta mostrando o campo 
da descrição para True.

QRDBText1.AutoStretch:=True;

___

Miguel Franco Galego
I n f o m a r k   S o l u ç õ e s
[EMAIL PROTECTED]
icq 332006521
___


  - Original Message - 
  From: Charlles Ferdinand 
  To: Delphi-Br 
  Sent: Wednesday, October 27, 2004 2:00 PM
  Subject: [delphi-br] Descrever em 2 linhas


  Pessoal tenho um relatorio no Qreport, mas acontece que um dos campos é para
  trazer a descrição de um bem patrimonial, só que esta descrição é muito
  grande e teria que continuar numa segunda linha, como acontece por exemplo
  no excel, tem aquele retorno automatico de texto, e o que não cabe na mesma
  linha joga para linha de baixo.

  Alguem sabe como se tem jeito de fazer isto?

  Abraços.


  Charlles Ferdinand
  Analista Contábil
  Tel.: (22) 2622-9739


  [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

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




--


  Incoming mail is certified Virus Free.
  Checked by AVG Anti-Virus (http://www.grisoft.com).
  Version: 7.0.269 / Virus Database: 264.12.3 - Release Date: 25/10/04

  --

Outgoing mail is certified Virus Free.
Checked by AVG Anti-Virus (http://www.grisoft.com).
Version: 7.0.269 / Virus Database: 264.12.3 - Release Date: 25/10/04


[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

 





RES: [delphi-br] Off - Sistema Imobiliaria

2004-10-27 Por tôpico Walter Alves Chagas Junior

Eu já trabalhei no desenvolvimento de um também mas foi em Clipper.
Adminstrava imóveis e telefones

 
 
 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia 
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 

 -Mensagem original-
 De: infomark_miguel [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 27 de outubro de 2004 12:49
 Para: [EMAIL PROTECTED]
 Assunto: Re: [delphi-br] Off - Sistema Imobiliaria
 
 
 
 
 Vladmir
 
 Eu já desenvolvi um sistema completo para imobiliária, o 
 sistema faz geração de contratos de locação, vendas, DELPHI 
 com INTERBASE usando TClientDataSet para acesso a dados.
 
 Sistema muito bom.
 
 
 Miguel Franco Galego
 I n f o m a r k   S o l u ç õ e s
 [EMAIL PROTECTED]
 icq 332006521
 
   - Original Message - 
   From: Vladmir 
   To: [EMAIL PROTECTED] 
   Sent: Wednesday, October 27, 2004 12:53 PM
   Subject: [delphi-br] Off - Sistema Imobiliaria
 
 
 
 
   Caros,
   Alguem teria,trabalha ou conheçe sistema para imobiliaria.
   Estou atraz de um.
   Favor contactar em pvt.
 
   vladmir pinto
 
   [EMAIL PROTECTED]
   www.mastersys.inf.br
   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: 
  
  
   
  

 
 
 --
 
   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!. 
 
 
 
 
 --
 
 
 
   Incoming mail is certified Virus Free.
   Checked by AVG Anti-Virus (http://www.grisoft.com).
   Version: 7.0.269 / Virus Database: 264.12.3 - Release Date: 25/10/04
 
   --
 
 Outgoing mail is certified Virus Free.
 Checked by AVG Anti-Virus (http://www.grisoft.com).
 Version: 7.0.269 / Virus Database: 264.12.3 - Release Date: 25/10/04
 
 
 [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
 
 
 
 
  
 
 
 


[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] empresa que forneça web hosting para site em delphi, alguém sugere?

2004-10-27 Por tôpico André Mota

Olá amigos, tudo bem?

Alguém ae pode sugerir alguma empresa que forneça web hosting para site em delphi?

Grato,

André Mota

[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] Copia de arquivos com atributo read-only( somente-leitura )

2004-10-27 Por tôpico Douglas Santiago

Tenho um programa que copia arquivos de um servidor , para outro servidor , ou do 
servidor para a maquina local, nesse servidor de onde faço as cópias o usuário só tem 
direito de leitura, e com isso quando faço as cópias o arquivo fica com atributo de 
read-only, e quando vou sobreescrever ao copiar novamente, me retorna erro pois não 
consegue gravar sobre os arquivos somente-leitura.
 
Att.
Douglas

Fabio Giro [EMAIL PROTECTED] wrote:


Douglas, peguei esta dica aqui na lista. Não testei. Para o que você quer,
talvez tenha que alterar o parâmetro onde está o num. 6. Faça os testes e
adapte para as suas necessidades.

mudar um de seus atributos para arquivo oculto

solucao

SetFileAttributes(PChar(Temp_Diretorio+'\Arquivo.txt'),6);

Esper ter ajudado

- Original Message -
From: Douglas - CPD 
To: Delphi - grupos ; Delphi-Br
; [EMAIL PROTECTED] Com. Br
; Delphi-Total
; Lista-Delphi


Sent: Monday, October 25, 2004 10:44 AM
Subject: [delphi-br] Copia de arquivos com atributo read-only(
somente-leitura )



Preciso de uma função que copie sobre arquivos com atributo read-only,
alguém teria ??


Obrigado.


Att.
Douglas - CPD.
---
Email enviado sem vírus - ¿?
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.782 / Virus Database: 528 - Release Date: 22/10/2004


[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

* 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] empresa que forneça web hosting para site em delphi, alguém sugere?

2004-10-27 Por tôpico Paulo Botelho

http://www.infoserra.com.br/


- Original Message - 
From: André Mota [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Thursday, October 28, 2004 5:32 PM
Subject: [delphi-br] empresa que forneça web hosting para site em delphi,
alguém sugere?



 Olá amigos, tudo bem?

 Alguém ae pode sugerir alguma empresa que forneça web hosting para site em
delphi?

 Grato,

 André Mota

 [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] Chamar Calculadora do Windows

2004-10-27 Por tôpico Vinicius Mommensohn

Esse é o jeito que eu chamo a calculadora:

procedure TFormPrincipal.Image6Click(Sender: TObject);
var
   WinDir: array [0..MAX_PATH-1] of char;
   Result: string;
   PlatformId, CSDVersion: String;

begin
   CSDVersion := '';

   case Win32Platform of VER_PLATFORM_WIN32_WINDOWS:
  begin
 if Win32MajorVersion = 4 then
case Win32MinorVersion of
  0: PlatformId := '9x';
  10: PlatformId := '9x';
  90: PlatformId := 'ME';
end
 else PlatformId := '9x';
  end;

   VER_PLATFORM_WIN32_NT:
   begin
  if Length(Win32CSDVersion)  0 then CSDVersion := Win32CSDVersion;
  if Win32MajorVersion = 4 then
 PlatformId := 'NT'
  else
if Win32MajorVersion = 5 then
  case Win32MinorVersion of
0: PlatformId := '2000';
1: PlatformId := 'XP';
2: PlatformId := '2003';
  else
PlatformId := '?';
  end
else
  PlatformId := '?';
  end;
   end;

   SetString(Result, WinDir, GetWindowsDirectory(WinDir, MAX_PATH));
   if PlatformId = '9x' then begin
  Result := Result + '\calc.exe';
   end
   else if PlatFormId = 'XP' then begin
  Result := Result + '\system32\calc.exe';
   end;
   ShellExecute(Application.Handle, 'open', PChar(Result), nil, nil, SW_SHOWNORMAL);
end;

[]s

Vinicius

- Original Message - 
From: infomark_miguel 
To: [EMAIL PROTECTED] 
Sent: Wednesday, October 27, 2004 1:51 PM
Subject: Re: [delphi-br] Chamar Calculadora do Windows



É só chamar

winexec('calc.exe',1)

que funciona para qualquer caso.

___

Miguel Franco Galego
I n f o m a r k   S o l u ç õ e s
[EMAIL PROTECTED]
icq 332006521
___


  - Original Message - 
  From: Eduardo Silva ® 
  To: [EMAIL PROTECTED] 
  Sent: Wednesday, October 27, 2004 11:59 AM
  Subject: RES: [delphi-br] Chamar Calculadora do Windows


  Se win98
   winexec('c:\windows\calc.exe',AW_CENTER);
  Se win NT, 2000 ou XP
   winexec('c:\winnt\system32\calc.exe',AW_CENTER);
-Mensagem original-
De: Erika [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 27 de outubro de 2004 10:46
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] Chamar Calculadora do Windows



Como eu faço para quando clicar em um botão, chamar a calculadora do
Windows?
Obrigado
[]'s





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

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



  ---
  Outgoing mail is certified Virus Free.
  Checked by AVG anti-virus system (http://www.grisoft.com).
  Version: 6.0.772 / Virus Database: 519 - Release Date: 01/10/2004


  [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

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




--


  Incoming mail is certified Virus Free.
  Checked by AVG Anti-Virus (http://www.grisoft.com).
  Version: 7.0.269 / Virus Database: 264.12.3 - Release Date: 25/10/04

  --

Outgoing mail is certified Virus Free.
Checked by AVG Anti-Virus (http://www.grisoft.com).
Version: 7.0.269 / Virus Database: 264.12.3 - Release Date: 25/10/04


[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 

[delphi-br] Utilizando SQL Loader

2004-10-27 Por tôpico er83pet04



Pessoal,

Alguém já utilizou o SQL Loader?

Tenho umas tabelas em excel com dados que preciso passar para o meu 
banco de dados em Oracle, mas não gostaria de ter que digitar tudo 
novamente. Estou utilizando o Oracle 9i e nele soube que há a 
possibilidade através do SQL Loader de fazer o que quero.
Mas não consegui achar nada que explique como é o procedimento. 
Alguém poderia me ajudar?

- Onde encontro? É através do SQL PLUS, é uma linha de comando, é um 
aplicativo separado para isso?
- Consigo fazer do excel direto para o Oracle ou tem que ser .txt?
- Sei que a estrutura da tabela em excel deve ser idêntica a da 
tabela no banco, mas tem algo específico que deva ter na tabela em 
excel?

Se alguém tiver um procedimento que possa utilizar para realizar tal 
ação, por favor peço que me envie.

Obrigada





-- 
 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] Pesquisa com Campo Data

2004-10-27 Por tôpico Erika


Olá.

Eu gostaria de pesquisar os produtos de uma tabela comprados em um 
período de tempo, ou seja, é informado a data para início e fim da 
pesquisa e o resultado são os produtos adquidos neste intervalo.
Estou usando ADOQuery, como ficaria o SQL desta pesquisa?

Obrigado..

[]'s

Erika





-- 
 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] Pesquisa com Campo Data

2004-10-27 Por tôpico Jefferson \(yahoo\)

with adoquery do begin
  Close;
  Sql.Clear;
  Sql.Add('Select Material From Produtos Where Data between :DataIni and :DataFim');
  Parambyname('DataIni').AsDateTime := StrToDateTime('01/01/2004 00:01');
  Parambyname('DataFim').AsDateTime := StrToDateTime('31/01/2004 23:59');
  Open;
end;

Espero ter ajudado.
  - Original Message - 
  From: Erika 
  To: [EMAIL PROTECTED] 
  Sent: Wednesday, October 27, 2004 7:48 PM
  Subject: [delphi-br] Pesquisa com Campo Data



  Olá.

  Eu gostaria de pesquisar os produtos de uma tabela comprados em um 
  período de tempo, ou seja, é informado a data para início e fim da 
  pesquisa e o resultado são os produtos adquidos neste intervalo.
  Estou usando ADOQuery, como ficaria o SQL desta pesquisa?

  Obrigado..

  []'s

  Erika





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

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]
 
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] Botões do Quickreport

2004-10-27 Por tôpico Carlos Alberto Ely Machado


Maicon Gabriel Schmitz escreveu:

Abra e traduza os caption's do arquivo Qrprev.dfm que esta na pasta LIB do seu 
Delphi;
Porem, NÃO altere os nomes dos componentes...

- Original Message - 
From: info.suporte [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Wednesday, October 27, 2004 3:50 PM
Subject: [delphi-br] Botões do Quickreport


  

Pelo menos no caso do QuickReport 3.X abra o arquivo qrprev.dfm  e 
traduza os Captions e/ou Hint conforme o caso e salve o arquivo.

Alguem sabe como traduzir os botões do quickreport?

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

2004-10-27 Por tôpico rstoever


Estou com um FORM - formstyle = fsMDIChild
e é um form de cadastro, mas estou inserindo algumas informacoes.. 
mas antes do usuário fechar a tela eu verifico se ele alterou as 
informacoes... bom... 
no onclose do form coloquei algumas verificaçoes deste tipo e aquela 
pergunta tradicional Desejas salvar as informações alteradas ?[S/N/C]
Caso eu informe Cancelar, a janela nao é p/ fechar, e sim ficar ali.. 
normal
mas como é um form filho, ele miniza na aplicaçao, como faço p/ ela 
ficar ainda ali sem fechar, sem salvar, sem nada 


valeu ai 
.rafa





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

2004-10-27 Por tôpico Vinicius Mommensohn

Eu não lembro qual eh o numero do cancelar (do sim se eu naum me engano é 6) mas é só 
vc colocar algo do tipo:

Ao invez de colocar a pergunta no Onclose, coloque-a no evento OnCloseQuery (assim dá 
para negar o fechamento da tela).

Se a resposta da pergunta for o Cancel, faça:

If messagebox. = Cancel then begin // não lembro da string inteira
CanClose := false;
end;

Isso fará com que a janela não se feche! :)

Espero que isto te ajude,

[]s

Vinicius

- Original Message - 
From: rstoever 
To: [EMAIL PROTECTED] 
Sent: Thursday, October 28, 2004 2:05 AM
Subject: [delphi-br] Fechar form



Estou com um FORM - formstyle = fsMDIChild
e é um form de cadastro, mas estou inserindo algumas informacoes.. 
mas antes do usuário fechar a tela eu verifico se ele alterou as 
informacoes... bom... 
no onclose do form coloquei algumas verificaçoes deste tipo e aquela 
pergunta tradicional Desejas salvar as informações alteradas ?[S/N/C]
Caso eu informe Cancelar, a janela nao é p/ fechar, e sim ficar ali.. 
normal
mas como é um form filho, ele miniza na aplicaçao, como faço p/ ela 
ficar ainda ali sem fechar, sem salvar, sem nada 


valeu ai 
.rafa





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