GARANTIR DESCONTO

Fórum Formulario ( Resize ) ?????? #202329

20/12/2003

0

Delphi

Pessoal eu montei uma funcao que retorna a quantidade de combustivel no tanque e mostra num Gauge..Mas ele so Mostra mesmo quando eu minimizo o formulario e maxmizo;


procedure TfrmPrincipal.Timer1Timer(Sender: TObject);
begin
Label4.caption := TimetoStr(Atualiza_tanque(Dados.AdoQuery1,frmPrincipal.Gauge2,frmPrincipal.gauge3,frmPrincipal.Gauge1));
frmPrincipal.Resize;
end;


Como Faço.

Grato


Michel

Michel

Responder

Posts

20/12/2003

Fórum Vini

Olá,
tenta assim:
procedure TfrmPrincipal.Timer1Timer(Sender: TObject);
begin
  Label4.caption :=  TimetoStr(Atualiza_tanque(Dados.AdoQuery1,frmPrincipal.Gauge2,frmPrincipal.gauge3,frmPrincipal.Gauge1));
  Gauge1.Repaint;
end;


Espero ter ajudado.
Vinicius.


Responder

Gostei + 0

20/12/2003

Michel

Nao vai .vini. ja tinha tentado cara..O q sera q acontece hein... pq se por acaso estou com o programa aberto e word ( exemplo ) se eu alternar de tela passando de um para outro ai ele da certo... :cry:


Responder

Gostei + 0

20/12/2003

Fórum Vini

Ae,
Se você quiser me passar o projeto eu dou uma olhada.

Espero ter ajudado.
Vinicius.


Responder

Gostei + 0

20/12/2003

Michel

Vini O meu formulario tava como (fsMDIForm) ai eu coloquei (fsNormal) vc sabe pq acontece isso ??

Valeu Cara

Obrigado pela Atenção !


Responder

Gostei + 0

20/12/2003

Fórum Vini

Michel,
é muito estranho, mas devem ser aquelas coisas que só a Microsoft faz por você...

:lol:


Responder

Gostei + 0

21/12/2003

Michel

É isso ai !

Valeu Galera


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar