FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour FWH2307
Posts: 195
Joined: Sat Oct 22, 2005 01:17 PM
FWH2307
Posted: Tue Aug 08, 2023 07:52 PM

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

Saludos

Oscar

Fwh 23.10, bcc55

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FWH2307
Posted: Tue Aug 08, 2023 08:21 PM
Estimado Oscar,

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

gracias por preguntar y asi podemos solucionarlo :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FWH2307
Posted: Tue Aug 08, 2023 08:30 PM
Aqui lo tienes:

testvie1.prg
Code (fw): Select all Collapse
#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 (fw): Select all Collapse
#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"
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 195
Joined: Sat Oct 22, 2005 01:17 PM
Re: FWH2307
Posted: Tue Aug 08, 2023 08:43 PM

Estimado Antonio

Gracias

Saludos

Oscar

Fwh 23.10, bcc55

Continue the discussion