CoverFlow / Flipview

Post Reply
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

CoverFlow / Flipview

Post by Otto »

Hello Antonio,
Can you please adapt “CoverFlow – class” to simulate
METRO - Flipview control.
Thanks in advance
Otto

Image

Image

Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
nageswaragunupudi
Posts: 8017
Joined: Sun Nov 19, 2006 5:22 am
Location: India
Contact:

Re: CoverFlow / Flipview

Post by nageswaragunupudi »

Nice !
Can be done even without relying on coverflow class.
I am interested in knowing how do you propose to use this in a business application?
Regards

G. N. Rao.
Hyderabad, India
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: CoverFlow / Flipview

Post by Otto »

Dear Mr. Rao,

for example a catalog of parts, products, cookbook, etc.

Best regards,
Otto

Image

Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: CoverFlow / Flipview

Post by Otto »

Any news?
Best regards,
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
nageswaragunupudi
Posts: 8017
Joined: Sun Nov 19, 2006 5:22 am
Location: India
Contact:

Re: CoverFlow / Flipview

Post by nageswaragunupudi »

Suggested approach for the grid in the Asian Cuisine:

Code: Select all

#include "FiveWin.Ch"
#include "xbrowse.ch"
#include "hbcompat.ch"


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

function Main()

   local oWnd, oBrw, oFont, oBrush, aData
   local n, m, k, cPath, aDir, aRow

   SET DATE ITALIAN
   SET CENTURY ON

   XBrNumFormat( 'A', .t. )

   aData       := {}

   cPath       := "c:\fwh\bitmaps\pngs\"
   aDir        := Directory( cPath + "i*.png" )

   k           := 1
   for n := 1 to Len( aDir ) step 3
      aRow     := {}
      for m := 0 to 2
         if k <= Len( aDir )
            AAdd( aRow, cPath + aDir[ n + m, 1 ] )
            AAdd( aRow, aDir[ n + m, 1 ] )
         else
            AAdd( aRow, nil )
            AAdd( aRow, nil )
         endif
         k++
      next
      AAdd( aData, aRow )
   next

   DEFINE FONT oFont NAME "Segoe UI" SIZE 0,-14
   DEFINE BRUSH oBrush FILE "c:\fwh\bitmaps\hires\office.bmp" STRETCH

   DEFINE window oWnd BRUSH oBrush
   oWnd:SetFont( oFont )

   @ 100,100 XBROWSE oBrw SIZE 500,-100 PIXEL OF oWnd ;
      DATASOURCE aData AUTOCOLS NOBORDER ;
      COLOR CLR_WHITE,RGB(77,117,225)

   WITH OBJECT oBrw
      :lHeader             := ;
      :lRecordSelector     := ;
      :lHScroll            := ;
      :lVScroll            := .f.
      :nDataStrAligns      := AL_CENTER
      :nDataBmpAligns      := AL_CENTER

      for n := 1 to Len( :aCols ) STEP 2
         :aCols[ n ]:cDataType   := 'F'
         :aCols[ n ]:nWidth      := 100
      next
      for n := 2 to Len( :aCols ) STEP 2
         :aCols[ n ]:bClrStd     := { || { CLR_WHITE, RGB( 115,23,26 ) } }
      next
      for n := 1 to Len( :aCols ) STEP 2
         :aCols[ n ]:SetColsAsRows( n, n + 1 )
      next

     //
      :CreateFromCode()  // omit for resource
   END

   ACTIVATE WINDOW oWnd MAXIMIZED
   RELEASE FONT oFont
   RELEASE BRUSH oBrush

return nil

//----------------------------------------------------------------------------//
Image

Final appearance depends on the choice of images, fine tuning of browse parameters like cell size, fonts, colors, etc.
Regards

G. N. Rao.
Hyderabad, India
User avatar
Eoeo
Posts: 222
Joined: Mon Jun 04, 2012 12:00 pm

Re: CoverFlow / Flipview

Post by Eoeo »

good ...but if it'll be transparent perhaps it's good!!!
User avatar
nageswaragunupudi
Posts: 8017
Joined: Sun Nov 19, 2006 5:22 am
Location: India
Contact:

Re: CoverFlow / Flipview

Post by nageswaragunupudi »

Eoeo wrote:good ...but if it'll be transparent perhaps it's good!!!
Like this ?

Image
Regards

G. N. Rao.
Hyderabad, India
User avatar
Eoeo
Posts: 222
Joined: Mon Jun 04, 2012 12:00 pm

Re: CoverFlow / Flipview

Post by Eoeo »

ahahahahahaha yes :)
Post Reply