Re: [delphi-br] Passar parametro para aplicação

2009-07-03 Por tôpico Açaí
Basta voce chamar o programa passando o parametro, assim:

c:\programa_em_delphi7.exe parametro.txt




2009/7/3 Vinicius vinic...@cnen.gov.br



 Bom dia a todos, alguem pode me dizer como faço para passar um parâmetro
 para uma aplicação em Delphi7?

 Estou fazendo um programa para enviar um email, este programa será
 executado
 a partir de um arquivo de lot (.bat) e quero passar o valor que esta em uma
 variável de ambiente, deu pra vc entenderem??

 Tipo assim: aplicação.exe %1

 Já deu uma vasculhada no Google, mais só achei passagem de parâmetros
 dentro
 de aplicações.

 Obrigado

  



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



Re: [delphi-br] Qual seria o equivalente do Intptr do C sharp no delphi?

2009-03-13 Por tôpico Açaí
Acredito que a função ptr(valor) com cast dê certo, ficando assim:

var x:integer;
begin
  x := Integer(ptr(valor));
end;

2009/3/13 Evaldo evaldoave...@yahoo.com.br

   Bom dia,

 Qual seria o equivalente do Intptr do C sharp no delphi 7?

 preciso usar uma dll escrita em C Sharp e me deparei com esse tipo.

 obrigado

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

 



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



[delphi-br] Socorro com Instalação de componente

2008-12-08 Por tôpico Açaí
Olá,
tenho  um problema sério, estou tentando migrar um componente de Delphi 7
para Delphi 2006
mais está dando um erro na unit DesignEditors falando que não encontrou a
unit DesignIntf.dcu.
o que eu faço para resolver este problema

se alguém poder me ajudar ficarei grato...


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



Re: [delphi-br] Controle de Permissão de usuário!

2008-10-22 Por tôpico Açaí
Dê uma olhada neste componente:
http://www.toolsandcomps.com/port/index.htm

TOOLSANDCOMPS

2008/10/21 Pablo Henrique Vianini Souza [EMAIL PROTECTED]

   Pessoal, fiquei por horas pensando uma maneira pratica e rápida de se
 fazer um controle de permissão de úsuario em meu sistema

 Gostaria de fazer algo bem simples, pq é muito chato quando vc vai gerar
 permissões e que tem aqueles milhares de checkbox um para cada opção do
 menu, então pensei em algo que pude-se ser mais prático, tipo:

 O Administrador do sistema criar Perfis tipo Administrador,
 Balconista, Encarregado, e dentro destes perfis poderia sim criar as
 centenas de check box, porem depois que os perfis estivesem prontos, quando
 adicionar um novo usuario, simplesmente informariamos qual o perfil daquele
 usuario... em caso de necessidade alteraria o perfil e todos os usuarios
 daquele perfil iria adquirir aquela alteração...

 Vcs conhecem algum componente que ajuda a controlar essa questão de
 permissão, o action list seria um componente ideal pra isso??

 Abraços pessoal
 __
 Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de
 relacionamentos com até 6,000 fotos!
 http://www.amigosdomessenger.com.br

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

 



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



Re: [delphi-br] fechar form

2008-10-21 Por tôpico Açaí
se o Form Principal frmPrincipal já estiver aberto mais atrás do outro
então
voce não precisa chama-lo novamente frmPrincipal.ShowModal;,
voce só precisa inverter os comandos:

frmLogin.Close;
frmLogin.free;
2008/10/21 felipe govoni [EMAIL PROTECTED]

   bom dia

 to tentando fecha um form antes de abrir outro, to fazendo assim:

 frmLogin.free;
 frmLogin.Close;
 frmPrincipal.ShowModal;

 funciona mas a aplicação some da barra de tarefas, alguem sabe como
 arrumar isso?

 --
 Felipe Govoni
 -
 Programador
 Fone 8472-8718

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

 



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



Re: [delphi-br] Gerenciador de Impressoes

2008-10-03 Por tôpico Açaí
Veja este post ele vem com fonte.
http://www.devmedia.com.br/articles/viewcomp.asp?comp=4499



2008/10/2 Marcio [EMAIL PROTECTED]

   Alguem tem algum exemplo de como implementar um gerenciador de
 impressoes?

 Eu so preciso de um programa que ficara instalado na maquina do usuario e
 quando enviar alguma impressao ele vai gravar em uma tabela a quantidade de
 pagias, copias, dados do documento, etc.

 Comecei mexer num projeto que achei no site da codegear mas vi que no
 windows 98 nao funciona.

 Alguem tem alguma dica ou exemplo??


 Vlw,

 Márcio C. Tenreiro
 Universidade de marilia/SP

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

  



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



Re: [delphi-br] CodeGear Delphi 2009 Tour - Evento Gratuito!!!

2008-09-08 Por tôpico Açaí
Infelizmente este evento não acontecerá aqui no DF

2008/9/8 Gerhard Roger Nack [EMAIL PROTECTED]

   Ola Bruno, aproveita então e já manda ai pra galera um exemplo desse tal
 Método Anônimo e pra que serve.

 [ ] s

 De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de
 Bruno Lichot
 Enviada em: segunda-feira, 8 de setembro de 2008 10:42
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: [delphi-br] CodeGear Delphi 2009 Tour - Evento Gratuito!!!

 Salve Galera

 As inscrições para o Delphi Tour de lançamento do Delphi 2009 estão a todo
 vapor!!! As inscrições para todas as cidades já estão disponíveis, mas
 lembre-se que as vagas são limitadas e o evento começa amanhã. Não deixem
 para se inscrever na última hora, pois pode não haver mais disponibilidade
 de vagas.

 http://latam.codegear.com/br/delphitour/

 Será uma série de eventos em várias capitais. A inscrição é gratuita!

 Durante o evento serão apresentadas todas as novidades do Delphi 2009.

 Apresentaremos todas as novidades incluindo o novo DataSnap com total
 independência do Windows, os componentes novos da VCL entre eles os de
 interface do novo Office(Ribbon Controls), as melhorias da linguagem, o
 suporte a Generics e Métodos Anônimos e muitas outras novidades.

 Esse ano teremos a participação especial do David I.

 Esperamos vocês no evento!

 Abraços,

 Bruno Lichot

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

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

  



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



Re: [delphi-br] Prova Certificação Delphi

2008-09-04 Por tôpico Açaí
Puxa cara, me manda esse material também.
Estou precisando pois preciso fazer a prova.

2008/9/4 Rafael [EMAIL PROTECTED]

   Olá Braytiner,

 Tenho interesse no material, mas não posso acessar o MSN pela empresa.
 Sería possível me enviar para o e-mail pessoal?
 [EMAIL PROTECTED] rafael.adorno%40gmail.com

 Muito obrigado.

 On 9/4/08, Braytiner [EMAIL PROTECTED] braytiner%40gmail.com wrote:
 
  Tenho um material aqui que pode ser útil, é uma compilação de dicas
  artigos
  sobre certificação, tem MSN?
 
  
  O Amor de Deus por nós é maior que nossos erros, Ele nos ama como somos,
 e
  não como deveríamos ser
  Braytiner
 
  2008/8/28 futurodelphi [EMAIL PROTECTED]futurodelphi%40yahoo.com.br
 futurodelphi%40yahoo.com.br
  
 
   Pessoal, boa tarde...
  
   Vou precisar fazer a prova de certificação aqui para o meu novo
   emprego e tenho que passar..
  
   Aí, para as pessoas que já fizeram a prova, gostaria de saber se vocês
   teriam o material, dicas sobre a prova, coisas que possam ajudar pois
   tenho 30 dias para estudar e passar...
  
   Já trabalho com Delphi a 5 anos, então, não é que tenho que começar do
   zero. É só o fato de que tenho que passar mesmo.
  
   Portanto, conto com a ajuda de quem puder aí.. Mandem os materiais,
   vídeos, simulados, o que puderem em PVT pra mim...
  
   Brigadão...
  
   Guilherme
  
  
   
  
   --
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
  
  
  
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

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

  



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



Re: [delphi-br] WinExec

2008-08-25 Por tôpico Açaí
Na verdade vc só precisa converter para char assim:
Pchar('asdfasfaf');
Ex.:
WinExec(Pchar('NotePad.exe /p c:\'+frmVendas.NumVenda.text+'.txt'), 0);


2008/8/25 Ralp Alves Bezerra [EMAIL PROTECTED]

   Nobres colegas, estou com o seguinte problema:

 Estou tentando imprimir um arquivo de texto criado previamente com a
 seguinte função:

 WinExec('NotePad.exe /p c:\'+frmVendas.NumVenda.text+'.txt', 0);

 porem, esta me retornando a seguinte mensagem:

 [Error] Rotina.pas(5292): Incompatible types: 'String' and 'PAnsiChar'

 Algúem poderia me dar uma luz a cerca de como imprimir o arquivo?

 Ps.: Estou utilizando Delphi 7

 Abraços a todos e obrigado!

 Ralp Alves Bezerra
  



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



Re: [delphi-br] TProgressBar; TGauge

2008-08-19 Por tôpico Açaí
Olá,
Faça o seguinte:
  Tjp(gauge1).Canvas.TextOut(1,-1,'Texto do Gauge');   //escreve o texto

  //outras formatações de fonte do gauge
  Tjp(gauge1).Canvas.brush.Style := bsclear;
  Tjp(gauge1).Canvas.Font.Color := clBtnFace;
  Tjp(gauge1).Canvas.brush.Style := bsclear;
  Tjp(gauge1).Canvas.Font.Color := clBtnFace;


2008/8/19 José Mário Silva Guedes [EMAIL PROTECTED]

   Olá a todos.

 Preciso de algo parecido com o TGauge, mas que ao invés de mostrar o
 percentual, mostrasse um texto.

 Alguém tem alguma classe que implementa isto ou conhece alguma forma de
 implementar isso no próprio TGauge?

 Obrigado!

 --
 José Mário Silva Guedes
 Analista Programador Delphi
 http://pgviavel.blogspot.com/

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

  



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



Re: Res: [delphi-br] Como traduzir o Caption dos botões no MessageDlg

2008-08-08 Por tôpico Açaí
var f:Tform;
begin
 f := CreateMessageDialog('Texto da mensagem',mtinformation,[mbYes,mbNo]);
 TButton(f.FindComponent('Yes')).Caption := 'Sim'; //este botões são do tipo
Tbutton
 TButton(f.FindComponent('No')).Caption := 'Não'; //este botões são do tipo
Tbutton
 f.showmodal;
 f.free;
end;


2008/8/7 Adriano Santos (Yahoo) [EMAIL PROTECTED]

   Ok.
 Um pouco de informação a mais não faz mal a ninguém, concorda?

 []s

 Luciano Calenzani Simões respondeu:
 
  Adriano, foco minhas respostas, quando posso ajudar, na necessidade do
  solicitante.
 
  O solicitante, neste caso, quer simplesmente uma mensagem com botões
  em português.
 
  Muitas vezes temos o costume de complicar as coisas ou tentar
  reinvetar a roda.
 
  Luciano Calenzani Simões
 
  - Mensagem original 
  De: Adriano Santos (Yahoo) [EMAIL 
  PROTECTED]falecom%40adrianosantos.pro.br
  mailto:falecom%40adrianosantos.pro.brfalecom%2540adrianosantos.pro.br
 
  Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brmailto:
 delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br

  Enviadas: Quinta-feira, 7 de Agosto de 2008 17:11:44
  Assunto: Re: Res: [delphi-br] Como traduzir o Caption dos botões no
  MessageDlg
 
  Luciano,
 
  Depende do caso. Você consegue colocar um CheckBox em um MessageDlg ou
  MessageBox?
  Usando o CreateMessageDlg dá pra fazer isso e mais um pouco. Depende do
  que realmente precisa.
 
  []s
 
  --
  Boa Leitura,
 
  Adriano Santos
  Development Manager SoftPark
  Editor Técnico Revistas ClubeDelphi e WebMobile
  www.delphitodelphi. blogspot. com
  www.adrianosantos. pro.br
  www.devmedia. com.br
 
  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a
  sua cara @ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses
  http://br.new.mail.yahoo.com/addresses
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 

 --
 Boa Leitura,

 Adriano Santos
 Development Manager SoftPark
 Editor Técnico Revistas ClubeDelphi e WebMobile
 www.delphitodelphi.blogspot.com
 www.adrianosantos.pro.br
 www.devmedia.com.br

 



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



Re: [delphi-br] Freelancer - Desenvolvimento de Sistemas

2008-08-08 Por tôpico Açaí
Me passa os dados do seu projeto que eu te envio o orçamento.
Quanto mais você detalhista melhor.
Desenvolvo em Delphi+ (SQLServer/Oracle/MySQL/Firebird/ACCESS)

Atenciosamente,
João Paulo


2008/8/8 Douglas Fernandes [EMAIL PROTECTED]

   Me passa os dados do seu projeto, que te envio um orçamento. Desenvolvo
 em
 delphi + firebird.

 Atenciosamente,
 Douglas Fernandes
 Fones contato(84) 9927-4395/9129-1316

 Citando Charles Jefferson [EMAIL PROTECTED] charlestech%40gmail.com
 :


  Tou com um sistema pra desenvolver pra um cliente de uma empresa que
  trabalha com negocio de fretes e mudanças
 
  Se alguem tiver disposto e com tempo para desenvolver e puder passar um
  orçamento agradeceria, pois no momento não tou com tempo algum pra
  desenvolver.. assim queria passar o sistema para algum programador ou
  empresa de desenvolvimento.
 
  Se puderem entrar em contato, pois o cliente esta com urgência.
 
  Entre em contato no email [EMAIL PROTECTED] isaquy%40bol.com.br que o
 cara passara os detalhes
  do sistema.
 
  --
  Charles Jefferson Rodrigues Alves e Alves
  Analista de Sistemas
 
 --
  Disse Jesus: Quem permanece em Mim e Eu nele, dá muito
  fruto; porque sem Mim nada podeis fazer (João 15:5)
 
 --
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 

 __
 Para fazer uma ligação DDD pra perto ou pra longe, faz um 21. A Embratel
 tem
 tarifas muito baratas esperando por você. Aproveite!

  



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



Re: [delphi-br] Melhor forma de fazer controle de usuários

2008-08-07 Por tôpico Açaí
Olá Fabio.

Eu uso o *TUsers Security da ToolsAndComps(www.toolsandcomps.com),*
*este é muito bom.*

2008/8/6 Fabio Thomaz [EMAIL PROTECTED]

   Olá galera, até o presente momento sempre utilizei o UserControl para
 fazer
 o controle de usuários dos meus sistemas, só que agora eu separei um
 aplicativo meu em vários módulos, cara um com seu exe, e ai vem o problema,
 o UserControl armazena as informações dos componentes que ele faz a
 proteção
 dentro do form que tem o compomente principal de segurança, e como eu vou
 ter várias janelas principais, cara uma para um aplicativo, não sei como
 usar este compomente agora, gostaria de saber se alguém que o utiliza,
 utiliza ele desta forma, ou então me sujerem um outro compomente que possa
 dar conta do recado, não queria implementar manualmente o controle de
 acesso
 do sistema, gosto muito do UserControl, mas agora bateu esta questão.

 Se acaso alguém faça seu próprio controle e pudar dar uma dica da melhor
 maneira de fazer isto tbm eu aceito, estou tentando analizar o que vai
 ficar
 melhor para este sistema.

 Desde já agradeço,

 Fábio Thomaz
 RG System Informática Ltda - Desenvolvimento

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

 



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



Re: [delphi-br] Delphi sem BDE

2008-08-04 Por tôpico Açaí
Se vc estiver usando SQLServer, o melhor é vc usar ADO
porque já vem na camada windows

2008/8/4 stainle2003 [EMAIL PROTECTED]

   Bom dia, estou refazendo meus sistemas para não mais usar o BDE, dentro
 aqui da empresa estou estudando entre SQLSERVER 2000 e FIREBIRD, mas
 nos notebooks ou que uso que NÃO precise instalar nada na máquina ???
 porque se eu tiver que instalar um FIREBIRD por exemplo caio no mesmo
 esquema do BDE, preciso fazer uma instalação, o FIREBIRD embarcado
 serve para uma aplicação PESADA digamos assim ???

 alguma sugestão seria bem vinda.

 grato

 Stainle

 



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



Re: [delphi-br] Delphi sem BDE

2008-08-04 Por tôpico Açaí
Então, mais se vc usar os componentes da paleta ADO
voce não precisa iinstalar nada nos clientes(notebooks).
e.: AdoConnection, AdoQuery e etc.

2008/8/4 Nivaldo Stainle [EMAIL PROTECTED]

   tudo bem, aqui na empresa até o DBExpress eu estou testando, acontece
 que nos NOTEBOOKS eu não tenho nada instalado, e aí é que

 --- Em seg, 4/8/08, Açaí [EMAIL PROTECTED]joaopaulo.jpo%40gmail.com
 escreveu:

 De: Açaí [EMAIL PROTECTED] joaopaulo.jpo%40gmail.com
 Assunto: Re: [delphi-br] Delphi sem BDE
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Data: Segunda-feira, 4 de Agosto de 2008, 10:07

 Se vc estiver usando SQLServer, o melhor é vc usar ADO
 porque já vem na camada windows

 2008/8/4 stainle2003 stainle2003@ yahoo.com. br

  Bom dia, estou refazendo meus sistemas para não mais usar o BDE, dentro
  aqui da empresa estou estudando entre SQLSERVER 2000 e FIREBIRD, mas
  nos notebooks ou que uso que NÃO precise instalar nada na máquina ???
  porque se eu tiver que instalar um FIREBIRD por exemplo caio no mesmo
  esquema do BDE, preciso fazer uma instalação, o FIREBIRD embarcado
  serve para uma aplicação PESADA digamos assim ???
 
  alguma sugestão seria bem vinda.
 
  grato
 
  Stainle
 
 
 

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

 Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua
 cara @ymail.com ou @rocketmail.com.
 http://br.new.mail.yahoo.com/addresses

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

 



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



Re: [delphi-br] BitBtn Transparente

2008-08-04 Por tôpico Açaí
Cara, no lugar do bibtn usa o speedbutton,
basta ligar a propriedade Flat dele.

2008/8/4 Alisson [EMAIL PROTECTED]

   Testei esse exemplo e não funcionou. Pelo que entendi nesse exemplo, o
 que
 fica transparente não é o BiBtn, mas sim a figura.

 - Original Message -
 From: Rubem Nascimento da Rocha [EMAIL 
 PROTECTED]djpardalrocha%40hotmail.com
 
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Sent: Saturday, August 02, 2008 3:34 PM
 Subject: RE: [delphi-br] BitBtn Transparente

 Vê se a dica abaixo serve pra vc:

 http://www.delphi3000.com/articles/article_284.asp

 Sds.

 __
 Faça ligações para outros computadores com o novo Yahoo! Messenger
 http://br.beta.messenger.yahoo.com/
 



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



Re: [delphi-br] Exec outro App sem ser formato .exe

2008-07-25 Por tôpico Açaí
Olha, uma alternativa seria voce transformar este outro aplicativo em DLL,
sendo assim ninguém conseguiria executá-lo clicando duas vezes, somente
o seu programa poderia executá-lo chamando-o pela função

2008/7/25 Flavio [EMAIL PROTECTED]:

   Olá pessoal, bom dia,

 minha dúvida é a seguinte: Desenvolvi um sistema e, em uma parte dele, é
 necessário chamar outro aplicativo, ou seja, será necessário colocar esse
 outro app no mesmo diretório do executável do sistema. Mas gostaria de
 chamar ele e executar a tarefa dele, porém, gostaria que ele não tivesse o
 formato .exe. Desejo assim para 'esconder' esse outro apolicativo dos olhos
 do usuário.

 Bom, o sistema irá rodar no Windows e, pelo q sei, ele executa somente
 .exe,.com e .bat. Acredito q não há essa possibilidade, mas chamando um app
 de outro app pelo delphi nunca fiz e não sei como funciona, mas se alguém
 tiver alguma sugestão ou dica ajudaria e muito.

 Obrigado pela atenção de todos.
 Flávio.

 Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua
 cara @ymail.com ou @rocketmail.com.
 http://br.new.mail.yahoo.com/addresses

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

  



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



Re: [delphi-br] Botão no Form pai que aparece na frente do Form filho

2008-07-25 Por tôpico Açaí
Provavelmente vc mudou o style do formulário... volte-o para o padrão

2008/7/25 Yoshio [EMAIL PROTECTED]:

   Olá pessoal.

 Eu criei um form pai com um botão no meio e quando eu crio algum form
 filho esse botão aparece na frente dele. É como se o form filho fosse
 posicionado entre o form pai e o botão do form pai. Já tentei usar a
 funcao BringToFront e SendToBack e mesmo assim não funciona. Só
 funciona quando eu crio um form filho com o showmodal (e ele sendo do
 tipo modal). Como eu posso fazer para criar este form filho na frente
 de modo que ele fique na frente dos componentes do form pai?

 Obrigado.
  



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



Re: [delphi-br] verificar maior data

2008-07-16 Por tôpico Açaí
Não vejo problema algum, claro que nos dois edits o texto
tem que ser uma data válida.

2008/7/16 Geovana Ventura [EMAIL PROTECTED]:

   Pessoal,

 Boa tarde!
 Fiz um form que traz em um Edit( Data Prevista) a data que está gravada no
 banco e tenho um Edit( Data de Conclusão) que será a data atual.
 Se a data prevista for menor do que a data atual, então está no prazo,
 senão
 fora do prazo..
 Fiz este código abaixo, no entanto, a comparação está ficando errada..
 Alguém pode me ajudar.
 Obrigada!!

 procedure TFrmVisPlanoAcao.ComparaData;
 Begin
 // comparando data prevista com a data atual

 EdtDtConclusao.Text:=DateToStr(now());

 if StrToDate(EdtDtPrevista.Text)  StrToDate(EdtDtConclusao.Text) then
 begin
 LabelTipoStatus.Caption:='Em andamento - Dentro do Prazo';
 LabelTipoStatus.Font.Color:=clNavy;
 end
 else
 begin
 LabelTipoStatus.Caption:='Em andamento - Fora do Prazo';
 LabelTipoStatus.Font.Color:=clRed;
 end;

 End;

 --
 Abraços,
 Geovana Ventura

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

  



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



Re: [delphi-br] Como posso fazer isso !!!!???

2008-07-08 Por tôpico Açaí
Com certeza vc tem outro problema já que o sistema não está fechando...
mais se vc quiser realmente fecha-lo tente fazer o seguinte:
No onClose do form coloque Application.terminate;.

Caso não funcione coloque Halt;.

tudo sem aspas.

Falow




2008/7/8 flavio_pnn [EMAIL PROTECTED]:

   O meu problema é o seguinte: Estou desenvolvendo um sistama e quando
 clico no botão fechar ele fecha a minha aplicação mas se eu pressionar
 a tecla ctrl+alt+delete ele ainda está em execução. O que devo fazer
 para quando eu fechar a plicação ele tb termine a sua execução.

 Obrigado.

 



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



Re: [delphi-br] Por que não consigo utilizar o delphi com projetos em um PenDrive U3?

2008-06-05 Por tôpico Açaí
Vc deve está tentando salvar várias vezes, isto com o arquivo em um hd é
super
rápido mais com o arquivo em pen-drive é mais lento, muito lento, por isso
dá esse erro.

Não tente salvar várias vezes (ctrl+s,ctrl+s,...) muito rápido porque pode
dá esse erro.



2008/6/5 Fellipe Henrique [EMAIL PROTECTED]:

   Amigos, tinha um pendrive normal, e usava normalmente com um projeto
 nele,
 abria no delphi sem problemas, agora que mudei pra um pen-drive com
 tecnologia U3, simplesmente o delphi não gosta dele... ao salvar vem erro
 falando que não consegue renomear Arquivo.$$$ pra Arquivo.pas ou .dfm...uma
 bagunça... porque disso?

 Uso windows xp sp3... e não tenho segurança nenhuma de usuários e tals..

 []s

 --
 _
 T.·.F.·.A.·.
 Fellipe Henrique
 [EMAIL PROTECTED] fellipeh%40gmail.com

 Sou a favor da lei LEI 607/2007

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

 



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



Re: [delphi-br] Acentuação

2008-04-11 Por tôpico Açaí
Cara o que está acontecendo é que as teclas de atalho do delphi
estão coincidindo com as de mudar o teclado no windows,
o que você pode fazer é  remover o teclado internacional do windows
deixando somente o tecla pt-br.




2008/4/11 Daniel Bastos [EMAIL PROTECTED]:

   As vezes acontece um problema comigo de que o tipo de teclado muda. Vita
 teclado ingles. Mas só dentro do delphi. Em qualquer outro programa fica
 normal. Normalmente reiniciando o delphi volta tudo ao normal 
 Já reparou se é isso?

 2008/4/10 Joel Alexandre [EMAIL PROTECTED]joel_alexandre2002%40yahoo.com.br
 :

  Senhores, bom dia..
 
  Estou com um problema aqui de acentuação no Delphi. Já procurei em
  vários lugares e nada. Instalei o Jedi na minha maquina e, percebi 2
  dias depois que não estava conseguindo mais colocar acentos nas units.
  Somente o cedilha funciona. Não sei se foi o Jedi que fez isso.
  Alguem já passou por isso?
 
  []Os Joel
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 Abs
 Daniel A. Bastos

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

 



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



Re: [delphi-br] Bloquear teclado no delphi

2008-04-03 Por tôpico Açaí
 O problema é que o leitor de código de barras simula o teclado,
 mais caso vc queira segue abaixo:

vc coloca esta procedure antes do Var das variaveis globais.

procedure BlockInput(ABlockInput : boolean); stdcall; external 'USER32.DLL';

depois pra usar basta:

BlockInput(True); //bloqueia

BlockInput(False); //desbloqueia

Em 03/04/08, emanoel diego [EMAIL PROTECTED] escreveu:

   Boa Tarde

 Alguem sabe algum comando no delphi, para bloquear o teclado para o
 usuário?

 Tenho um form, com 2 abas, em uma, vou passar um leitor de código de
 barras
 que aparecerá o número no edit, e quero bloquear o teclado para que o
 usuário não digite nada nesse edit.

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

 



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



Re: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32)

2008-04-02 Por tôpico Açaí
Olá.
Verifique se vc não está usando a versão do crystal report para web.
Caso esteja com a versão win32 então vc precisa importar um activex do
crystal report
para o seu Delphi.


Em 01/04/08, Paulo Pontes [EMAIL PROTECTED] escreveu:

   fala galera,

 como faço para rodar um relatório do Crystal no Delphi 2005 Win32... ou só
 é
 possível mesmo com WinForms...

 valeu!

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

 



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



Re: [delphi-br] Order by por mais de um campo?

2008-03-27 Por tôpico Açaí
basta separar os campos por virgula

datamodule3.IBQ_Agenda_Salao.SQL.Add('order by DATA, HORARIO_INICIO');


Em 26/03/08, Vicente Alves [EMAIL PROTECTED] escreveu:


 BOA TARDE A TODOS!

 Tenho uma consulta que ordena desta maneira:

 datamodule3.IBQ_Agenda_Salao.SQL.Add('order by DATA');

 como faço pra ela ordenar ao mesmo tempo por HORARIO_INICIO ??

 DELPHI 7

 OBRIGADO!!!
 __
 Confira vídeos com notícias do NY Times, gols direto do Lance,
 videocassetadas e muito mais no MSN Video!
 http://video.msn.com/?mkt=pt-br

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

 



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



Re: [delphi-br] Problema com Instrução SQL!!

2008-01-31 Por tôpico Açaí
A sua instrução esta errada, tente da seguinte forma:

QueryCadcliente.close;
QueryCadcliente.sql.clear;
//forma 1
  queryCadCliente.sql.add('Select MAX(COD_CLIENTE) Maximo from CLIENTE');
  Edit1.tex := inttostr(QueryCadClyente.fieldbyname('MAX').asInteger+1);

//forma 2   queryCadCliente.sql.add('Select MAX(COD_CLIENTE) from CLIENTE');
  Edit1.tex := inttostr(QueryCadClyente.fields[0].asInteger+1);





Em 30/01/08, rafaelpinto19 [EMAIL PROTECTED] escreveu:



 Estou desenvolvendo um programa e no Form de Cadastro de Cliente no
 Campo Código do CLiente quero que apareça o código automaticamente
 através da Generator que eu Criei no Banco e estou usando essa sintaxe:

 QueryCadcliente.close;
 QueryCadcliente.sql.clear;
 queryCadCliente.sql.add('Select MAX(COD_CLIENTE) from CLIENTE');
 Edit1.tex := inttostr(QueryCadClyente.fieldbyname('MAX').asInteger+1);

 Sendo que sempre quando mando exibir o Código do Cliente, da erro e
 me volta essa Menssagem  QueryCadCliente: Field 'max'not found.
 Porque dá esse erro?? Maxnão é uma instrução SQL?? Eu usu Interbase
 e SQL Dinâmico.
 Obrigado.

 



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