OpenEuphoria

Re: Caret cursor in Win32Lib: how do I use it?

• Posted by Kat <KSMiTH at PELL.NET> Jan 14, 2000
• 501 views

Just a note: if i run Borland's Turbo Pascal for win3.x in win95, it also
changes the cursor blink rate, speeding it up at least 50%. This isn't
really a problem, since i use the pascal only in writing dos code anymore,
since discovering Eu.

Kat

----- Original Message -----
From: Allen Soard <esp-software at MAIL.HYPERMART.NET>
To: <EUPHORIA at LISTSERV.MUOHIO.EDU>
Sent: Friday, January 14, 2000 8:27 AM
Subject: Re: Caret cursor in Win32Lib: how do I use it?


> Dan,
> If I recall your situation, your using a custom
> component for a textfield.  The caret functions
> only work with components designed for text on a
> lower level.  However, you should be able to
> sample the system caret rate for use in your
> timer. That way it matches the rest of your
> system.  In short it looks like reinventing the
> wheel.
>
> -E.Allen Soard
> E.S.P. Software
>
> ---- Begin Original Message ----
>  From: Dan B Moyer <DANMOYER at PRODIGY.NET>
> Sent: Thu, 13 Jan 2000 22:30:28 -0800
> To: EUPHORIA at LISTSERV.MUOHIO.EDU
> Subject: Caret cursor in Win32Lib: how do I use
> it?
>
> David,
>
> I can't get the caret based cursor to do anything
> in my program; when I use
> the
> following, it doesn't make any cursor in my
> program, just changes the blink
> rate of cursors in other window programs like
> Outlook Express.  What am I
> doing wrong?
>
> Dan Moyer
>
> -- "caret" based cursor:
> atom CaretReturn
> constant MyCursor = 1 -- ?? just pick a number ??
>
> CaretReturn = c_func(
> xCreateCaret,{MyCursor,0,5,20})-- 0 is for bmp?
> CaretReturn = c_func( xSetCaretBlinkTime,{300})
>
> CaretReturn = c_func( xShowCaret,{MyCursor})
> CaretReturn = c_func( xSetCaretPos,{50,50})--
> tried various numbers here,
> --    from  10,10  to 100,100
>
> ---- End Original Message ----
>
>
> Bookmark the HyperMart Small Business Center. All the tools you need to
> succeed!
> http://www.hypermart.net/center/
>