Bom dia Alisson!!

aproveitando a dica.  Tem como alinhar tb alinhar à direita (ou centralizado) o 
texto de células em especifico???

mto obrigado


  ----- Original Message ----- 
  From: Alisson Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 21, 2007 2:54 PM
  Subject: Re: [delphi-br] Boa noite galera


  Renato,

  Coloque o título da mensagem mais condizente com o assunto. Ao invés de 'Boa 
noite galera', seria melhor colocar algo como 'Mudar cor da fonte de 
StringGrid'. Bem, para resolver o seu problema coloque o seguinte código no 
evento OnDrawCell:

  procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
  begin
  if (ACol = 1) then
  begin
  StringGrid1.Canvas.Font.Color := clBlack;
  StringGrid1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, 
StringGrid1.Cells[ACol, ARow]);
  end
  else if (ACol = 2) then
  begin
  StringGrid1.Canvas.Font.Color := clRed;
  StringGrid1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, 
StringGrid1.Cells[ACol, ARow]);
  end;
  end;

  [As partes desta mensagem que não continham texto foram removidas]



   


------------------------------------------------------------------------------
  Esta mensagem foi verificada pelo E-mail Protegido Terra.
  Scan engine: McAfee VirusScan / Atualizado em 20/02/2007 / Versão: 5.1.00/4967
  Proteja o seu e-mail Terra: http://mail.terra.com.br/ 


[As partes desta mensagem que não continham texto foram removidas]

Responder a