Rafael Marques wrote:

> Bom Dia pessoal
> 
> alguem sabe como formatar textos em celulas de uma StringGrid!?!? eu gostaria 
> de formatar o alinhamento e a fonte do texto.

Estou fazendo isto escrevendo direto no canvas do stringgrid. Funciona 
legal. Veja uns exemplos de código que você pode adaptar para o que você 
precisa:

procedure TPressMVPDrawGridInteractor.DrawCell(
   Sender: TPressMVPGridView; ACanvas: TCanvas;
   ACol, ARow: Integer; ARect: TRect; State: TGridDrawState);
var
   VAlignment: TAlignment;
   VText: string;
begin
   if ACol = -1 then
   begin
     if (ARow = -1) or (Owner.Model.Count = 0) then
       VText := ''
     else
       VText := InttoStr(ARow + 1);
     VAlignment := taRightJustify;
   end else if ARow = -1 then
   begin
     VText := Owner.DisplayHeader(ACol);
     VAlignment := Owner.HeaderAlignment(ACol);
   end else
   begin
     VText := Owner.Model.DisplayText(ACol, ARow);
     VAlignment := Owner.Model.TextAlignment(ACol);
   end;
   DrawTextRect(ACanvas, ARect, VText, VAlignment);
end;


procedure TPressMVPDrawItemsInteractor.DrawTextRect(
   ACanvas: TCanvas; ARect: TRect; const AText: string; AAlignment: 
TAlignment);
var
   VTop: Integer;
   VLeft: Integer;
begin
   VTop := ARect.Top + 1;
   case AAlignment of
     taLeftJustify:
       VLeft := ARect.Left + 2;
     taRightJustify:
       VLeft := ARect.Right - ACanvas.TextWidth(AText) - 2;
     else {taCenter}
       VLeft := (ARect.Left + ARect.Right - ACanvas.TextWidth(AText)) div 2;
   end;
   ACanvas.TextRect(ARect, VLeft, VTop, AText);
end;

--
João Morais


-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 

Responder a