[delphi-br] ___Problemas com random...

2006-06-07 Por tôpico clodoaldo tonial
Boa noite pessoal, estou desenvolvendo um joguinho de bingo para jogar em rede, 
 naum estou conseguindo usar o random, pois parece que ele tem um bug (delphi 
7) que gera sempre a mesma sequência aleatória, (isto é) cada vez que abre o 
prog ele gera sempre a mesma ordem de combinações, algum dos amigos já passou 
por isso ?
obrigado à todos que puderem ajudar...


Seja livre - Evite pirataria use software livre - 
Clodoaldo Tonial - icq:162167716 - msn:[EMAIL PROTECTED]
 __
Fale com seus amigos  de graça com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
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] ___Cor da fonte do hint...

2006-05-18 Por tôpico clodoaldo tonial



Alguém sabe como alterar a cor da fonte do hint no D7...
 obrigado a todos que puderem ajudar...


Seja livre - Evite pirataria use software livre - 
Clodoaldo Tonial - icq:162167716 - msn:[EMAIL PROTECTED]
  
-
 Navegue com o Yahoo! Acesso Grátis, assista aos jogos do Brasil na Copa e ganhe prêmios de hora em hora.

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







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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






  




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




  
  



  




  
Links do Yahoo! Grupos

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












[delphi-br] substituindo if por arrays...

2006-05-10 Por tôpico clodoaldo tonial



penso que seria mais elegante usar arrays no lugar de if que desenvolvi certinho este desenvolvimento desta lógica...
 se alguem tiver uma idéia e puder auxiliar no estudo deste prob fico muito agradecido...
 
 
 usando um combox com tres opçõese um radio group com mais duas...
 como poderia usar arrays com estas combinações...apresentar um resultado...
 ex: cbxDestino com a, b, c...
 rdgIda e rdgIdaeVolta...
 obrigado...
 


Seja livre - Evite pirataria use software livre - 
Clodoaldo Tonial - icq:162167716 - msn:[EMAIL PROTECTED]
  
-
 Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz. 

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







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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






  




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




  
  



  




  
Links do Yahoo! Grupos

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











Re: [delphi-br] Efeito Visual

2006-04-04 Por tôpico clodoaldo tonial
a propósito, alguém olhou o source na página??
  me parece que o java-script que executa as alteração da gif...
  ou pode ser um swf com o java-script ocultando a exibição das propriedades do 
bt direito do mouse, ativando uma gif transparente ou um hotspot sobre o swf...
  naum tive tempo de verificar bem pois tah tudo muito corrido...
  abraços

Andrei Luís [EMAIL PROTECTED] escreveu:
  De acordo com um colega webdesigner é uma animação flash, e a dica dele é
para que você procure por programas que baixam animações flash e depois
procure por programa que descompilam as animações, daí dá pra ter uma idéia
de como foi feito.

[]
Andrei


Em 04/04/06, Eduardo Silva (r) [EMAIL PROTECTED] escreveu:

 Galera, alguem ai ja entrou no site da Madonna
 (http://www.madonna.com/home/)

 e viu aquele efeito de globo que tem no site?

 Acho que o efeito aparece quando se clica num quadradinho que tem do lado
 direito abaixo no site...deeem uma olhada.

 É muito legal, alguém sabe me dizer como fazer aquilo?

  ____
 /  \ /| |'-.
.\__/ || |   |
 _ /  `._ \|_|_.-'
 | /  \__.`=._) (_
 |/ ._/  ||
 |'.  `\ | | Eduardo de Almeida Silva
 ;/ / | | Kobra Sistemas
 ) /_/|  |.---.| Desenvolvimento de Software
 '  `-` '



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE
var lrec_target=_blank;var lrec_URL=new Array();  
lrec_URL[1]=http://br.ard.yahoo.com/SIG=12f0nl298/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1144189624/A=3365371/R=0/id=flashurl/SIG=110csbogi/*http://www.yahoo.com.br/cinema;;
  var 
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads7/0310_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);
  var 
lrec_altURL=http://br.ard.yahoo.com/SIG=12f0nl298/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1144189624/A=3365371/R=1/id=altimgurl/SIG=110csbogi/*http://www.yahoo.com.br/cinema;;
  var 
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads7/0310_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!. 




Seja livre - Evite pirataria use software livre - 
Clodoaldo Tonial - icq:162167716 - msn:[EMAIL PROTECTED]

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

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
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] execução de .BAT

2006-01-21 Por tôpico clodoaldo tonial
bem pessoal, tenho a necessidade da execução de um .BATzinho no evento OnClick 
de um BitBtn ou um Button, e não estou conseguindo, alguém sabe como posso 
proceder?
   
  abraços à todos...


Seja livre - Evite pirataria use software livre - 
Clodoaldo Tonial - icq:162167716 - msn:[EMAIL PROTECTED]

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] ________Banco de dados

2006-01-08 Por tôpico clodoaldo tonial
bem pessoal, 1º me apresentando, entrei no grupo há alguns dias e fiquei soh 
acompanhado. sou instrutor de informática e  graduando em sistemas de 
informação no RS, 2º nível, vou ter delphi neste semestre e estou me preparando 
desde já,,,
  Encontrei bons tutoriais na net, sei bem pascal e algorítmos, já me viro 
sozinho seguindo apostilas de delphi básicas na qual procurei e encontrei farto 
material...
   
  Minha dúvida é a seguinte, com relação a banco de dados...acho que o firebird 
é free ou opensource, não sei? mas entaum preciso de tutorias de utilização de 
delphi com um banco de dados, qual vcs me recomendam, e preferencialmente 
alguns tutoriais ou apostilas,,,
  obrigado à todos que puderem contribuir com meu aprendizado, e sei que posso 
ajudar akeles que sabem menos que eu...
   
  abraços...


Seja livre - Evite pirataria use software livre - 
Clodoaldo Tonial - icq:162167716 - msn:[EMAIL PROTECTED]

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: [delphi-br] [OFF] Windows X Oracle

2004-10-11 Por tôpico Clodoaldo

Não,
 Ela so roda em servidor Windows NT ou Windows 2000.


Clodoaldo
  - Original Message - 
  From: Elazar Dornelles Ceza 
  To: [EMAIL PROTECTED] 
  Sent: Friday, October 08, 2004 10:45 AM
  Subject: [delphi-br] [OFF] Windows X Oracle


  Pessoal, 

  to querendo aprender alguma coisa de Oracle, tenho uma versao 8i (ou algo assim) 
trial, e queria saber se roda no Win98?


  [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] daniel; calculo para ano bissesto

2004-10-01 Por tôpico Clodoaldo
use isto:

if ((ano mod 4)=0) then
writeln('Este é um ano bisexto')
else
Writeln('Este ano nao e bisexto');
  - Original Message - 
  From: danielromabr 
  To: [EMAIL PROTECTED] 
  Sent: Friday, October 01, 2004 9:47 AM
  Subject: [delphi-br] daniel; calculo para ano bissesto


  ola
  estou estudando no 1 ano de sistemas de informacao na umc e estou 
  estudando pascal
  quero saber como se calcula se um ano é bissexto ou nao: tem a ver 
  com o numero de dias do ano?cmo é a formula?
  obrigado





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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



Yahoo! Grupos, um serviço oferecido por: 
 
 
  Assine Claudia em
  5x de R$ 18,96 Assine Info em
  5x de R$ 21,48 
  Mais... Capricho Manequim Boa Forma  Nova Exame 
   
 
   


--
  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] Resolução do Video

2004-09-28 Por tôpico Clodoaldo
Me desculpe, enviei sem colar a instrução:
procedure TForm1.FormCreate(Sender: TObject);
var
  i : Integer;
  DevMode : TDevMode;
begin
  i := 0;
  while EnumDisplaySettings(nil,i,Devmode) do begin
with Devmode do
  ListBox1.Items.Add(Format('%dx%d %d Colors',[dmPelsWidth,dmPelsHeight,1 shl 
dmBitsperPel]));
Inc(i);
  end;
end;

procedure TForm1.ListBox1Click(Sender: TObject);
begin
  Button1.Enabled := Listbox1.ItemIndex = 0;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  DevMode : TDevMode;
begin
  EnumDisplaySettings(nil,Listbox1.ItemIndex,Devmode);
  ChangeDisplaySettings(DevMode,0);
end;


Clodoaldo
  - Original Message - 
  From: Guilherme Erzinger 
  To: [EMAIL PROTECTED] 
  Sent: Tuesday, September 28, 2004 9:46 AM
  Subject: [delphi-br] Resolução do Video


  Bom Dia Pessoal


  Alguem tem algum exemplo de como mudar a resolucao do video ?? Pois tenho um cliente 
que utiliza a resolucao de 800x600 e o sistema foi desenvolvido em 1200x768, e se 
utilizar essa resolucao fixa, acabaria com os meus problemas

  Obrigado



  Guilherme


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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

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



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



Re: [delphi-br] Listar Tabelas do Banco

2004-09-21 Por tôpico Clodoaldo
Tenta com AdoConnection, eu estava usando access funcionou bem, acredito que venha 
funcionar com outros bancos.
procedure TForm1.FormCreate(Sender: TObject);
var
  SL: TStrings;
  index: Integer;
begin
  SL := TStringList.Create;
  try
ADOConnection1.GetTableNames(SL, False);
for index := 0 to (SL.Count - 1) do
begin
 ListBox1.Items.Add(sl[index]);
end;
  finally
SL.Free;
  end;
end;


isto levando se em conta que o AdoConnection esta conectado ao banco.

Clodoaldo
  - Original Message - 
  From: Raphael Fonseca 
  To: Delphi-BR ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] 
  Cc: [EMAIL PROTECTED] ; Firebase Grupos ; [EMAIL PROTECTED] ; Delphi-Grupos 
  Sent: Monday, September 20, 2004 4:38 PM
  Subject: [delphi-br] Listar Tabelas do Banco


  Caros Amigos da Lista

  Como faço para listar em um combobox todas as tabelas de um determinado banco 
Firebird.

  No aguardo.

  Raphael Fonseca

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

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



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



Re: [delphi-br] Como Alterar o SQL sem fechar tabela???

2004-09-21 Por tôpico Clodoaldo
Porque vc não pode dar um close na tabela??
  - Original Message - 
  From: Luiz Fabiano Ribeiro 
  To: [EMAIL PROTECTED] 
  Sent: Monday, September 20, 2004 6:06 PM
  Subject: [delphi-br] Como Alterar o SQL sem fechar tabela???


  Boa Tarde lista

  Tenho algumas tabelas grandes para fazer consultas,
  e por ignorancia minha nao estou sabendo como
  eu conseguiria alterar o codigo SQL sem que eu
  de um Close na tabela

  O close nao é o mesmo que um Active=False???

  Como eu poderia alterar o codigo sem fechar a tabela???

  Obrigado Ate +



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

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



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



Re: [delphi-br] KeyDown do Form

2004-09-20 Por tôpico Clodoaldo
Ola,
Vc foi infeliz na escolha de suas teclas de atalho, porque estes dois que vc citou 
são as teclas de atalho
padrão do windows copiar e colar ctrl+c copia e ctrl+v cola.
  - Original Message - 
  From: Alexandre 
  To: delphi 
  Sent: Monday, September 20, 2004 3:07 PM
  Subject: [delphi-br] KeyDown do Form


  Fala gALLera estou precisando d mais uma ajuda de
  vcs
  É o seguinte, eu tenho uma aplicação q usa os eventos
  do teclado antes de chamar os eventos dos componentes
  ou seja, eu coloco o keyPreview do meu form pra true e
  dentro do evento KeyDown do form eu defino minhas
  teclas de atalho:
  if Key = VK_Return then SelectNext(ActiveControl,
  True, True)  //Enter
else if (Shift = [ssCtrl]) and (Key = 80) then
//Ctrl+V (Visualizar)
begin
  if btnVisualizar.Enabled then
  begin
btnVisualizar.Click;
Key := 0;
  end;
end;
  acontece q se der um Ctrl + C em um texto qualquer, e
  depois quando eu tento usar a tecla de atalho ctrl+v
  para chamar o evento click do meu botao
  btnVisalizar..ele preenche uma caixa de texto q está
  com o setfocus true com o valor q esta na minha area
  de tranferência, alguem sabe pq isso ocorre?




  
  ___
  Yahoo! Messenger 6.0 - jogos, emoticons sonoros e muita diversão. Instale agora!
  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]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

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



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



Re: [delphi-br] transmissão via FTP

2004-09-15 Por tôpico Clodoaldo
Porque vc nao utiliza o componente NMFtp da palete FastNet, este tem até um exemplo no 
delphi5. Já utilizei e me serviu.

Clodoaldo
  - Original Message - 
  From: julianoinfo 
  To: [EMAIL PROTECTED] 
  Sent: Wednesday, September 15, 2004 11:58 AM
  Subject: [delphi-br] transmissão via FTP


  Estou usando o componete IDFTP da paleta INDY  e não consigo enviar 
  o arquivo com o put, da a mensagem file write error  
  cód 
 idftp1.put('c:\teste.txt','/upload',true);
  o que pode esta errado 
  ou se algema tiver um outra forma de transmissão de arquivos via ftp
  e possa me enviar um ex. 

  grato pela antenção 
 
   MSN  [EMAIL PROTECTED]




  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

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



[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] Descobrindo números repetidos

2004-09-13 Por tôpico Clodoaldo
Olá,
Uma das maneiras mais práticas que eu conheço é utilizando um vetor, Zere ele 
antes de
começar a digitar os valores e depois vá marcando as posições que vc já utilizou.



Abraço,
Clodoaldo
  - Original Message - 
  From: Carlos Alberto B. dos Santos 
  To: [EMAIL PROTECTED] 
  Sent: Friday, September 10, 2004 11:10 AM
  Subject: [delphi-br] Descobrindo números repetidos



  Olá, pessoal,

  Eu tenho a seguinte dúvida:

  Vou entrar com cem números (de 1 á 100), através de um edit, porém,
  esses números não entrarão em ordem.
  Como eu faço para saber se um número está entrando repetido, pois não posso
  ter nenhum desses cem números repetido.

  Grato.

  CArlos.


  ---
  Outgoing mail is certified Virus Free.
  Checked by AVG anti-virus system (http://www.grisoft.com).
  Version: 6.0.757 / Virus Database: 507 - Release Date: 09/09/04





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

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



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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