Como saber o Tamanho (Em Mil�metros) de uma String Formatada

Question

Tenho uma String Formatada e preciso saber o tamanho em Mil�metros que ela representa ... o problema � que a fonte n�o pode ser Fixa, tipo, supondo que eu vou emitir uma listagem no Word de Produto e ...

Massuda · Answer

Assumindo que voc� tem acesso ao Canvas onde o texto vai ser escrito, o tamanho da string �...

var
  TamanhoEmPixels: Integer;
...
  TamanhoEmPixels := OCanvas.TextWidth(�...seu texto...�);

...sendo que o tamanho � dado em pixels. No seu [url=http://forum.clubedelphi.net/viewtopic.php?t=64055]outro t�pico[/url] (converter milimetros para pixels) est� a explica��o de como converter de pixels para milimetros.

Juliopedroni · Answer

Usei a Canvas.TextWidth(Edit1Text) e ele me retornou em Pixels o resultado, s� que a�, reduzi o tamanho da fonte do Edit1 e para o mesmo texto continuoi dando o mesmo resultado, n�o deveria retornar um valor menor ?

Massuda · Answer

[quote:d8a4dcecb1=�juliopedroni�]Usei a Canvas.TextWidth(Edit1Text) e ele me retornou em Pixels o resultado, s� que a�, reduzi o tamanho da fonte do Edit1 e para o mesmo texto continuoi dando o mesmo resultado, n�o deveria retornar um valor menor ?[/quote:d8a4dcecb1]Se voc� usou isso dentro de uma procedure/function de um form, o Canvas que voc� usou � o do form e n�o o canvas do edit.Para obter o tamanho de um texto dentro de um edit fa�a algo assim:[code:1:d8a4dcecb1]var  Canvas: TControlCanvas;  TamanhoDoTexto: Integer;...  Canvas := TControlCanvas.Create;  try    Canvas.Control := Edit1;    TamanhoDoTexto := Canvas.TextWidth(Edit.Text);  finally    Canvas.Free;  end;[/code:1:d8a4dcecb1]O canvas do edit � mais complicado de acessar porque o edit � um controle padr�o do Windows, ou seja, � inteiramente implementado pelo Windows e n�o pela VCL....

Mahdak · Answer

julio, da uma olhada nesse topico://forum.clubedelphi.net/viewtopic.php?t=39374...

F�rum Como saber o Tamanho (Em Mil�metros) de uma String Formatada #284390