TMemo

Delphi

24/03/2005

Oi,

Tenho um texto que insiro em um MEMO em tempo de execução ... mas com isso surge um problema:
>> A altura do MEMO!! Preciso calcular a altura dele, após inserir este texto (tudo em tempo de execução) e, dependendo da fonte escolhida pelo usuário a altura do MEMO não satisfaz (ou fica gde demais ou fica pequeno demais)!!!

O que faço? ** Se tivesse um AUTOSIZE, ou algo parecido... **

Obrigada! :roll:


Fatima

Fatima

Curtidas 0

Respostas

Nildo

Nildo

24/03/2005

Olá!

Tenta colocar esse código no OnChange do memo:

   Canvas.Font := TMemo( Sender ).Font;
   TMemo( Sender ).Height := Canvas.TextHeight( ´ ´ ) * ( TMemo( Sender ).Lines.Count + 1 );



GOSTEI 0
POSTAR