Page 2 of 9

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Sun Jun 12, 2011 3:50 am
by RAMESHBABU
Hi Carles...,

Congratulations.

Your work is simply superb. Specially the designer.

Regards,

- Ramesh Babu

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Sun Jun 12, 2011 9:44 am
by Andrés González
Carles un bon treball...

Como todo lo tuyo muy bueno voy a terminar de mirarlo y te comento cosas.

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Mon Jun 13, 2011 6:51 am
by Carles

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Mon Jun 13, 2011 9:40 am
by MdaSolution
hay un error al compilar
Error: Unresolved external '_HB_FUN___CLSUNLOCKDEF'
Error: Unresolved external '_HB_FUN_FW_GT'
Error: Unresolved external '_HB_FUN___CLSLOCKDEF'

Que tengas un buen día,
Domenico

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Tue Jun 14, 2011 6:18 am
by Andrés González
Cosas que echo en falta:

1) La posibilidad de incorporar lineas, solo hay la posibilidad de poner un box.
2) La posibilidad de incorporar reglas tanto vertical como horizontal, si no tienes la clase la busco y te la mando pero está publicada en el foro.

Bueno Carles voy a ver lo que has incorporado en la nueva versión y te comento.

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Tue Jun 14, 2011 6:36 am
by Carles
Andres,

1) La posibilidad de incorporar lineas, solo hay la posibilidad de poner un box.


Pueba la v.0353...

2) La posibilidad de incorporar reglas tanto vertical como horizontal, si no tienes la clase la busco y te la mando pero está publicada en el foro


A mi entender, esto forma parte mas de la estética. En la parte inferior ya te marca la posicion en pantalla. Todo estos puntos, lo haremos en la segunda fase :-)

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Tue Jun 14, 2011 8:08 am
by Andrés González
Ok Carles, tengo un error que no se como resolver, ademas es algo raro:

Operacion: TMENU:L2010.
Description: Message not found.


Supongo que esto es con las nuevas versiones. Pero lo bueno es que el programa no se rompe, pero no me deja seguir. El diseñador si me lo deja abrir. El error sale cuando le das a ejecutar el reporte. Lo raro es que no veo en ninguna parte que utilices nada con 2010 todo está en 2007.

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Tue Jun 14, 2011 8:09 am
by mgsoft
Enhorabuena por el trabajo !!!!!!!!!

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Tue Jun 14, 2011 8:38 am
by Carles
Andres,

Son las datas nuevas q estan en la nueva version 11.05. Son usadas en el RPreview. Se me ocurre q quizas podrias enlazar tu preview.prg antes de la libreria...

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Tue Jun 14, 2011 10:26 am
by Andrés González
Ok, luego lo miro que estoy un poco liado. Una cosa más, la idea es ponerlo incorporado junto a mis programas como diseñador de reportes. La cosa es que el diseñador está en inglés, hay posibilidad de cambiarlo a castellano, catalan o cualquier otro idioma. Creo que esa parte del código no lo vas a liberar, pero hay posibilidad que elijamos el idioma.

Otra cosa, es compatible con xharbour, te lo digo porque de momento solo lo he enlazado con harbour?

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Tue Jun 14, 2011 10:41 am
by Carles
Andres,

Creo que esa parte del código no lo vas a liberar


Todo el codigo estara disponible dentro de poco

pero hay posibilidad que elijamos el idioma.


Los literales son strings dentro del fichero rc. Se podra tener en los idiomas q se vayan poniendo en el rc

es compatible con xharbour


Estoy fijando el concepto en harbour. Una vez estabilizado, miraremos q sea tambien compatible con xH.

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Tue Jun 14, 2011 12:36 pm
by Andrés González
Moltes gracies Carles, ets un geni. Con aportes como este mejoramos mucho el desarrollo.

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Wed Jun 15, 2011 3:12 pm
by Carles
Hola,

Nueva version v.0355 - Control dinamico de imagenes en seccion [EDITED]

https://code.google.com/p/fivewin-contr ... akechanges

Podemos facilmente controlar las imagenes en el listado siguiendo siempre la misma pauta -> ::Data( ID, Valor ). En Este caso <Valor> sera la imagen q queramos imprimir

Image

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Fri Jun 17, 2011 5:45 am
by Andrés González
Carles, un parell de cosetes més. Se puede emplear el reporter para diseñar etiquetas. En caso afirmativo puedes incluir un ejemplo para ver como se hace. Y, también se puede poner de fondo un grid de líneas para que nos sirvan de referencia.
Image

Uploaded with ImageShack.us

Re: MyRpt - Diseñador de Reportings - En desarrollo :-)

PostPosted: Fri Jun 17, 2011 11:54 am
by MdaSolution
por favor llamar la cuadrícula en el informe utiliza este

Code: Select all  Expand view

//----------------------------------------------------------------------------//
#pragma BEGINDUMP
#include <Windows.h>
#include <HbApi.h>

//----------------------------------------------------------------------------//


HB_FUNC( DRAWGRID ) // hWnd, hDC, @cPS, wGridX, wGridY
{
   WORD wRow, wCol;
   HDC hDC = ( HDC ) hb_parnl( 2 );
   PAINTSTRUCT * ps = ( PAINTSTRUCT * ) hb_parc( 3 );
   WORD wGridX = hb_parni( 4 );
   WORD wGridY = hb_parni( 5 );
   RECT rc;
   WORD wWidth, wHeight;

   HPEN hOldPen;
   HPEN hGray   = CreatePen( PS_SOLID, 0, RGB( 210, 210, 210 ) );
   HPEN hGray2  = CreatePen( PS_SOLID, 0, RGB( 230, 230, 230 ) );

   hOldPen = ( HPEN ) SelectObject( hDC, hGray );

   GetWindowRect( ( HWND ) hb_parnl( 1 ), &rc );
   wWidth  = rc.right - rc.left + 1;
   wHeight = rc.bottom - rc.top + 1;

   for( wRow = 0; wRow <= wHeight; wRow += wGridX )
    {
        MoveTo( hDC, 0, wRow );
        LineTo( hDC, wWidth, wRow ) ;
    }

   for( wCol = 0; wCol <= wWidth; wCol += wGridY )
    {
        MoveTo( hDC, wCol, 0 );
        LineTo( hDC, wCol, wHeight ) ;
    }

   SelectObject( hDC, hGray2 );

   for( wRow = wGridX/2; wRow <= wHeight; wRow += wGridX )
    {
        MoveTo( hDC, 0, wRow );
        LineTo( hDC, wWidth, wRow ) ;
    }

   for( wCol = wGridY/2; wCol <= wWidth; wCol += wGridY )
    {
        MoveTo( hDC, wCol, 0 );
        LineTo( hDC, wCol, wHeight ) ;
    }

   SelectObject( hDC, hOldPen );
   DeleteObject( hGray );
   DeleteObject( hGray2);

         //SetPixel( hDC, wCol, wRow, 0 );
}


//----------------------------------------------------------------------------//

#pragma ENDDUMP    */