Memo - Valores Na Horizontal

[Paulo Nobre]

Digitando

memo2.Lines.Add(IntToStr(2));

memo2.Lines.Add(IntToStr(3));

por exemplo 2 e 3 aparecerão na vertical.

Como faria para que 2 e 3 aparecessem na horizontal e eseparados por vírgulas?

Além disso, como faria, caso o memo tivesse muitos valores, que eles aparecessem 40 em cada linha, por exemplo.

obrigado

[Graymalkin]

Altere diretamente pela propriedade Text do mesmo. Exemplo:

memo2.text := memo2.text + IntToStr(2) + ', ' + IntToStr(3);

Sacou?

Abraços,

Graymalkin

[Paulo Nobre]

Saquei, mas como faço para controlar o tamanho da linha, para não ter que usar o scroll horizontal.

[Graymalkin]

O tamanho da linha vai ser a largura do Memo. Se você usar uma fonte onde os todos os caracteres tem um tamanho fixo (como a Courier New) poderá calcular a quantidade de caracteres que pode colocar na linha. Caso contrário, terá que usar uma API (GetTextExtentPoint32) que calcula, em pixels, o tamanho de cada caracter (ou de uma string) e daí completar com espaços para tornar as linhas uniformes (essa segunda opção pode dar um certo trabalhinho, e nunca usei essa API no Delphi [só no VB]).

Abraços,

Graymalkin

[Paulo Nobre]

Obrigado GrayMalkin,

Ficou tudo claríssimo!!