Fórum Quebra de linha no dbgrid #406519

13/08/2011

0

Olá pessoa,   Estou precisando que no dbgrid aparceça uma coluna com quebra de linha para que apareça assim:   Rua Desembargador Moreira 55 ap.202

Abaixo segue uma dica que achei para quebrar a linha do DBGRID, mas so quebrou a linha do TITULO do DBGRID, não quebrou as linhas do dbgrid onde aparecem os dados da tabela. Será que tem como adaptar para quebrar tambem a linha do dbgrid?

Segue a dica:

Código:
type
TMyDBGrid = class(TjvDBGrid)
published
property DefaultRowHeight;
end;


Depois no evento OnCreate do form {para aumentar o tamanho da linha do dbgrid}
Código:
begin
  TMyDBGrid(jvDBGrid1).DefaultRowHeight := 50;
end;


E ai no evento ondrawColumnCell o codigo
Código:
Var
R : TRect;
begin
  R := Rect;
  Dec(R.Bottom,0);
  If Column.Field = dm.zqAuditoriaTipoMovimento Then
  Begin
    jvDBGrid1.Canvas.FillRect(Rect);
    DrawText(jvDBGrid1.Canvas.Handle,PChar(dm.zqAuditoriaTipoMovimento.AsString),Length(dm.zqAuditoriaTipoMovimento.AsString),R,DT_WORDBREAK);
End; 


Obs: Troque o jvDBGrid pelo componente grid que vc usa ai.



Grato

Luiz Carlos
Luiz Carlos

Luiz Carlos

Responder

Posts

16/08/2011

Wilson Junior

De uma olhada neste link e procure por MEMO http://forum.devmedia.com.br/viewtopic.php?p=78678

Espero ter colaborado.
Responder

Gostei + 0

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

Aceitar