Alinhamento de Coluna de um StringGrid

29/07/2003

0

Estou usando valores em um StringGrid, e gostaria q algumas colunas ficassem alinha a direita, como faço???

Marcelo
PS: Até agora a única maneira que encontrei é de deixar a fonte como
Courier e usar a função format, mas fico preso, não posso mudar
de fonte


Marcelolucena

Marcelolucena

Responder

Posts

29/07/2003

Joaomw

Caro Marcelo...

no evento OnDrawCell insira o seguinte código:

var TamTextoCel, CentralizaCel: Integer;
begin
with SeuGrid.Canvas do
begin
//Calcula o tamanho do Texto
TamTextoCel:= TextWidth(SGCalcSafras.Cells[ACol,ARow]);
//Calcula o espaço para escrever texto centralizado
CentralizaCel:= ((SGCalcSafras.ColWidths[ACol] div 2)-(TamTextoCel div 2));

if (ARow>2)
//Alinhado à Esquerda
then TextOut (Rect.Left + 2, Rect.Top + 1, SeuGrid.Cells[ACol,ARow] )
else
if (ARow<=2)
//Centraliza texto
then TextOut (Rect.Left + CentralizaCel, Rect.Top + 1, SeuGrid.Cells[ACol,ARow]);
//Alinhado à Direita
//else TextOut (Rect.Right - ((TamTextoCel)+2), Rect.Top + 1, SeuGrid.Cells[ACol,ARow] );
end;
end;

Caso tenha alguma dificuldade me comunique.
João Webber.


Responder

22/01/2023

Fundação Catarina

https://t.me/pump_upp - best crypto pumps on telegram
Make 1000% and more within 1 day, join channel @pump_upp !
Responder

14/04/2024

Fundação Catarina

A safe space for new acquaintances
Genuine Females
<a href=https://datesnow.life>Prime Сasual Dating</a>
Responder

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

Aceitar