FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Touch Program
Posts: 310
Joined: Mon Oct 10, 2005 05:10 AM
Touch Program
Posted: Wed Aug 06, 2014 09:34 AM

Hi All

I have compiled the touch.prg but whn I try to run the program I get the following error.

Time from start: 0 hours 0 mins 2 secs
Error occurred at: 08/06/14, 17:31:21
Error description: Error BASE/1004 Message not found: TBTNFLAT:DEFCONTROL
Args:
[ 1] = O TBTNFLAT

Using FWH14.4 Harbour 3.2 MSVC

Regards

Colin

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Touch Program
Posted: Thu Aug 07, 2014 02:27 AM

Colin,

Do you use a modified dialog.prg ?

Please check that inside dialog.prg you have the METHOD DefControl(), thanks

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 310
Joined: Mon Oct 10, 2005 05:10 AM
Re: Touch Program
Posted: Thu Aug 07, 2014 02:48 AM

Hi Antonio

I have not modified any dialog.prg - I have only compiled the touch program that comes with FWH 14.04

Regards

Colin

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Touch Program
Posted: Thu Aug 07, 2014 04:07 AM

Colin,

In Class TBtnFlat line 83 please comment this line:

// oWnd := Self

that should solve the error. Anyhow I have just been comparing Class TBtnFlat and others related to touch.prg example, and there are lots of changes between version 14.04 and 14.07, so if you plan to use touch.prg source code, then you should consider to upgrade to FWH 14.07, thanks

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion