topic-14357

yardenmo

Posts: 33

Joined: Tue Aug 12, 2008 07:08 AM

FONT samples
Posted: Fri Jan 23, 2009 12:57 PM

Hi,

Where can I find a sample for using FONTS?

Thanks,
Moshe Yarden

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FONT samples
Posted: Sat Jan 24, 2009 04:55 AM

Moshe,

Here you have a working example:
testfont.prg

Code: Select all Collapse

// FiveWin for Pocket PC - Testing fonts

#include "FWCE.ch"

function Main()

   local oWnd, oSay1, oSay2, oFont1, oFont2
   
   DEFINE FONT oFont1 NAME "Verdana" SIZE 0, -17

   DEFINE FONT oFont2 NAME "Ms Sans Serif" SIZE 0, -10
   
   DEFINE WINDOW oWnd TITLE "TestFont"
   
   @ 1, 1 SAY oSay1 PROMPT "Hello" FONT oFont1 SIZE 80, 20

   @ 3, 1 SAY oSay2 PROMPT "World" FONT oFont2 SIZE 80, 20
   
   ACTIVATE WINDOW oWnd ;
      ON CLICK MsgInfo( "Click!" ) ;
      VALID MsgYesNo( "Want to End ?" )
   
return nil

Also you may review FWPPC\samples\Test2.prg and Tutor05.prg

regards, saludos

Antonio Linares
www.fivetechsoft.com

yardenmo

Posts: 33

Joined: Tue Aug 12, 2008 07:08 AM

Re: FONT samples
Posted: Sun Jan 25, 2009 06:07 AM

Thanks. I've tried it, and it works nice.

FiveTech Support Forums

Continue the discussion