![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#3
|
|||
|
|||
|
Ajustes por ejecutar en OnDrawColumnCell.
Hola Marto,
Tienes razón. No 'me' funciona. A mí tampoco me ha fallado nunca trucomania, por estoy seguro de que hay algo que no estoy haciendo bien. Lo ha utilizado en el OnDrawDataCell y en OnDrawColumnCell con ajustes: var Grid : TStringGrid; Texto : String; Rectangulo : TRect; begin Rectangulo:=Rect; Grid := TStringGrid(Sender); if Column.Field.IsBlob then begin Grid.Canvas.FillRect(Rect); Texto := Column.Field.AsString; DrawText( Grid.Canvas.Handle, PChar(Texto), StrLen(PChar(Texto)), Rectangulo, DT_WORDBREAK); end; end; El resultado en los dos eventos es el mismo, aparece la palabra (MEMO) en el campo del grid. ¿Puedes orientarme cual puede ser el problema? Muchas gracias.
__________________
Setry2 Eres un bit? www.lafesta.com |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|