Page 1 of 1

FWH2307

PostPosted: Tue Aug 08, 2023 7:52 pm
by EASYSOFT
Buenas tardes.

He instalado la versión 2307 de fwh esty buscando en la carpeta de samples este prg testvie1.prg
y no lo encuentro.

Saludos

Re: FWH2307

PostPosted: Tue Aug 08, 2023 8:21 pm
by Antonio Linares
Estimado Oscar,

Parece que se nos ha pasado incluirlo. Te lo copiamos aqui en cuanto lo localicemos

gracias por preguntar y asi podemos solucionarlo :-)

Re: FWH2307

PostPosted: Tue Aug 08, 2023 8:30 pm
by Antonio Linares
Aqui lo tienes:

testvie1.prg
Code: Select all  Expand view
#include "FiveWin.ch"

function Main()
 
   local oWnd, oLvw, nOption := 1, oImageList

   DEFINE WINDOW oWnd TITLE "ListView Test"

   DEFINE IMAGELIST oImageList SIZE 32, 32

   oImageList:AddIcon( "console" )
   oImageList:AddIcon( "form" )
   oImageList:AddIcon( "library" )

   @ 1, 1 LISTVIEW oLvw SIZE 300, 300 PROMPTS "One" + CRLF + "ఒకటి", ;
                  "Two" + CRLF + "రెండు", "Three" + CRLF + "మూడు";
      ACTION MsgInfo( nOption )

   oLvw:SetImageList( oImageList )

   ACTIVATE WINDOW oWnd
   
   oImageList:End()

return nil


testvie1.rc
Code: Select all  Expand view
#include "..\include\winapi.ch"

#ifndef _64_
   1 24 "WinXP\WindowsXP.Manifest"
#endif

#ifdef _64_
   1 24 "WinXP/WindowsXP.Manifest64"
#endif

form ICON "../icons/dialog2.ico"
library ICON "../icons/libs.ico"
console ICON "../icons/msdos.ico"

Re: FWH2307

PostPosted: Tue Aug 08, 2023 8:43 pm
by EASYSOFT
Estimado Antonio

Gracias