problema con unit
Publicado por Diego (85 intervenciones) el 21/01/2003 15:21:25
Hola
Estoy tratando de dejar en una unit algunos procedimientos públicos, por ejemplo, uno que pinta alternadamente las filas de un TStringGrid con dos colores distintos. Si declaro ese procedimiento en un formulario no hay problema y funciona, pero si lo hago en una unit la siguiente línea me produce un error:
Windows.DrawText(Grilla.Canvas.Handle, PChar(Texto), Length(Texto),Rect, (DT_NOCLIP OR DT_NOPREFIX OR DT_SINGLELINE OR DT_LEFT OR DT_VCENTER));
El error es el siguiente:
Incompatible types: 'HDC' and 'QPainterH'
Como dije, si declaro este procedimiento en otra parte del programa me funciona, así que no sé qué podrá ser.
Gracias
Estoy tratando de dejar en una unit algunos procedimientos públicos, por ejemplo, uno que pinta alternadamente las filas de un TStringGrid con dos colores distintos. Si declaro ese procedimiento en un formulario no hay problema y funciona, pero si lo hago en una unit la siguiente línea me produce un error:
Windows.DrawText(Grilla.Canvas.Handle, PChar(Texto), Length(Texto),Rect, (DT_NOCLIP OR DT_NOPREFIX OR DT_SINGLELINE OR DT_LEFT OR DT_VCENTER));
El error es el siguiente:
Incompatible types: 'HDC' and 'QPainterH'
Como dije, si declaro este procedimiento en otra parte del programa me funciona, así que no sé qué podrá ser.
Gracias
Valora esta pregunta


0