Ver Mensaje Individual
  #2  
Antiguo 08-02-2005
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.264
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por Tecnic2
Hola a todos, quisiera saber cómo lo puedo hacer para que en un DBGrid me aparezca el contenido de un campo de tipo memo, ya que en éstos momentos en lugar de salirme el contenido me sale la palabra "(MEMO)"
Puedes hacerlo de forma manual, o utilizando componentes que ya te lo solventen. Por ejemplo el Grid de las RxLib te lo hace de forma automática. Si deseas programarlo tú (porque no quieres instalar otros componetes, por ejemplo) debes hacerlo en el evento OnDrawColumnCell del DBGrid; Se trata de en ese evento repintar el texto de la celda y en lugar de lo que había utilizar el FieldMemo. Algo así:

Código Delphi [-]
   // Cadena del campo
   Str := TBlobField(Column.Field).AsString;
 ...
   ACanvas.TextRect(Rect, Left, Rect.Top + DY, Str);

Si te interesa ésta opción dilo y si tienes problemas intentaré exponerlo más detalladamente; Otra opción es buscar en los foros, porque seguro que algo se ha comentado ya.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita