Relogio

Question

Ol� lista... tenho um form que � um rel�gio e gostaria de saber se algum cilega sabe me informar como fa�o p/ quando eu alterar o tamanhoo do form, a fonte do relogio alterar tb... tipo form maior relogio maior e form menor relogio menor...
Obrigado
Pedro Leonardo

Celamar · Answer

Deixe propriedade ALIGN do seu Label (o que est� recebendo a hora) como alClient e no evento FormResize do Form fa�a:

procedure TForm1.FormResize(Sender: TObject);
begin
  label1.Font.Size := Trunc(label1.Width * 0.10 );
end;

Pleonardomv · Answer

legal, mas se mudar a altura (Height) nao acontece nada. Queria que fosse os dois  Height e Width, mas se n�o aparecer outra solu��o esta j� resolve.ObrigadoT+...

F�rum Relogio #292778