Go Back   Rhinocerus > Newsgroup > Newsgroup comp.lang.* 1 > Newsgroup comp.lang.xharbour

Reply
 
Thread Tools Display Modes
  #1 (permalink)  
Old 03-26-2008, 02:53 PM
Massimo Belgrano
Guest
 
Posts: n/a
Default Req_info ABOUT NEW MULTI_gt

How can i do a sample of using multigt?

ANNOUNCE HB_GT_SYS

REQUEST HB_GT_WIN
REQUEST HB_GT_WVT
REQUEST HB_GT_GUI
REQUEST HB_GT_CGI
REQUEST HB_GT_WVT_DEFAULT
FOR A=1 TO 4
CLEAR
? HB_GTVERSION(A)
? A
@ 1,1 get a
read
TONE( 200, 3)
INKEY( 5 )
NEXT A
Reply With Quote
Alt Today
Advertising
 
and become member of Rhinocerus
Standard Sponsored Links

  #2 (permalink)  
Old 03-26-2008, 04:05 PM
Massimo Belgrano
Guest
 
Posts: n/a
Default Re: Req_info ABOUT NEW MULTI_gt

On 26 Mar, 16:53, Massimo Belgrano <massimo.belgr...@gmail.com> wrote:
> How can i do a sample of using multigt?
>
> * * * ANNOUNCE HB_GT_SYS
>
> * * * REQUEST HB_GT_WIN
> * * * REQUEST HB_GT_WVT
> * * * REQUEST HB_GT_GUI
> * * * REQUEST HB_GT_CGI
> * * * REQUEST HB_GT_WVT_DEFAULT
> * * * * FOR A=1 TO 4
> * * * * *CLEAR
> * * * * ? HB_GTVERSION(A)
> * * * * ? A
> * * * * @ 1,1 get a
> * * * * read
> * * * * TONE( 200, 3)
> * * * * INKEY( 5 )
> * * * *NEXT A


ANNOUNCE HB_GT_SYS
REQUEST HB_GT_WIN
REQUEST HB_GT_WVT
REQUEST HB_GT_GUI
REQUEST HB_GT_CGI
REQUEST HB_GT_WVT_DEFAULT

function main
CLEAR
? HB_GTVERSION(0)
? HB_GTVERSION(1)
? A
@ 3,1 get a
read
TONE( 200, 3)
INKEY( 5 )

return

I can change the Gt Opening this sample with
SAMPLE //GTWIN
SAMPLE //GTWVT
SAMPLE //GTWIN
SAMPLE //GTCGI
SAMPLE //GTGUI

How can i change at runtime?
Reply With Quote
 
Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are Off
Pingbacks are Off
Refbacks are Off




All times are GMT. The time now is 07:08 AM.


Copyright ©2009

LinkBacks Enabled by vBSEO 3.3.0 RC2 © 2009, Crawlability, Inc.