[delphi-br] Desligar o WinXP

2005-09-06 Por tôpico Isaque Lisboa
Ola pessoal...eu tenho um codigo aki q eh para desligar o pc no horario 
programadobom, soh q ele soh funciona no Win9x...no Win2000 e no WinXP ele 
naum funcionaja peguei codigos da net q dizem q saum pra isso. mas 
compilei e mais uma vez naum deu nadaalguem pode me ajudar ?

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





Re: Res: [delphi-br] Qual comando SQL utilizarei para verificar apenas o mes de um campo data???

2005-09-06 Por tôpico sandro cunha
Preciso montar uma query que selecione em um Tabela todos os registros, desta, 
cujo campo data seja igual a JULHO por exemplo.
Como ficaria o comando SQL?
 
Sandro.

Francisco Andrade [EMAIL PROTECTED] escreveu:
para obter o mes de uma data use month(campodata) ele vai retornar a uma
string 

---Mensagem original--- 

De: sandro cunha 
Data: 09/05/05 14:17:56 
Para: Grupo Delphi 
Assunto: [delphi-br] Qual comando SQL utilizarei para verificar apenas o mes
de um campo data??? 

Tenho que verificar o mes em um campo data de uma tabala (paradox) e
compara-lo com o que o usuário esclheu. 

Comparar datas é rotineiro para mim porém, verificar somente o mês dentro de
uma data eu nunca fiz antes. 

Um grande abraço a todos 
Sandro 


- 
  Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA.
Participe! 

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



Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE
var lrec_target=_blank;var lrec_URL=new 
Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12f24no1s/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125966525/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var
 
lrec_altURL=http://br.rd.yahoo.com/SIG=12f24no1s/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125966525/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var
 lrec_width=300;var lrec_height=250;

-
Links do Yahoo! Grupos

   Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
   Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
   O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



-
 Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe!

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: Res: [delphi-br] Qual comando SQL utilizarei para verificar apenas o mes de um campo data???

2005-09-06 Por tôpico Andrei Luís
Sandro,

 Você conhece a cláusula WHERE? Bem é ela que vai filtrar os registros
que você quer...

Estude o comando que o Leandro passou e adapte-o ao seu select.


[]
Andrei

Em 06/09/05, sandro cunha[EMAIL PROTECTED] escreveu:
 Preciso montar uma query que selecione em um Tabela todos os registros, 
 desta, cujo campo data seja igual a JULHO por exemplo.
 Como ficaria o comando SQL?
 
 Sandro.
 
 Francisco Andrade [EMAIL PROTECTED] escreveu:
 para obter o mes de uma data use month(campodata) ele vai retornar a uma
 string
 
 ---Mensagem original---
 
 De: sandro cunha
 Data: 09/05/05 14:17:56
 Para: Grupo Delphi
 Assunto: [delphi-br] Qual comando SQL utilizarei para verificar apenas o mes
 de um campo data???
 
 Tenho que verificar o mes em um campo data de uma tabala (paradox) e
 compara-lo com o que o usuário esclheu.
 
 Comparar datas é rotineiro para mim porém, verificar somente o mês dentro de
 uma data eu nunca fiz antes.
 
 Um grande abraço a todos
 Sandro


-- 
 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] Re: For ou While dentro de uma procedure firebird

2005-09-06 Por tôpico Levi Ribeiro de Freitas
Consegui obrigado.
 
Para uso dos demais:
 
CREATE TRIGGER TBQLCONTROLE_AI FOR TBQLCONTROLE ACTIVE
AFTER INSERT POSITION 0
AS
 
declare variable i integer;
declare variable iFuros integer;
 
BEGIN
 
i = 1;
iFuros = new.furos + 1;
 
While (i  iFuros) do
begin
 
insert into tbqlcontroledimensional
   (ID_CONTROLE, FURO, USR_CAD, DT_CAD)
values
   (NEW.ID, :i, NEW.USR_CAD, NEW.DT_CAD);
i = i + 1;
end
 
END
 
Levi

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Danilo
Enviada em: segunda-feira, 5 de setembro de 2005 11:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Re: For ou While dentro de uma procedure firebird


Boa Tarde,

faz assim

  CONTA = 0; --VARIAVEL CONTA INTEIRO
  FIM = 100; --VARIAVEL FIM INTEIRO
while (CONTA = FIM) do
  begin
   -- cola aki seu codigo
   CONTA = CONTA +1;
  end


abraços
Danilo


*** REPLY SEPARATOR ***

On 5/9/2005 at 10:53 Levi Ribeiro de Freitas wrote:
Silveira,

Obrigado pela ajuda.
Mas vê se eu posso fazer de outra forma.
Cada vez que eu inserir um cadastro novo, este cadastro irá conter um campo
que vai me dizer quantos itens preciso inserir na tabela filha.

Acredito que não consiguirei usar uma estrutura baseada no seu exemplo.

Levi

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de crsilveira
Enviada em: segunda-feira, 5 de setembro de 2005 10:41
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Re: For ou While dentro de uma procedure firebird


FOR SELECT CAMPO1 FROM TABELA WHERE XXX = :PARAM
INTO :CAMPO1a
DO
BEGIN
  --Insira aqui o q vc quer executar
END;

--- Em delphi-br@yahoogrupos.com.br, Levi Ribeiro de Freitas
[EMAIL PROTECTED] escreveu
 Pessoal,
  
 Alguém tem idéia de como posso fazer um while ou for dentro de uma
procedure
 firebird?
 Preciso inserir um lote de registros cada vez que ela for executada.
 Obrigado
  
 Atenciosamente,
  
 Levi Ribeiro de Freitas
 Programador de Computadores
  mailto:[EMAIL PROTECTED]  
 
 
 [As partes desta mensagem que não continham texto foram removidas]




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:  

PUBLICIDADE



http://br.rd.yahoo.com/SIG=12fdrc5uu/M=365837.7000707.7924794.2369893/D=brc
lubs/S=2137111264:HM/Y=BR/EXP=1125934877/A=2950750/R=2/id=noscript/SIG=10tif
t5qr/*http://br.movies.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 . 




[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
var lrec_target=_blank;var lrec_URL=new Array();
lrec_URL[1]=http://br.rd.yahoo.com/SIG=12f55gpkm/M=365837.7000707.7924794.2
369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125936020/A=2950750/R=0/id=flashu
rl/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema
_calendario.swf?clickTAG=javascript:LRECopenWindow(1); var
lrec_altURL=http://br.rd.yahoo.com/SIG=12f55gpkm/M=365837.7000707.7924794.2
369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125936020/A=2950750/R=1/id=altimg
/SIG=10tift5qr/*http://br.movies.yahoo.com/;; var
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_ca
lendario.gif; var lrec_width=300;var lrec_height=250;  




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



[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


 
http://br.rd.yahoo.com/SIG=12f2jvi3a/M=365837.7000707.7924794.2369893/D=brc
lubs/S=2137111264:HM/Y=BR/EXP=1125981723/A=2950750/R=2/id=noscript/SIG=10tif
t5qr/*http://br.movies.yahoo.com/ 

  _  

Links do Yahoo! Grupos


*   Para visitar o site do seu grupo na web, acesse:

Re: RES: [delphi-br] Ferramenta para MSDE

2005-09-06 Por tôpico Gabriel Filho
Você pode usar o OSQL.EXE ele é um programa do tipo DOS e ele é
instalado junto com o MSDE se não me engano e para basta abri-lo em um
terminal de comandos com a seginte sintaxeOSQL -? para obter ajuda
de como utilizá-lo


ele fica geralmente no [C:\Arquivos de programas\Microsoft SQL
Server\80\Tools\Binn], e eu o utilizo para rodar scripts feitos com
Query Analizer, como criar bases inteiras hehe


espero q tenha ajudado

Em 05/09/05, Walter Alves Chagas Junior[EMAIL PROTECTED] escreveu:
 Vou te mandar um fonte aí.
 
 []s
 
 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 Belo Horizonte - MG - Brazil
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 
 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
 nome de Ulisses
 Enviada em: segunda-feira, 5 de setembro de 2005 15:34
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Ferramenta para MSDE
 
 
 Walter, eu pretendo distribuir o script que desenvolvi,  para criar o Banco
 de Dados, incluir usuário e todas as tabelas, porém poder ser que o usuário
 final não tenha o MS SQL Server. Dessa forma, ele não teria como utilizar o
 Query Analyser para rodar o Script.
 
 Quanto a criar um programinha para rodar o Script, quais os componentes
 que você sugere que eu use? Tentei utilizar ADOConnection + ADOQuery, mas
 não deu certo, pois ele informa um erro em todos os comandos GO do script.
 
 
 Grato.
 
 Ulisses
 
 - Original Message -
 From: Walter Alves Chagas Junior [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Monday, September 05, 2005 3:23 PM
 Subject: RES: [delphi-br] Ferramenta para MSDE
 
 
 Aqui no serviço eu uso o query analyser mesmo (Já que o banco oficial da
 empresa é o SQL server) Usamos o MSDE para base local em algums programas.
 
 Caso voce não tenha o SQL Server instalado aí, eu sugiro fazer um
 programinha pra rodar script nele.
 
 []s
 
 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 Belo Horizonte - MG - Brazil
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 
 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
 nome de Ulisses
 Enviada em: segunda-feira, 5 de setembro de 2005 15:00
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Ferramenta para MSDE
 
 
 Boa tarde a todos!
 
 Alguém conhece alguma ferramenta onde eu possa rodar um script para o MSDE,
 sem ser essas que necessitam a instalação do Microsoft .NET Framework?
 
 Grato.
 
 Ulisses
 
 
 --
  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
 
 
 
 
 
 
 
 
 [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] Delphi 2005 - Acesso a WebService

2005-09-06 Por tôpico zote
Bom dia,

tenho um webservice que preciso acessar, porém o mesmo requer senha.
Pra poder importar o WSDL, tirei a senha e depois disso, coloquei novamente.

A minha dúvida é: como faço para passar o usuário / senha pro webservice?
Pois o mesmo estará na internet, mas preciso limitar o acesso.

Valeu,

José Henrique



-- 
 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] Minha nova pagina com componentes para baixar de graca!

2005-09-06 Por tôpico Rafael Jorge
oi , desculpa ai eu mandar esse email pra tres listas de delphi mas
tem gente que vai achar util nas tres listas que eu assino!
bem alguns aqui me conhecem e ate fazem parte da minha lista no msn e
orkut, eu nao to dizendo que eu sou o bom nem nada disso. mas voltando
ao assunto minha nova pagina para divulgar meu sistema comercial esta
no ar! e junto ocm ela disponibilizei meus artigos (incluindo meu
material sobre OOP para leigos no assunto que fiz pra faculdade) e o
melhor disponibilizei alguns compomentes pra download entre eles um
que controla uma Webcam via api do windows, um que controla as
escessoes do sistema e envia fotos e log de erro pra um ftp, entre
outros. vai ser disponibilizado varios outros e artigos sobre OOP
principalmente agora que estou fazendo cursos na Facilit
(www.facilit.com.br).
espero que seja util pra alquem o que estou disponibilizando la!
t+
e novamente desculpem por enviar pra 3 listas!
ops, o site e www.itrecife.com
quase que eu esqueco...
hehe

-- 
Rafael jorge alves
www.itrecife.com - para verem meus artigos e trabalhos
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] Enter para o Próximo Campo não Funciona

2005-09-06 Por tôpico Levi Ribeiro de Freitas
Pessoal,
 
Estou usando um aplicationevents para com o enter passar para o próximo
campo mas não está funcionando.
 
Por quê?
 
Vejam o código e digam o que está errado:
procedure TfrmMenu.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
//Enter para passar para o próximo campo
if (ActiveControl is TDBEdit) or (ActiveControl is TDBComboBox) or
(ActiveControl is TDBLookupComboBox) or (ActiveControl is TCustomEdit) then
 begin
 if Msg.message=WM_KEYDOWN then
 if Msg.wParam=VK_RETURN then
Keybd_event(VK_TAB,0,0,0);
 end;
 
end;
 
Atenciosamente,
 
Levi Ribeiro de Freitas
Programador de Computadores
Tel.: 55 12 3644-2119 / 9724-8804
Email:  mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: [delphi-br] Desligar o WinXP

2005-09-06 Por tôpico Wilson Valdevite
Isaque, utilizo o seguinte case. ele faz a distinção entre WIN9X e W2K / WXP...

  case Win32Platform of
VER_PLATFORM_WIN32_WINDOWS : ExitWindowsEx(EWX_SHUTDOWN, 0);
VER_PLATFORM_WIN32_NT : ExitWindowsEx(EWX_POWEROFF, 0);
  end;


  - Original Message - 
  From: Isaque Lisboa 
  To: Fórum - Delphi 
  Sent: Tuesday, September 06, 2005 4:47 AM
  Subject: [delphi-br] Desligar o WinXP


  Ola pessoal...eu tenho um codigo aki q eh para desligar o pc no horario 
programadobom, soh q ele soh funciona no Win9x...no Win2000 e no WinXP ele 
naum funcionaja peguei codigos da net q dizem q saum pra isso. mas 
compilei e mais uma vez naum deu nadaalguem pode me ajudar ?

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




--


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.344 / Virus Database: 267.10.18/89 - Release Date: 02/09/2005


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

* 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: Plano de Contas

2005-09-06 Por tôpico Wilson Valdevite
Ailton... estou tendo um problema parecido com ele. Minha solução foi a 
seguinte: criei uma tabela com o campo código com máscara de  !9.99.99;1;_  
para  poder aceitar o que eu peciso da forma necessária. Coloquei mais cois 
campos lógicos, um para conta que pode aceitar lancamentos e outro para conta 
que pode ou não ser usada, pois a mesma nmão pode ser excluida se possuir 
lancamentos. E um campo para saldo.

Creio eu que você pode estar trabalhando assim e alterar a máscara do campo 
código para suas necessidades, lembrando que ele é alfanumérico.
  - Original Message - 
  From: Ailton Branco 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, September 05, 2005 10:21 AM
  Subject: Re: [delphi-br] Re: Plano de Contas


  eu estou com o mesmo problemas, se vc achar a solução poderia compartilhar 
comigo. se eu achar primeiro te passo, 


  valeu 
- Original Message - 
From: Charlles Ferdinand 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, September 05, 2005 11:14 AM
Subject: RES: [delphi-br] Re: Plano de Contas


Silveira, estou montando um sistema de caixa e misturando com contabilidade,
mas to apanhando para construir o plano de contas, mas como vc fez eu não
conheço o sistema de trabalho do UDF.

Estava querendo o seguinte, cadastrar numa tabela o formato das contas, o
que chamamos de mascara contábil e conforme esta informação esteja ao
cadastrar a conta ele separar os niveis da conta

Exemplo

Mascara Contábil  Resultado
X.X.XX.XX.1.1.11.11.

X.X.XXX.XXX.XXX1.1.111.111.111

Será que teria disponibilidade para me ajudar?


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de crsilveira
Enviada em: segunda-feira, 5 de setembro de 2005 10:48
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Re: Plano de Contas


Olá, eu montei usando a udf PlnCtaUDF.

--- Em delphi-br@yahoogrupos.com.br, Charlles Ferdinand
[EMAIL PROTECTED] escreveu
 Pessoal, tem alguem que ja montou um sistema de contabilidade ou
parecido,
 para poder trocar umas ideias sobre a contrução de plano de contas.


 Atenciosamente


 Charlles Ferdinand


 [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: 
PUBLICIDADE
  
 


  --
Links do Yahoo! Grupos

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

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

  c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
Serviço do Yahoo!. 



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





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  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!. 




--


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.344 / Virus Database: 267.10.18/89 - Release Date: 02/09/2005


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

* Para sair 

[delphi-br] Re: Qual windows?

2005-09-06 Por tôpico Osmar de Souza Júnior


As informações da versão do Windows você pode pegar na seguinte área
do registro do Windows:

1) Na família NT:
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion

2) Em outros Windows:
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion


Para saber se o Windows é da família NT ou não, basta fazer a seguinte
comparação:

var EhWinNT: boolean;

EhWinNT := Win32Platform = VER_PLATFORM_WIN32_NT;


Não sei se você está familiarizado com o registro do Windows, mas aí é
só procurar no Google como ler do registro do Windows usando o Delphi.

Abraços.

--- Em delphi-br@yahoogrupos.com.br, Rodrigo Victorino
[EMAIL PROTECTED] escreveu
 Bom dia,
 
 alguem sabe como faço em Delphi para saber qual a versão do Windows
da máquina? se
 é 98, 2000, XP etc..
 
 valeu pela ajuda
 
 Rodrigo




-- 
 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] Variante do Internet Explorer

2005-09-06 Por tôpico Israel Alcantara Possoli
É possível associar uma Variant a uma janela do Internet Explorer já aberta?

Eu tenho o Handle, mas queria passar algo assim: VariantIE.Handle := HandledoIE.

Tem como?


-- 
 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] Ambiguous overloaded call to 'ToString'

2005-09-06 Por tôpico rbriguetto
Amados ...

Eu criei uma unit de rotinas pra facilitar minha vida e uma dessas 
rotinas é a função ToString:

  function ToString(Value: Integer): String ; overload;
  function ToString(Value: Real): String; overload;
  function ToString(Value: TDateTime): String; overload;

então teoricamente ela teria que funcionar quando eu passar qualquer 
parâmetro do tipo Integer, Real ou DateTime.
O problema é que em algumas units essa rotina funciona blz e em outras 
dá o erro 

Ambiguous overloaded call to 'ToString'

Se alguém souber me explicar o pq disso ..

Muito obrigado e bom trabalho a todos




-- 
 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] Ambiguous overloaded call to 'ToString'

2005-09-06 Por tôpico Walter Alves Chagas Junior
Já tentou fazer uma só e passando um parametro do tipo variant?

function ToString(Value: Variant): String;

[]s

Walter Alves Chagas Junior
Projeto e desenvolvimento
Telemont Engenharia de telecomunicações
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de rbriguetto
Enviada em: terça-feira, 6 de setembro de 2005 09:38
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Ambiguous overloaded call to 'ToString'


Amados ...

Eu criei uma unit de rotinas pra facilitar minha vida e uma dessas 
rotinas é a função ToString:

  function ToString(Value: Integer): String ; overload;
  function ToString(Value: Real): String; overload;
  function ToString(Value: TDateTime): String; overload;

então teoricamente ela teria que funcionar quando eu passar qualquer 
parâmetro do tipo Integer, Real ou DateTime.
O problema é que em algumas units essa rotina funciona blz e em outras 
dá o erro 

Ambiguous overloaded call to 'ToString'

Se alguém souber me explicar o pq disso ..

Muito obrigado e bom trabalho a todos




-- 
 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] Enter para o Próximo Campo não Fun ciona

2005-09-06 Por tôpico Emerson
cara o codigo esta correto, apenas axo q sua localizacao esta errada, pelo q 
vi, vc esta fazendo isso em um form principal nao eh ? algo como frmmenu ? 
certo, acontece q activecontrol, pertence a instancia de frmmenu, e nele nao a 
os controles certo, vc pode fazer duas coisas ou usa, Screen.ActiveControl, que 
vai pegar o handle do form ativo, ou coloca este codigo no teu proprio form, ou 
um form modelo nao sei.. valeu espero ter ajudado, abraco
  - Original Message - 
  From: Levi Ribeiro de Freitas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 06, 2005 8:51 AM
  Subject: [delphi-br] Enter para o Próximo Campo não Funciona


  Pessoal,

  Estou usando um aplicationevents para com o enter passar para o próximo
  campo mas não está funcionando.

  Por quê?

  Vejam o código e digam o que está errado:
  procedure TfrmMenu.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
  begin
  //Enter para passar para o próximo campo
  if (ActiveControl is TDBEdit) or (ActiveControl is TDBComboBox) or
  (ActiveControl is TDBLookupComboBox) or (ActiveControl is TCustomEdit) then
   begin
   if Msg.message=WM_KEYDOWN then
   if Msg.wParam=VK_RETURN then
  Keybd_event(VK_TAB,0,0,0);
   end;

  end;

  Atenciosamente,

  Levi Ribeiro de Freitas
  Programador de Computadores
  Tel.: 55 12 3644-2119 / 9724-8804
  Email:  mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]


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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



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




--


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.344 / Virus Database: 267.10.18/90 - Release Date: 5/9/2005


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

* 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] Qual comando SQL utilizarei para verificar apenas o mes de um campo data???

2005-09-06 Por tôpico Emerson
se teu banco for interbase ou firebird
select * from clientes where extract(month from nascimento) = 7
  - Original Message - 
  From: sandro cunha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 06, 2005 8:16 AM
  Subject: Re: Res: [delphi-br] Qual comando SQL utilizarei para verificar 
apenas o mes de um campo data???


  Preciso montar uma query que selecione em um Tabela todos os registros, 
desta, cujo campo data seja igual a JULHO por exemplo.
  Como ficaria o comando SQL?

  Sandro.

  Francisco Andrade [EMAIL PROTECTED] escreveu:
  para obter o mes de uma data use month(campodata) ele vai retornar a uma
  string 

  ---Mensagem original--- 

  De: sandro cunha 
  Data: 09/05/05 14:17:56 
  Para: Grupo Delphi 
  Assunto: [delphi-br] Qual comando SQL utilizarei para verificar apenas o mes
  de um campo data??? 

  Tenho que verificar o mes em um campo data de uma tabala (paradox) e
  compara-lo com o que o usuário esclheu. 

  Comparar datas é rotineiro para mim porém, verificar somente o mês dentro de
  uma data eu nunca fiz antes. 

  Um grande abraço a todos 
  Sandro 


  - 
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA.
  Participe! 

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



  Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE
  var lrec_target=_blank;var lrec_URL=new 
Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12f24no1s/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125966525/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var
 
lrec_altURL=http://br.rd.yahoo.com/SIG=12f24no1s/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125966525/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var
 lrec_width=300;var lrec_height=250;

  -
  Links do Yahoo! Grupos

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

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

 O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 


  
  -
  Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe!

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




--


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.344 / Virus Database: 267.10.18/90 - Release Date: 5/9/2005


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

* 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] Enter para o Próximo Campo não Funciona

2005-09-06 Por tôpico Rodrigo Feraboli


O keypreview do form está em True?

se está em false, não funcionará.

T+

Rodrigo


--- Levi Ribeiro de Freitas [EMAIL PROTECTED]
escreveu:


-
Pessoal,
 
Estou usando um aplicationevents para com o enter
passar para o próximo
campo mas não está funcionando.
 
Por quê?
 
Vejam o código e digam o que está errado:
procedure TfrmMenu.ApplicationEvents1Message(var Msg:
tagMSG;
  var Handled: Boolean);
begin
//Enter para passar para o próximo campo
if (ActiveControl is TDBEdit) or (ActiveControl is
TDBComboBox) or
(ActiveControl is TDBLookupComboBox) or (ActiveControl
is TCustomEdit) then
 begin
 if Msg.message=WM_KEYDOWN then
 if Msg.wParam=VK_RETURN then
Keybd_event(VK_TAB,0,0,0);
 end;
 
end;
 
Atenciosamente,
 
Levi Ribeiro de Freitas
Programador de Computadores
Tel.: 55 12 3644-2119 / 9724-8804
Email:  mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou
[EMAIL PROTECTED]


  
  Yahoo! Grupos, um serviço oferecido
por:PUBLICIDADE
var lrec_target=_blank;var lrec_URL=new
Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fdgrd7t/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126014320/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var
lrec_altURL=http://br.rd.yahoo.com/SIG=12fdgrd7t/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126014320/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var
lrec_width=300;var lrec_height=250;   
  
  
-
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!.



\.\.~.~././
(@.@)
  ==oOOo=(_)=oOOo==|
  ||
  |   Rodrigo Feraboli |
  |   Bento Gonçalves/RS   |
  ||
  =Oooo|
  ooo0 ()
 (  )  )   /
  \(  (__ /
   \ __)---

__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 


-- 
 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] Qual windows?

2005-09-06 Por tôpico Emerson
Function TNMInfo.GetWindowsVersion: String;
Var
  VerInfo: TOsversionInfo;
  PlatformId, VersionNumber: String;
  Reg: TRegistry;
Begin
  VerInfo.dwOSVersionInfoSize := SizeOf(VerInfo);
  GetVersionEx(VerInfo);
  Reg := TRegistry.Create;
  Reg.RootKey := HKEY_LOCAL_MACHINE;
  Case VerInfo.dwPlatformId Of
VER_PLATFORM_WIN32s:
  Begin
PlatformId := 'Windows 3.1';
  End;
VER_PLATFORM_WIN32_WINDOWS:
  Begin
Reg.OpenKey('\SOFTWARE\Microsoft\Windows\CurrentVersion', False);
PlatformId := Reg.ReadString('ProductName');
VersionNumber := Reg.ReadString('VersionNumber');
  End;
VER_PLATFORM_WIN32_NT:
  Begin
Reg.OpenKey('\SOFTWARE\Microsoft\Windows NT\CurrentVersion', False);
PlatformId := Reg.ReadString('ProductName');
VersionNumber := Reg.ReadString('CurrentVersion');
  End;
  End;
  Reg.Free;
  Result := Format('%s (Versão: %s)', [PlatformId, VersionNumber]);
End;

  - Original Message - 
  From: Rodrigo Victorino 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, September 05, 2005 8:48 AM
  Subject: [delphi-br] Qual windows?


  Bom dia,

  alguem sabe como faço em Delphi para saber qual a versão do Windows da 
máquina? se
  é 98, 2000, XP etc..

  valeu pela ajuda

  Rodrigo






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




--


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.344 / Virus Database: 267.10.18/90 - Release Date: 5/9/2005


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] Componente de gride (organizar em árvore)

2005-09-06 Por tôpico Osmar de Souza Júnior

Pessoal.

Estou precisando de um gride que faça agrupamento dos dados (eu vi
isso no Microsoft Money). Os registros ficam agrupados, e tem um botão
do lado esquerdo (onde fica o Indicator num DBGrid), um botão de +
para expandir ou recolher os registros (filhos), isso em vários níveis.

Para não perder tempo, queria saber se alguém sabe de um componente
pronto, caso contrário irei desenvolver um.

Obrigado.





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
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] Codigo de Barras

2005-09-06 Por tôpico stainle2003
Estou precisando imprimir códigos de Barras numa impressora Epson usando
o Delphi 5, será que é possível; como ?


Stainle





-- 
 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: Componente de gride (organizar em árvore)

2005-09-06 Por tôpico valmsrj
Olá amigo,
  Vc pode usar os componentes Decision Cube. Eles tem esse objetivo.
São pouco usados, mas muito uteis!

[]'s
Valmir Santana

--- Em delphi-br@yahoogrupos.com.br, Osmar de Souza Júnior
[EMAIL PROTECTED] escreveu
 
 Pessoal.
 
 Estou precisando de um gride que faça agrupamento dos dados (eu
vi
 isso no Microsoft Money). Os registros ficam agrupados, e tem um
botão
 do lado esquerdo (onde fica o Indicator num DBGrid), um botão de
+
 para expandir ou recolher os registros (filhos), isso em vários
níveis.
 
 Para não perder tempo, queria saber se alguém sabe de um
componente
 pronto, caso contrário irei desenvolver um.
 
 Obrigado.




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
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] Pegar nome da tabela pelo TField

2005-09-06 Por tôpico Luis Lopes
Bom dia pessoal!

Alguém sabe uma forma de pegar o nome da tabela, num
select simples, pelo TField?

Grato,

Luis Alberto








___ 
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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] Codigo de Barras

2005-09-06 Por tôpico Andrei Luís
Se for jato de tinta a qualidade fica aceitável, se for matricial fica
a beira do ilegível para o leitor.

Você pode imprimir de duas formas: baixando uma fonte True Type do
tipo de código que você quer usar: 2 de 5, EAN13, etc... Ou usar um
componente para isso: ex.: DuckBarCode.

[]
Andrei

Em 06/09/05, stainle2003[EMAIL PROTECTED] escreveu:
 Estou precisando imprimir códigos de Barras numa impressora Epson usando
 o Delphi 5, será que é possível; como ?
 
 
 Stainle


-- 
 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: Componente de gride (organizar em árvore)

2005-09-06 Por tôpico Daniel Pohren
Existem também um ótimo componente da Developer Express, o Quantum Grid. Com 
ele vc faz chover pra cima. É um pouco caro, mas é excelente.

On 9/6/05, valmsrj [EMAIL PROTECTED] wrote: 
 
 Olá amigo,
 Vc pode usar os componentes Decision Cube. Eles tem esse objetivo.
 São pouco usados, mas muito uteis!
 
 []'s
 Valmir Santana
 
 --- Em delphi-br@yahoogrupos.com.br, Osmar de Souza Júnior
 [EMAIL PROTECTED] escreveu
 
  Pessoal.
 
  Estou precisando de um gride que faça agrupamento dos dados (eu
 vi
  isso no Microsoft Money). Os registros ficam agrupados, e tem um
 botão
  do lado esquerdo (onde fica o Indicator num DBGrid), um botão de
 +
  para expandir ou recolher os registros (filhos), isso em vários
 níveis.
 
  Para não perder tempo, queria saber se alguém sabe de um
 componente
  pronto, caso contrário irei desenvolver um.
 
  Obrigado.
 
 
 
 
 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages
 
 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
 Links do Yahoo! Grupos
 
 
 
 
 
 
 
 
 


-- 
Daniel Pohren
Naphta Informática


[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] Codigo de Barras

2005-09-06 Por tôpico thiago castro
Imprimir dá sim, você tem que especificar qual código quer utilizar.
Existem vários tipos de código de barras, cada um com seu algoritimo e tamanho. 
Os mais comuns - usados no comercio - são o EAN8 e o EAN13, que como o próprio 
nome já insinua têm 8 e 13 bytes cada um, eu utilizo o 2 de 5 intercalado, 
Existem vários componentes para a impressão, eu por exemplo imprimo em uma hp 
3550 e em uma lexmark z25, plastifico e o código passa blzinha... qualquer 
dúvida me manda em pvt... t+

stainle2003 [EMAIL PROTECTED] escreveu:
Estou precisando imprimir códigos de Barras numa impressora Epson usando
o Delphi 5, será que é possível; como ?


Stainle





-- 
 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
var lrec_target=_blank;var lrec_URL=new 
Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12f9j95sn/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126020083/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var
 
lrec_altURL=http://br.rd.yahoo.com/SIG=12f9j95sn/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126020083/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var
 lrec_width=300;var lrec_height=250;

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



Thiago de Castro X. da Silveira

Pré-Vestibular Pitágoras 
Unidades Centro, Savassi e Belvedere.
Setor TI
telefone: +55 (31) 3274-1088 
e-mails:
[EMAIL PROTECTED]
[EMAIL PROTECTED]


__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

[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] Controle de transações no interbase/firebird

2005-09-06 Por tôpico Daniel Bastos
Fala pessoALL.
 tenho a seguinte duvida.
 Queria saber se existe uma maneira de saber se, em uma transação, existe 
dados a serem gravados no banco ou se esta só foi usada para recuperar 
dados.
 Usando firebird 1.5 e componentes da paleta interbase


[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: Delphi 2005 - Acesso a WebService

2005-09-06 Por tôpico Josir
Olá José Henrique,

Ele está pedindo senha para acessar o WSDL se vc busca através do browser ?

Eu já estudo WS a mais de 1 ano e nunca vi isso!
Essa é novidade! Você teria um link para eu ver como fica ?
Pode mandar em PVT.

Saudações,
Josir.

-
tenho um webservice que preciso acessar, porém o mesmo requer senha.
Pra poder importar o WSDL, tirei a senha e depois disso, coloquei novamente.
A minha dúvida é: como faço para passar o usuário / senha pro webservice?
Pois o mesmo estará na internet, mas preciso limitar o acesso.



-- 
 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] Enter para o Próximo Campo não Fu nciona

2005-09-06 Por tôpico Filipe Xavier Ramalho
Troque a linha Keybd_event... por Perform(WM_NEXTDLGCTL, 0,0)

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Levi Ribeiro de Freitas
  Enviada em: terça-feira, 6 de setembro de 2005 08:52
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Enter para o Próximo Campo não Funciona


  Pessoal,

  Estou usando um aplicationevents para com o enter passar para o próximo
  campo mas não está funcionando.

  Por quê?

  Vejam o código e digam o que está errado:
  procedure TfrmMenu.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
  begin
  //Enter para passar para o próximo campo
  if (ActiveControl is TDBEdit) or (ActiveControl is TDBComboBox) or
  (ActiveControl is TDBLookupComboBox) or (ActiveControl is TCustomEdit)
then
   begin
   if Msg.message=WM_KEYDOWN then
   if Msg.wParam=VK_RETURN then
  Keybd_event(VK_TAB,0,0,0);
   end;

  end;

  Atenciosamente,

  Levi Ribeiro de Freitas
  Programador de Computadores
  Tel.: 55 12 3644-2119 / 9724-8804
  Email:  mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]


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



  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



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

 




[delphi-br] InstallShield For Delphi 4/5

2005-09-06 Por tôpico Rogério
Estou tentando instalar o InstallShield que vem no CD do Delphi 5.0
Enterprise.
Mas não consigo, pois dá a mensagem:

Winexec failed: return=193

Alguém sabe porque ??

Na Minha Máquina tem:
- Windows 2000, Delphi 5.0 e Delphi 2005.

Me disseram que tem o Inno Setup, mas alguém sabe como ou se tem como
instalar o BDE com os AliasNames/Diretórios via o Inno Setup ??
[ ]'s







___ 
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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: Plano de Contas

2005-09-06 Por tôpico crsilveira
No arquivo PlnCtaUDF.txt que vem com a udf, vc encontra o material
necessário para usa-la. como :

PlnCtaFormat

  Sintaxe: PlnCtaFormat(conta, formato: string): string;

  Retorna o código da conta formatado conforme o formato especificado.

  Exemplos:

  PlnCtaFormat('2.3', '9.99') retorna '2.03'
  PlnCtaFormat('2.3.55', '99.999.999') retorna '02.003.055'
--
PlnCtaMain

  Sintaxe: PlnCtaMain(conta: string): string;

  Retorna a conta mãe da conta informada.

  Exemplos:

  PlnCtaMain('02.003') retorna '02'
  PlnCtaMain('02') retorna '' (string nula)
  PlnCtaMain('2.3.55') retorna '2.3'
--
PlnCtaRoot

  Sintaxe: PlnCtaRoot(conta: string): string;

  Retorna a conta raiz da conta informada.

  Exemplos:

  PlnCtaRoot('02.003') retorna '02'
  PlnCtaRoot('02') retorna '' (string nula)
  PlnCtaRoot('2.3.55') retorna '2'
  PlnCtaRoot('02.003.0005') retorna '02'


--- Em delphi-br@yahoogrupos.com.br, Ailton Branco
[EMAIL PROTECTED] escreveu
 esta onde posso arranjar exemplo desta udf... ???
 
 
   - Original Message - 
   From: crsilveira 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Monday, September 05, 2005 10:47 AM
   Subject: [delphi-br] Re: Plano de Contas
 
 
   Olá, eu montei usando a udf PlnCtaUDF.
 
   --- Em delphi-br@yahoogrupos.com.br, Charlles Ferdinand
   [EMAIL PROTECTED] escreveu
Pessoal, tem alguem que ja montou um sistema de contabilidade ou
   parecido,
para poder trocar umas ideias sobre a contrução de plano de contas.


Atenciosamente


Charlles Ferdinand


[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!. 
 
 
 
 [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] Minha nova pagina com componentes para baixar de graca!

2005-09-06 Por tôpico Rubem Nascimento da Rocha
Sua iniciativa é muito boa. Se me permite uma sugestão, além de rever o 
design do site, sugiro que você faça a correção ortográfica dos textos que 
você publicou. Do jeito que está, parece que a pessoa que escreveu os textos 
colocou o que vinha à cabeça e nem se quer se preocupou com pontuação e 
ortografia correta das palavras.

[]s


From: Rafael Jorge [EMAIL PROTECTED]
Reply-To: delphi-br@yahoogrupos.com.br
To: lista-delphi [EMAIL PROTECTED], lista de delphi 
[EMAIL PROTECTED], delphi-br delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Minha nova pagina com componentes para baixar de 
graca!
Date: Tue, 6 Sep 2005 08:38:36 -0300

oi , desculpa ai eu mandar esse email pra tres listas de delphi mas
tem gente que vai achar util nas tres listas que eu assino!
bem alguns aqui me conhecem e ate fazem parte da minha lista no msn e
orkut, eu nao to dizendo que eu sou o bom nem nada disso. mas voltando
ao assunto minha nova pagina para divulgar meu sistema comercial esta
no ar! e junto ocm ela disponibilizei meus artigos (incluindo meu
material sobre OOP para leigos no assunto que fiz pra faculdade) e o
melhor disponibilizei alguns compomentes pra download entre eles um
que controla uma Webcam via api do windows, um que controla as
escessoes do sistema e envia fotos e log de erro pra um ftp, entre
outros. vai ser disponibilizado varios outros e artigos sobre OOP
principalmente agora que estou fazendo cursos na Facilit
(www.facilit.com.br).
espero que seja util pra alquem o que estou disponibilizando la!
t+
e novamente desculpem por enviar pra 3 listas!
ops, o site e www.itrecife.com
quase que eu esqueco...
hehe

--
Rafael jorge alves
www.itrecife.com - para verem meus artigos e trabalhos
t+

_
MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.com.br



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: [delphi-br] InstallShield For Delphi 4/5

2005-09-06 Por tôpico Oséias Ferreira
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1


Rogério escreveu:
 Estou tentando instalar o InstallShield que vem no CD do Delphi 5.0
 Enterprise.
 Mas não consigo, pois dá a mensagem:
 
 Winexec failed: return=193
 
 Alguém sabe porque ??
 
 Na Minha Máquina tem:
 - Windows 2000, Delphi 5.0 e Delphi 2005.
 
 Me disseram que tem o Inno Setup, mas alguém sabe como ou se tem como
 instalar o BDE com os AliasNames/Diretórios via o Inno Setup ??

Tem como você fazer tudo o que installShield que vem com este seu
delphi, e MUITO mais.
Só dar uma lida no FAQ deles você instala o BDE cria alias, etc.

Larga a mão deste InstallShield, se quizer evitar dores de cabeça.

Baixa também o ISTool, para facilitar sua vida.
Você pode inclusive, importar scripts InstallShield...

Falou.

- --
Oséias Ferreira.

oseiasferreira (at) yahoo.com.br
Linux counter #333243
GPG/PGP: 0x60084245
fingerprint: B1A2 81EF 0560 66D3 8B22 1BC0 1CA6 0374 6008 4245
-BEGIN PGP SIGNATURE-
Version: GnuPG v1.4.1 (MingW32)

iD8DBQFDHcOUHKYDdGAIQkURAs7DAKDRMVMWRg/3SmkjqRGPQrBHuPsQUgCeImS8
oGSp+/q5zAJKaOu2yWWiJu0=
=RER2
-END PGP SIGNATURE-





___ 
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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] Desligar o WinXP

2005-09-06 Por tôpico Emerson Moreno
Esse código acima é pra desligar e para forçar o reinicio da maquina, como faço?

Em 06/09/05, Wilson Valdevite[EMAIL PROTECTED] escreveu:
 Isaque, utilizo o seguinte case. ele faz a distinção entre WIN9X e W2K /
 WXP...
 
   case Win32Platform of
 VER_PLATFORM_WIN32_WINDOWS : ExitWindowsEx(EWX_SHUTDOWN, 0);
 VER_PLATFORM_WIN32_NT : ExitWindowsEx(EWX_POWEROFF, 0);
   end;
 
 
   - Original Message - 
   From: Isaque Lisboa 
   To: Fórum - Delphi 
   Sent: Tuesday, September 06, 2005 4:47 AM
   Subject: [delphi-br] Desligar o WinXP
 
 
   Ola pessoal...eu tenho um codigo aki q eh para desligar o pc no horario
 programadobom, soh q ele soh funciona no Win9x...no Win2000 e no WinXP
 ele naum funcionaja peguei codigos da net q dizem q saum pra isso. mas
 compilei e mais uma vez naum deu nadaalguem pode me ajudar ?
 
   [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!. 
 
 
 
 
 --
 
 
   No virus found in this incoming message.
   Checked by AVG Anti-Virus.
   Version: 7.0.344 / Virus Database: 267.10.18/89 - Release Date: 02/09/2005
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages
 
 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou
 [EMAIL PROTECTED]
 
 
 
 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!. 


-- 
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


-- 
 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: Pegar nome da tabela pelo TField

2005-09-06 Por tôpico Edmilson Macedo
Use uma função GetTableNameFromSQL do próprio Delphi que está na 
unit DBCommon



--- Em delphi-br@yahoogrupos.com.br, Luis Lopes 
[EMAIL PROTECTED] escreveu
 Bom dia pessoal!
 
 Alguém sabe uma forma de pegar o nome da tabela, num
 select simples, pelo TField?
 
 Grato,
 
 Luis Alberto
 
 
   
 
 
 
   
   
 ___ 
 Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA 
CONVERSA. Participe! www.yahoo.com.br/messenger/promocao




-- 
 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] Mostrar R$ sem criar TField ou usar FormatCurr

2005-09-06 Por tôpico Oswaldo Ricardo da Rocha Jr
Pessoal, preciso que todos os meus controles (dbEdits, dbGrids, etc) mostrem os 
valores dos campos currency (valores monetários) com o R$ na frente, mas não 
quero criar nenhum TCurrencyField (não sou adepto de criar TFields em tempo de 
projeto, pois dificulta em muito qualquer manutenção nos fontes), tambem não 
quero saber de funções de formatação (sei que vai ter alguem respondendo usa o 
FormatCurr). O que quero sei que é possivel, mas não estou conseguindo 
encontrar, já faz 2 dias que estou pesquisando, mas não encontro.
 
Já tentei isto:
 
(qryMatricula.Fields.FieldbyName('Valor_Mensalidade') as 
TCurrencyField).currency := true;
 
O que os digníssimos colegas de lista sugerem?
 
 



  ___   _  _  _  
 / _ \ | || || | 
| | | | ___ __  _  __ __ _ | |  __| |  ___   | |_ __ 
| | | |/ __|\ \/ \/ // _` || | / _  | / _ \  _   | | '__|
| |_| |\__ \ \  _  /| (_| || || (_| || (_) || |__| | |   
 \___/ |___/  \/ \/  \__,_||_| \__._| \___/ \_/|_|   
   Oswaldo Ricardo da Rocha Jr   
E-Mail: [EMAIL PROTECTED], [EMAIL PROTECTED] 
[EMAIL PROTECTED],[EMAIL PROTECTED] 
HP Pessoal: http://br.geocities.com/oswjr
HP Empresa: http://www.astharinformatica.com.br  
Messenger   [EMAIL PROTECTED]  
ICQ:66755778 

-
 Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe!

[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: Mostrar R$ sem criar TField ou usar FormatCurr

2005-09-06 Por tôpico Edmilson Macedo
Pq você não usa as propriedades Displayformat e EditFormat dos 
TField´s?



--- Em delphi-br@yahoogrupos.com.br, Oswaldo Ricardo da Rocha Jr 
[EMAIL PROTECTED] escreveu
 Pessoal, preciso que todos os meus controles (dbEdits, dbGrids, 
etc) mostrem os valores dos campos currency (valores monetários) com 
o R$ na frente, mas não quero criar nenhum TCurrencyField (não sou 
adepto de criar TFields em tempo de projeto, pois dificulta em muito 
qualquer manutenção nos fontes), tambem não quero saber de funções 
de formatação (sei que vai ter alguem respondendo usa o 
FormatCurr). O que quero sei que é possivel, mas não estou 
conseguindo encontrar, já faz 2 dias que estou pesquisando, mas não 
encontro.
  
 Já tentei isto:
  
 (qryMatricula.Fields.FieldbyName('Valor_Mensalidade') as 
TCurrencyField).currency := true;
  
 O que os digníssimos colegas de lista sugerem?
  
  
 
 
 
   ___   _  _  _  
  / _ \ | || || | 
 | | | | ___ __  _  __ __ _ | |  __| |  ___   | |_ __ 
 | | | |/ __|\ \/ \/ // _` || | / _  | / _ \  _   | | '__|
 | |_| |\__ \ \  _  /| (_| || || (_| || (_) || |__| | |   
  \___/ |___/  \/ \/  \__,_||_| \__._| \___/ \_/|_|   
Oswaldo Ricardo da Rocha Jr   
 E-Mail: [EMAIL PROTECTED], [EMAIL PROTECTED] 
 [EMAIL PROTECTED],[EMAIL PROTECTED] 
 HP Pessoal: http://br.geocities.com/oswjr
 HP Empresa: http://www.astharinformatica.com.br  
 Messenger   [EMAIL PROTECTED]  
 ICQ:66755778 
   
 -
  Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA 
CONVERSA. Participe!
 
 [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] Desligar o WinXP

2005-09-06 Por tôpico Rildecy de Queiroz Borba
amigo e melhor vc fazer uma chamada direta ao comando shutdown , e mande 
fechar o programa apos o comando, facilita o desligamento.
va no prompt de comando e digite shutdown que ele mostra as opcoes eu 
geralmente uso
shutdown  -l -s -t10


Emerson Moreno escreveu:

Esse código acima é pra desligar e para forçar o reinicio da maquina, como 
faço?

Em 06/09/05, Wilson Valdevite[EMAIL PROTECTED] escreveu:
  

Isaque, utilizo o seguinte case. ele faz a distinção entre WIN9X e W2K /
WXP...

  case Win32Platform of
VER_PLATFORM_WIN32_WINDOWS : ExitWindowsEx(EWX_SHUTDOWN, 0);
VER_PLATFORM_WIN32_NT : ExitWindowsEx(EWX_POWEROFF, 0);
  end;


  - Original Message - 
  From: Isaque Lisboa 
  To: Fórum - Delphi 
  Sent: Tuesday, September 06, 2005 4:47 AM
  Subject: [delphi-br] Desligar o WinXP


  Ola pessoal...eu tenho um codigo aki q eh para desligar o pc no horario
programadobom, soh q ele soh funciona no Win9x...no Win2000 e no WinXP
ele naum funcionaja peguei codigos da net q dizem q saum pra isso. mas
compilei e mais uma vez naum deu nadaalguem pode me ajudar ?

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




--


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.344 / Virus Database: 267.10.18/89 - Release Date: 02/09/2005


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou
[EMAIL PROTECTED]



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




  


-- 

Rildecy de Queiroz Borba
Desenvolvimento e Projetos
NetCompany Informática Ltda.
Paulista - PE - Brasil
e-mail: [EMAIL PROTECTED]
Skype: [EMAIL PROTECTED]
MSN: [EMAIL PROTECTED]
Fone: 0xx81 3435.0013




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

2005-09-06 Por tôpico ArbSis
Pessoal como posso fazer para ajustar automaticamente o tamanho das 
colunas de um StringGrid conforme a quantidade de texto que cada celula 
possuir...





___ 
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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] Desligar o WinXP

2005-09-06 Por tôpico Wilson Valdevite
negativo. eu utilizo ele para forçar a máquina a desligar
para reiniciar é outro comando
  - Original Message - 
  From: Emerson Moreno 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 06, 2005 1:46 PM
  Subject: Re: [delphi-br] Desligar o WinXP


  Esse código acima é pra desligar e para forçar o reinicio da maquina, como 
faço?

  Em 06/09/05, Wilson Valdevite[EMAIL PROTECTED] escreveu:
   Isaque, utilizo o seguinte case. ele faz a distinção entre WIN9X e W2K /
   WXP...
   
 case Win32Platform of
   VER_PLATFORM_WIN32_WINDOWS : ExitWindowsEx(EWX_SHUTDOWN, 0);
   VER_PLATFORM_WIN32_NT : ExitWindowsEx(EWX_POWEROFF, 0);
 end;
   
   
 - Original Message - 
 From: Isaque Lisboa 
 To: Fórum - Delphi 
 Sent: Tuesday, September 06, 2005 4:47 AM
 Subject: [delphi-br] Desligar o WinXP
   
   
 Ola pessoal...eu tenho um codigo aki q eh para desligar o pc no horario
   programadobom, soh q ele soh funciona no Win9x...no Win2000 e no WinXP
   ele naum funcionaja peguei codigos da net q dizem q saum pra isso. mas
   compilei e mais uma vez naum deu nadaalguem pode me ajudar ?
   
 [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!. 
   
   
   
   
   
--
   
   
 No virus found in this incoming message.
 Checked by AVG Anti-Virus.
 Version: 7.0.344 / Virus Database: 267.10.18/89 - Release Date: 02/09/2005
   
   
   [As partes desta mensagem que não continham texto foram removidas]
   
   
   
   -- 
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
   
   Para ver as mensagens antigas, acesse:
   http://br.groups.yahoo.com/group/delphi-br/messages
   
   Para falar com o moderador, envie um e-mail para:
   [EMAIL PROTECTED] ou
   [EMAIL PROTECTED]
   
   
   
   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!. 


  -- 
  []'s

  Emerson Moreno
  O grande sábio aprende por ensinar!


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




--


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.344 / Virus Database: 267.10.18/90 - Release Date: 05/09/2005


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

* 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] Portas COM-LPT-USB...

2005-09-06 Por tôpico sa_souza
AMIGOS: Excluindo o TComPort e o Varian Async32, alguem conhece algum 
outro componente D7 para Manipular as Portas COM-LPT-USB...
principalmente USBs... to precisando acessar alguns perifericos em USB 
pra conversar com eles na minha aplicação...
Obrigado qq info...


Sergio
[EMAIL PROTECTED]
msn [EMAIL PROTECTED]





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Excluir linhas em branco

2005-09-06 Por tôpico Patricia Santana

Boa tarde a todos!!!

Preciso retirar linhas em branco de um texto que está dentro de um componente 
memo do Delphi. Como faço isso?

Desde de já agradeço a atenção de todos!

 

Patricia Santana

 

 

 

 


-
 Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe!

[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: Excluir linhas em branco

2005-09-06 Por tôpico Osmar de Souza Júnior

Se for linhas em branco no começo ou no fim do texto:

Memo1.Lines.Text := Trim(Memo1.Lines.Text);

Se for linhas em branco no meio do texto:

var i: integer;
begin
  i := 0;

  while (i  Memo1.Lines.Count) do
  begin
if (Memo1.Lines[i] = '') then
  Memo1.Lines.Delete(i)
else 
  i := i + 1;
  end;
end;

--- Em delphi-br@yahoogrupos.com.br, Patricia Santana [EMAIL PROTECTED]
escreveu
 
 Boa tarde a todos!!!
 
 Preciso retirar linhas em branco de um texto que está dentro de um
componente memo do Delphi. Como faço isso?
 
 Desde de já agradeço a atenção de todos!
 
  
 
 Patricia Santana
 
  
 
  
 
  
 
  
 
   
 -
  Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA
CONVERSA. Participe!
 
 [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] Qual windows?

2005-09-06 Por tôpico Lenilson Medeiros
Tente esse função ai garoto !
 
function TForm1.VersaoSO: String;
var So : TOSVersionInfo;
begin
   Result := '';
   So.dwOSVersionInfoSize := SizeOf(TOSVersionInfo);
   if GetVersionEx(So) then begin
  Result:=(So.dwMajorVersion+So.dwMinorVersion);
  case Result  of
 5 : Result :='window's 2000';
 6 : Result :='window's XP';
14 : Result :='window's 98';
94 : Result :='window's Millenium';
  end;
  End;
end;

Vlw's
 
Lenilson

Rodrigo Victorino [EMAIL PROTECTED] escreveu:
Bom dia,

alguem sabe como faço em Delphi para saber qual a versão do Windows da máquina? 
se
é 98, 2000, XP etc..

valeu pela ajuda

Rodrigo






-- 
 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
var lrec_target=_blank;var lrec_URL=new 
Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fphv261/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125981652/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var
 
lrec_altURL=http://br.rd.yahoo.com/SIG=12fphv261/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125981652/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var
 lrec_width=300;var lrec_height=250;

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


__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

[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] Qual windows? Corrigido

2005-09-06 Por tôpico Lenilson Medeiros
function TForm1.VersaoSO: String;
var So : TOSVersionInfo;
 rst : Integer;
begin
   Result := '';
   So.dwOSVersionInfoSize := SizeOf(TOSVersionInfo);
   if GetVersionEx(So) then begin
  rst:=(So.dwMajorVersion+So.dwMinorVersion);
  case rst  of
 5 : Result := 'window's 2000';
 6 : Result := 'window's XP';
14 : Result := 'window's 98';
94 : Result := 'window's Millenium';
  end;
  End;
end;

Flw's
Rodrigo Victorino [EMAIL PROTECTED] escreveu:
Bom dia,

alguem sabe como faço em Delphi para saber qual a versão do Windows da máquina? 
se
é 98, 2000, XP etc..

valeu pela ajuda

Rodrigo






-- 
 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
var lrec_target=_blank;var lrec_URL=new 
Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fphv261/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125981652/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var
 
lrec_altURL=http://br.rd.yahoo.com/SIG=12fphv261/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1125981652/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var
 lrec_width=300;var lrec_height=250;

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


__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

[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: Excluir linhas em branco

2005-09-06 Por tôpico Patricia Santana
Osmar, muito obrigada pela dica Funcionou
 
Atenciosamente,
Patricia Santana

Osmar de Souza Júnior [EMAIL PROTECTED] escreveu:

Se for linhas em branco no começo ou no fim do texto:

Memo1.Lines.Text := Trim(Memo1.Lines.Text);

Se for linhas em branco no meio do texto:

var i: integer;
begin
i := 0;

while (i  Memo1.Lines.Count) do
begin
if (Memo1.Lines[i] = '') then
Memo1.Lines.Delete(i)
else 
i := i + 1;
end; 
end;

--- Em delphi-br@yahoogrupos.com.br, Patricia Santana 

escreveu
 
 Boa tarde a todos!!!
 
 Preciso retirar linhas em branco de um texto que está dentro de um
componente memo do Delphi. Como faço isso?
 
 Desde de já agradeço a atenção de todos!
 
 
 
 Patricia Santana
 
 
 
 
 
 
 
 
 
 
 -
 Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA
CONVERSA. Participe!
 
 [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








__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

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

2005-09-06 Por tôpico ArbSis
Pessoal respondendo a minha propria pergunta no site 
http://www.delphi3000.com/ eu achei um exemplo que era o que eu 
porecisava... fiz uma modificacao nele e funciona beleza

procedure SetOptimalGridCellWidth(sg: Tstringgrid;
  colunas:array of integer);
var
  c : Integer;
  i : Integer;
  j : Integer;
  max_width : Integer;
begin
  with sg do
begin
// If the grid's Paint method hasn't been called yet,
// the grid's canvas won't use the right font for TextWidth.
// (TCustomGrid.Paint normally sets this, under DrawCells.)
Canvas.Font.Assign(Font);

for c := 0 to length(colunas)-1 do
  begin
i:= colunas[c];
max_width := 0;

// Search for the maximal Text width of the current column.

for j := 0 to (RowCount - 1) do
  max_width := Math.Max(max_width,Canvas.TextWidth(Cells[i,j]));

// The hardcode of 4 is based on twice the offset from the left
// margin in Tstringgrid.DrawCell.  GridLineWidth is not relevant.

if max_width  0 then
  ColWidths[i] := max_width + 4
else
  ColWidths[i] := DefaultColWidth;

  end; { for }
   end;
end;


ArbSis escreveu:

 Pessoal como posso fazer para ajustar automaticamente o tamanho das
 colunas de um StringGrid conforme a quantidade de texto que cada celula
 possuir...

  

  

 ___
 Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA 
 CONVERSA. Participe! www.yahoo.com.br/messenger/promocao


 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]



 *Yahoo! Grupos, um serviço oferecido por:*
 PUBLICIDADE


 
 *Links do Yahoo! Grupos*

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

 * Para sair deste grupo, envie um e-mail para:
   [EMAIL PROTECTED]
   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.







___ 
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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] Uma aplicação servidora funciona no windows xp?

2005-09-06 Por tôpico Daniel Bastos
Uma aplicação servidora c/ COM+ funciona no windows xp?

A mesma funciona no 2000.

Se caso não seja possível funcionar, tem uma outra forma?


[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] Ambiguous overloaded call to 'ToString'

2005-09-06 Por tôpico Erick Sasse
Estas funções fazem parte de uma classe?
Acredito que não seja possível usar overload fora de uma classe.

--
Erick Sasse
www.ericksasse.com.br
 
 

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br 
 [mailto:[EMAIL PROTECTED] Em nome de rbriguetto
 Enviada em: terça-feira, 6 de setembro de 2005 09:38
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Ambiguous overloaded call to 'ToString'
 
 Amados ...
 
 Eu criei uma unit de rotinas pra facilitar minha vida e uma 
 dessas rotinas é a função ToString:
 
   function ToString(Value: Integer): String ; overload;
   function ToString(Value: Real): String; overload;
   function ToString(Value: TDateTime): String; overload;
 
 então teoricamente ela teria que funcionar quando eu passar 
 qualquer parâmetro do tipo Integer, Real ou DateTime.
 O problema é que em algumas units essa rotina funciona blz e 
 em outras dá o erro 
 
 Ambiguous overloaded call to 'ToString'
 
 Se alguém souber me explicar o pq disso ..
 
 Muito obrigado e bom trabalho a todos
 
 
 
 
 --
  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! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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] Excluir linhas em branco

2005-09-06 Por tôpico Erick Sasse
procedure TForm3.Button1Click(Sender: TObject);
var
  Linha: Integer;
begin
  Linha := 0;
  while Linha  Memo1.Lines.Count do
if Length(Memo1.Lines[Linha]) = 0 then
  Memo1.Lines.Delete(Linha)
else
  Inc(Linha);
end;

--
Erick Sasse
www.ericksasse.com.br
 
 

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br 
 [mailto:[EMAIL PROTECTED] Em nome de Patricia Santana
 Enviada em: terça-feira, 6 de setembro de 2005 16:24
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Excluir linhas em branco
 
 
 Boa tarde a todos!!!
 
 Preciso retirar linhas em branco de um texto que está dentro 
 de um componente memo do Delphi. Como faço isso?
 
 Desde de já agradeço a atenção de todos!
 
  
 
 Patricia Santana
 
  
 
  
 
  
 
  
 
   
 -
  Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA 
 VIAGEM NA CONVERSA. Participe!
 
 [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
 
 
 
 
  
 
 






___ 
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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] Ambiguous overloaded call to 'ToString'

2005-09-06 Por tôpico Andreano Lanusse
O problema está no tipo TDateTime e Real, uma data na verdade é um Real 
(float), onde inteiros representa data e decimais representa horas...
 
Quando você passa um valor para o Delphi gera uma ambiguidade, pode ver que em 
seu programa deve ter alguma chamada ToString(1), como este número pode ser 
entendido também como Data gera a ambiguidade
 
Explique o que você pretende com esse toString para poder lhe ajudar melhor.
 
Abraços,
 
Andreano Lanusse
System Engineer
Borland Latin America
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]  - www.borland.com.br 
blocked::http://www.borland.com.br/ 

 

A Borland Software é líder global em soluções independentes de plataforma para 
o Software Delivery Optimization, auxiliando nossos clientes a resolverem as 
restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o 
valor do negócio de seu software.




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de rbriguetto
Enviada em: terça-feira, 6 de setembro de 2005 09:38
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Ambiguous overloaded call to 'ToString'


Amados ...

Eu criei uma unit de rotinas pra facilitar minha vida e uma dessas 
rotinas é a função ToString:

  function ToString(Value: Integer): String ; overload;
  function ToString(Value: Real): String; overload;
  function ToString(Value: TDateTime): String; overload;

então teoricamente ela teria que funcionar quando eu passar qualquer 
parâmetro do tipo Integer, Real ou DateTime.
O problema é que em algumas units essa rotina funciona blz e em outras 
dá o erro 

Ambiguous overloaded call to 'ToString'

Se alguém souber me explicar o pq disso ..

Muito obrigado e bom trabalho a todos




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

 
http://br.rd.yahoo.com/SIG=12fh9ft28/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126017515/A=2950750/R=2/id=noscript/SIG=10tift5qr/*http://br.movies.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 . 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: RES: [delphi-br] Ambiguous overloaded call to 'ToString'

2005-09-06 Por tôpico Rodrigo Brunelli Riguetto
Essas rotinas não fazem parte de classe alguma, foram simplesmente declaradas 
em uma unit e ai eu as uso normal em outros units.
O estranho é que esse erro acontece em algumas units do programa e em outros 
não.
 
Muito obrigado a todos pela atenção

Erick Sasse [EMAIL PROTECTED] escreveu:
Estas funções fazem parte de uma classe?
Acredito que não seja possível usar overload fora de uma classe.

--
Erick Sasse
www.ericksasse.com.br



 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br 
 [mailto:[EMAIL PROTECTED] Em nome de rbriguetto
 Enviada em: terça-feira, 6 de setembro de 2005 09:38
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Ambiguous overloaded call to 'ToString'
 
 Amados ...
 
 Eu criei uma unit de rotinas pra facilitar minha vida e uma 
 dessas rotinas é a função ToString:
 
   function ToString(Value: Integer): String ; overload;
   function ToString(Value: Real): String; overload;
   function ToString(Value: TDateTime): String; overload;
 
 então teoricamente ela teria que funcionar quando eu passar 
 qualquer parâmetro do tipo Integer, Real ou DateTime.
 O problema é que em algumas units essa rotina funciona blz e 
 em outras dá o erro 
 
 Ambiguous overloaded call to 'ToString'
 
 Se alguém souber me explicar o pq disso ..
 
 Muito obrigado e bom trabalho a todos
 
 
 
 
 --
  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! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao 


-- 
 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
var lrec_target=_blank;var lrec_URL=new 
Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12fmskp1j/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126055174/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var
 
lrec_altURL=http://br.rd.yahoo.com/SIG=12fmskp1j/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126055174/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var
 lrec_width=300;var lrec_height=250;

-
Links do Yahoo! Grupos

   Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
   Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
   O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



-
 Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe!

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: RES: [delphi-br] Ambiguous overloaded call to 'ToString'

2005-09-06 Por tôpico Rodrigo Brunelli Riguetto
A minha pretenção é criar uma rotina genérica pra converter qualquer tipo de 
dado pra String, pra substituiro IntToStr, FloatToStr, DateTimeToStr
 


Andreano Lanusse [EMAIL PROTECTED] escreveu:
O problema está no tipo TDateTime e Real, uma data na verdade é um Real 
(float), onde inteiros representa data e decimais representa horas...

Quando você passa um valor para o Delphi gera uma ambiguidade, pode ver que em 
seu programa deve ter alguma chamada ToString(1), como este número pode ser 
entendido também como Data gera a ambiguidade

Explique o que você pretende com esse toString para poder lhe ajudar melhor.

Abraços,

Andreano Lanusse
System Engineer
Borland Latin America
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]  - www.borland.com.br 
blocked::http://www.borland.com.br/ 



A Borland Software é líder global em soluções independentes de plataforma para 
o Software Delivery Optimization, auxiliando nossos clientes a resolverem as 
restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o 
valor do negócio de seu software.




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de rbriguetto
Enviada em: terça-feira, 6 de setembro de 2005 09:38
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Ambiguous overloaded call to 'ToString'


Amados ...

Eu criei uma unit de rotinas pra facilitar minha vida e uma dessas 
rotinas é a função ToString:

  function ToString(Value: Integer): String ; overload;
  function ToString(Value: Real): String; overload;
  function ToString(Value: TDateTime): String; overload;

então teoricamente ela teria que funcionar quando eu passar qualquer 
parâmetro do tipo Integer, Real ou DateTime.
O problema é que em algumas units essa rotina funciona blz e em outras 
dá o erro 

Ambiguous overloaded call to 'ToString'

Se alguém souber me explicar o pq disso ..

Muito obrigado e bom trabalho a todos




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

http://br.rd.yahoo.com/SIG=12fh9ft28/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126017515/A=2950750/R=2/id=noscript/SIG=10tift5qr/*http://br.movies.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 . 




[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
var lrec_target=_blank;var lrec_URL=new 
Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12f99bheu/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126061941/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var
 
lrec_altURL=http://br.rd.yahoo.com/SIG=12f99bheu/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126061941/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var
 lrec_width=300;var lrec_height=250;

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


__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

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

RES: RES: [delphi-br] Ambiguous overloaded call to 'ToString'

2005-09-06 Por tôpico Andreano Lanusse
Rodrigo,
 
talvez utilizar Variant pode ser uma boa, mas não recomendaria
 
Especificar o tipo que está sendo convertido torna mais claro o código.
 
Em Delphi .NET isso está lá, basta você chamar o .ToString do objeto.
 
Você usa Win32, certo?
 
[]'s
 
Andreano Lanusse
System Engineer
Borland Latin America
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]  - www.borland.com.br 
blocked::http://www.borland.com.br/ 

 

A Borland Software é líder global em soluções independentes de plataforma para 
o Software Delivery Optimization, auxiliando nossos clientes a resolverem as 
restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o 
valor do negócio de seu software.




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rodrigo 
Brunelli Riguetto
Enviada em: terça-feira, 6 de setembro de 2005 22:05
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Ambiguous overloaded call to 'ToString'


A minha pretenção é criar uma rotina genérica pra converter qualquer tipo de 
dado pra String, pra substituiro IntToStr, FloatToStr, DateTimeToStr



Andreano Lanusse [EMAIL PROTECTED] escreveu:
O problema está no tipo TDateTime e Real, uma data na verdade é um Real 
(float), onde inteiros representa data e decimais representa horas...

Quando você passa um valor para o Delphi gera uma ambiguidade, pode ver que em 
seu programa deve ter alguma chamada ToString(1), como este número pode ser 
entendido também como Data gera a ambiguidade

Explique o que você pretende com esse toString para poder lhe ajudar melhor.

Abraços,

Andreano Lanusse
System Engineer
Borland Latin America
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]  - www.borland.com.br 
blocked::http://www.borland.com.br/ 



A Borland Software é líder global em soluções independentes de plataforma para 
o Software Delivery Optimization, auxiliando nossos clientes a resolverem as 
restrições no desenvolvimento de aplicações nos dias de hoje, para maximizar o 
valor do negócio de seu software.




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de rbriguetto
Enviada em: terça-feira, 6 de setembro de 2005 09:38
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Ambiguous overloaded call to 'ToString'


Amados ...

Eu criei uma unit de rotinas pra facilitar minha vida e uma dessas 
rotinas é a função ToString:

  function ToString(Value: Integer): String ; overload;
  function ToString(Value: Real): String; overload;
  function ToString(Value: TDateTime): String; overload;

então teoricamente ela teria que funcionar quando eu passar qualquer 
parâmetro do tipo Integer, Real ou DateTime.
O problema é que em algumas units essa rotina funciona blz e em outras 
dá o erro 

Ambiguous overloaded call to 'ToString'

Se alguém souber me explicar o pq disso ..

Muito obrigado e bom trabalho a todos




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

http://br.rd.yahoo.com/SIG=12fh9ft28/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126017515/A=2950750/R=2/id=noscript/SIG=10tift5qr/*http://br.movies.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 . 




[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
var lrec_target=_blank;var lrec_URL=new 
Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12f99bheu/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126061941/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var
 
lrec_altURL=http://br.rd.yahoo.com/SIG=12f99bheu/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126061941/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var
 
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var
 lrec_width=300;var lrec_height=250;

-
Links do Yahoo! Grupos

   Para visitar o 

RES: [delphi-br] Ambiguous overloaded call to 'ToString'

2005-09-06 Por tôpico Erick Sasse
O problema é esse mesmo, o fato das funcoes não estarem dentro de uma
classe, como eu chutei, não tem nada a ver. 
E não vejo como resolver, talvez seja por isso que eles usam DateToStr,
IntToStr, XXXToStr..

--
Erick Sasse
www.ericksasse.com.br
 


 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br 
 [mailto:[EMAIL PROTECTED] Em nome de Andreano Lanusse
 Enviada em: terça-feira, 6 de setembro de 2005 21:59
 Para: delphi-br@yahoogrupos.com.br
 Assunto: RES: [delphi-br] Ambiguous overloaded call to 'ToString'
 
 O problema está no tipo TDateTime e Real, uma data na verdade 
 é um Real (float), onde inteiros representa data e decimais 
 representa horas...
  
 Quando você passa um valor para o Delphi gera uma 
 ambiguidade, pode ver que em seu programa deve ter alguma 
 chamada ToString(1), como este número pode ser entendido 
 também como Data gera a ambiguidade
  
 Explique o que você pretende com esse toString para poder lhe 
 ajudar melhor.
  
 Abraços,
  
 Andreano Lanusse
 System Engineer
 Borland Latin America
 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED]  - 
 www.borland.com.br blocked::http://www.borland.com.br/ 
 
  
 
 A Borland Software é líder global em soluções independentes 
 de plataforma para o Software Delivery Optimization, 
 auxiliando nossos clientes a resolverem as restrições no 
 desenvolvimento de aplicações nos dias de hoje, para 
 maximizar o valor do negócio de seu software.
 
 
 
 
 De: delphi-br@yahoogrupos.com.br 
 [mailto:[EMAIL PROTECTED] Em nome de rbriguetto 
 Enviada em: terça-feira, 6 de setembro de 2005 09:38
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Ambiguous overloaded call to 'ToString'
 
 
 Amados ...
 
 Eu criei uma unit de rotinas pra facilitar minha vida e uma 
 dessas rotinas é a função ToString:
 
   function ToString(Value: Integer): String ; overload;
   function ToString(Value: Real): String; overload;
   function ToString(Value: TDateTime): String; overload;
 
 então teoricamente ela teria que funcionar quando eu passar 
 qualquer parâmetro do tipo Integer, Real ou DateTime.
 O problema é que em algumas units essa rotina funciona blz e 
 em outras dá o erro 
 
 Ambiguous overloaded call to 'ToString'
 
 Se alguém souber me explicar o pq disso ..
 
 Muito obrigado e bom trabalho a todos
 
 
 
 
 --
  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
 
  
 http://br.rd.yahoo.com/SIG=12fh9ft28/M=365837.7000707.7924794
.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126017515/A=
2950750/R=2/id=noscript/SIG=10tift5qr/*http://br.movies.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 . 
 
 
 
 
 [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
 
 
 
 
  
 
 






___ 
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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] obter linha stringgrid

2005-09-06 Por tôpico Erick Sasse
Basta acessar as propriedades Row e Col da StringGrid no evento OnDblClick.

--
Erick Sasse
www.ericksasse.com.br
 
 

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br 
 [mailto:[EMAIL PROTECTED] Em nome de Luis Gustavo
 Enviada em: terça-feira, 6 de setembro de 2005 22:38
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] obter linha stringgrid
 
 Alguem sabe como posso obter a linha, coluna do stringgrid 
 quando eu der um duplo click na celula ??
 
 obrigado.
 
 []s Luis
 
 [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
 
 
 
 
  
 
 






___ 
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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] obter linha stringgrid

2005-09-06 Por tôpico Luis Gustavo
valeu !!! que bobiada que eu dei

obrigado.

[]s Luis

- Original Message - 
From: Erick Sasse [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, September 06, 2005 10:16 PM
Subject: RES: [delphi-br] obter linha stringgrid


Basta acessar as propriedades Row e Col da StringGrid no evento OnDblClick.

--
Erick Sasse
www.ericksasse.com.br



 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br
 [mailto:[EMAIL PROTECTED] Em nome de Luis Gustavo
 Enviada em: terça-feira, 6 de setembro de 2005 22:38
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] obter linha stringgrid

 Alguem sabe como posso obter a linha, coluna do stringgrid
 quando eu der um duplo click na celula ??

 obrigado.

 []s Luis

 [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













___
Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


-- 
 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! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao


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

2005-09-06 Por tôpico Jenifer Arosa
Oi Alisson
Sua sugestão me trouxe uma luz a uma questão de como eliminar a
criação de generators de forma controlada.
Pelo que percebi a trigger seria para incrementar apos o insert da
tabela... então caso desista ele não incrementa.
 
Neste caso fiquei em duvida quanto a esse POSITION 0 no help não
ficou muito claro.
Também tenho duvidas se funcionaria bem numa rede... vários pessoas
acionando o insert ao mesmo tempo ou coisa assim.
 
Grata por qualquer sugestão.
 
Beijos
{{}}
Jenifer

-Mensagem original-

O primeiro comando cria um generator...

CREATE GENERATOR GENERATOR1


depois vc cria um trigger para ser 'disparado' toda vez que vc criar um
registro na tabela
CREATE TRIGGER TRG_TESTE FOR TABELA1
ACTIVE BEFORE INSERT POSITION 0
AS
begin
new.CAMPODESEJADO'=GEN_ID(GENERATOR1,1)
end


Espero que ajude

Alisson Ricardo Viol Gazda
Colégio Platão de Apucarana



[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