FiveTech Software tech support forums

Günther

I place this at the top of my Main program :



This globally sets all fields to insert rather to overstrike .. a bit clumsy, but it works.

Rick Lipkin

... Even in a Unicode application, if CHRGRP is specified as CHR_ANSI, that GET behaves exactly like in a normal ANSI application, i.e., insert/overstrike modes work and all picture clauses work, but input is restricted to ANSI characters and Unicode characters are rejected.

When CHRGRP is CHR_ANY ...

Please discard my previous message. It looks to me more as an ::oGet:Insert() and ::oGet:OverStrike() issue

going to do some more tests

Rao

This is an important topic for many developers .. a GREAT Solution!

Thank You
Rick Lipkin

Mr Rick

Please set TGet():lChangeCaret := .f. somewhere towards the beginning of your Main() function.

You will see only the Thin Caret in all Gets whether in Insert Mode or OverWrite Mode.

Thank you for your code .. what I am trying to do is to make the insert block just a normal cursor line .. and the oHand Cursor does not effect that

Rick Lipkin

// testget3.prg Model.#include "fivewin.ch"function main()   FromCode()   //FromrES() return NilFunction FromCode()   local oDlg   local oGet1, oGet2, oGet3, oGet4   local cVar1, cVar2, cVar3, cVar4, oHand  &nbsp ...

Rao

I am just getting back to this topic and I approve of the Insert Behavoir, unfortunitly, the cursor is too fat. I have searched the forums and found several topics on this

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=21995&hilit=set+cursor

However, is there a global cursor setting ...

Personally I too prefer insert mode.
But there is nothing like default for xbrowse-get or independent get. Get just follows the existing setting of insert mode set by programmer or user.

So, please just use Set( _SET_INSERT, .t. ) and then all subsequent xbrowse-gets and independent gets work in ...

Rao

I know we have talked about this before, but to be compatible with Excel and many other Microsoft products, it would be nice if the Field edit would by default be in Insert Mode rather than over-strike.

I just opened Excel and went to edit a cell and moved my cursor back a few characters and ...

... this is very routine processing.

My problem is, applying that key's value to the contents of the beginning of the edit field.
I can use the OVERSTRIKE method of the oget:oget object to "preserve" the key pressed and apply it to the current contents of the oget:oget (which is really a Harbour get ...

... to modify xBrowse to do two things ..

1- On EDIT_GET to have the cursor move to position 0 or to the beginning of the text field
2 - Instead of overstrike when editing the text .. have the text insert turned on .. that way when you make a change to the field .. you do not over write the text .. just ...

... Args:
[ 1] = U
[ 2] = N 1
[ 3] = N 0

Stack Calls
===========
Called from: => SUBSTR(0)
Called from: source\rtl\tget.prg => TCLIPGET:OVERSTRIKE(1326)
Called from: tget.prg => TGET:KEYCHAR(810)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\CONTROL.PRG => TCONTROL ...

... lDisplay )
METHOD DelEnd()
METHOD DelLeft()
METHOD DelRight()
METHOD DelWordLeft()
METHOD DelWordRight()

METHOD Insert( cChar )
METHOD OverStrike( cChar )

#ifdef HB_COMPAT_C53
METHOD HitTest(mrow, mcol)
#endif


PROTECTED: /* P R O T E C T E D */

DATA cColorSpec // Used only for ...