FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin for Harbour/xHarbour Multiline Edit : Insert always on.
Milan Mehta
Posts: 115
Joined: Mon Oct 17, 2005 04:42 AM

Multiline Edit : Insert always on.

Posted: Thu Dec 14, 2006 10:10 AM

Dear All,

I am using May-2006 build. In multi line Get Insert mode always on. Even if I press Ins key, there is no effect.

How to enter Overwrite mode ?

TIA
Milan.

ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM

Re: Multiline Edit : Insert always on.

Posted: Mon Jul 29, 2019 10:17 AM
the problem still exists.
Now I have the same problem. :-)
I added a clear-button but that helps only for new text

How to change to overwrite mode.
The normal get works.

Works only on a normal get
READINSERT( .F. )

I tested FGET where overwrite works
REDEFINE FORMAT GET oGet[4] VAR cText1 ID 210 OF oFld:aDialogs[ 1 ] UPDATE FONT oFontSys




regards
Uwe :-)
Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.
dtussman
Posts: 102
Joined: Sat Jun 06, 2015 06:57 PM

Re: Multiline Edit : Insert always on.

Posted: Fri Feb 10, 2023 07:58 PM

Hello, did you ever find a solution for toggling insert mode using multiline? I'm having the same problem, stuck in insert mode

karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM

Re: Multiline Edit : Insert always on.

Posted: Fri Feb 10, 2023 08:25 PM
Hello,
Code (fw): Select all Collapse
   Set(  _SET_INSERT,  lOnOff  )
Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
dtussman
Posts: 102
Joined: Sat Jun 06, 2015 06:57 PM

Re: Multiline Edit : Insert always on.

Posted: Fri Feb 10, 2023 09:20 PM

Karinha,

That would work with a normal get but the issue is that it doesn't work with a multiline get.

David

karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM

Re: Multiline Edit : Insert always on.

Posted: Sat Feb 11, 2023 02:59 PM
Look this:

https://forums.fivetechsupport.com/viewtopic.php?f=6&t=16809&p=87244&hilit=TVKEY&sid=f3bc4fd5a05d3f92f67bce7579924da0&sid=b8668bcf6316313d3bd36bb2b4e17e7b#p87244

Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
dtussman
Posts: 102
Joined: Sat Jun 06, 2015 06:57 PM

Re: Multiline Edit : Insert always on.

Posted: Sun Feb 12, 2023 04:04 AM

Thats all too complicated for me. I need a simple solution, LOL

Jimmy
Posts: 1772
Joined: Thu Sep 05, 2019 05:32 AM

Re: Multiline Edit : Insert always on.

Posted: Sun Feb 12, 2023 05:40 AM
hi,

what about GotFocus() / LostFocus() (WHEN / VALID ) :?:

i do "switch" Numlock this Way under HMG
Code (fw): Select all Collapse
    bGotFocus := {|| lOldKey:= SetNumLock() }
   bLostFocus := {|| SetNumLock( lOldKey ) }
i think Fivewin have equal Function to "switch Insert"
greeting,

Jimmy
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM

Re: Multiline Edit : Insert always on.

Posted: Sun Feb 12, 2023 02:48 PM
dtussman wrote:Thats all too complicated for me. I need a simple solution, LOL
https://forums.fivetechsupport.com/viewtopic.php?f=3&t=23457&p=239063#p239063

Test and say if it works.

Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM

Re: Multiline Edit : Insert always on.

Posted: Sun Feb 12, 2023 02:57 PM
Now you can. Apologies for the delay.
Code (fw): Select all Collapse
// C:\FWH..\SAMPLES\NUM_CAPS.PRG

#include "fivewin.ch"
*#include "Dll.ch"

*----------------------------------------------------------------------
* Vejam como funciona
*----------------------------------------------------------------------
* SETCAPSLOCK( .T. ou .F. )  = Liga e desliga o Capslock
* SETNUMLOCK( .T. ou .F. )   = Liga e desliga o NumLock
* SETSCROLLOCK( .T. ou .F. ) = Liga e desliga o ScrollLock
* SETINSERT( .T. ou .F. )    = Liga e desliga o Insert
*----------------------------------------------------------------------
* VERCAPSLOCK()  = Sem parametros retorna o estado do Capslock
* VERNUMLOCK()   = Sem parametros retorna o estado do NumLock
* VERSCROLLOCK() = Sem parametros retorna o estado do ScrollLock
* VERINSERT()    = Sem parametros retorna o estado do Insert
*----------------------------------------------------------------------

/*
*************
function MAIN
*************

? SETCAPSLOCK( .F. )
? "Desligando o CapsLock"
SETCAPSLOCK( .T. )
? "Ligando o CapsLock"
SETCAPSLOCK( .F. )
? "Desligando o CapsLock"
SETCAPSLOCK( .T. )
? "Ligando o CapsLock"
SETCAPSLOCK( .F. )
? "Desligando o CapsLock"

? "O Capslock esta' " + iif( VERCAPSLOCK(), "Ligado", "Desligado" )

SETNUMLOCK( .F. )
? "Desligando o NumLock"
SETNUMLOCK( .T. )
? "Ligando o NumLock"
SETNUMLOCK( .F. )
? "Desligando o NumLock"
SETNUMLOCK( .T. )
? "Ligando o NumLock"
SETNUMLOCK( .F. )
? "Desligando o NumLock"

? "O Numlock esta' " + iif( VERNUMLOCK(), "Ligado", "Desligado" )

SETSCROLLOCK( .F. )
? "Desligando o ScrollLock"
SETSCROLLOCK( .T. )
? "Ligando o ScrollLock"
SETSCROLLOCK( .F. )
? "Desligando o ScrollLock"
SETSCROLLOCK( .T. )
? "Ligando o ScrollLock"
SETSCROLLOCK( .F. )
? "Desligando o ScrollLock"

? "O ScrollLock esta' " + iif( VERSCROLLOCK(), "Ligado", "Desligado" )

SETINSERT( .T. )
? "Ligando o Insert"

SETINSERT( .F. )
? "Desligando o Insert"

? "O Insert esta' " + iif( VERINSERT(), "Ligado", "Desligado" )

return NIL
*/

*------------------------------------------------------------*
*            FUNCAO PARA ATIVAR A TECLA CAPSLOCK             *
*------------------------------------------------------------*

#pragma begindump

#define _WIN32_IE 0x0500
#define HB_OS_WIN_32_USED
#define _WIN32_WINNT 0x0400

#include <windows.h>
#include "hbapi.h"

HB_FUNC ( SETCAPSLOCK )
{
BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

if( (hb_parl(1) && !(keyState[VK_CAPITAL] & 0)) || (!hb_parl(1) && (keyState[VK_CAPITAL] & 1)) )
    {
      keybd_event( VK_CAPITAL, 0x45, KEYEVENTF_EXTENDEDKEY | 0, 0 );
      keybd_event( VK_CAPITAL, 0x45, KEYEVENTF_EXTENDEDKEY | KEYEVENTF_KEYUP, 0);
    }
}

#pragma enddump

*-----------------------------------------------------------*
*            FUNCAO PARA ATIVAR A TECLA NUMLOCK             *
*-----------------------------------------------------------*

#pragma begindump

#define _WIN32_IE 0x0500
#define HB_OS_WIN_32_USED
#define _WIN32_WINNT 0x0400

#include <windows.h>
#include "hbapi.h"

HB_FUNC ( SETNUMLOCK )
{
BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

if( (hb_parl(1) && !(keyState[VK_NUMLOCK] & 0)) || (!hb_parl(1) && (keyState[VK_NUMLOCK] & 1)) )
    {
      keybd_event( VK_NUMLOCK, 0x45, KEYEVENTF_EXTENDEDKEY | 0, 0 );
      keybd_event( VK_NUMLOCK, 0x45, KEYEVENTF_EXTENDEDKEY | KEYEVENTF_KEYUP, 0);
    }
}

#pragma enddump

*-----------------------------------------------------------*
*            FUNCAO PARA ATIVAR A TECLA SCROLLOCK           *
*-----------------------------------------------------------*

#pragma begindump

#define _WIN32_IE 0x0500
#define HB_OS_WIN_32_USED
#define _WIN32_WINNT 0x0400

#include <windows.h>
#include "hbapi.h"

HB_FUNC ( SETSCROLLOCK )
{
BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

if( (hb_parl(1) && !(keyState[VK_SCROLL] & 0)) || (!hb_parl(1) && (keyState[VK_SCROLL] & 1)) )
    {
      keybd_event( VK_SCROLL, 0x45, KEYEVENTF_EXTENDEDKEY | 0, 0 );
      keybd_event( VK_SCROLL, 0x45, KEYEVENTF_EXTENDEDKEY | KEYEVENTF_KEYUP, 0);
    }
}

#pragma enddump

*-----------------------------------------------------------*
*            FUNCAO PARA ATIVAR A TECLA SCROLLOCK           *
*-----------------------------------------------------------*

#pragma begindump

#define _WIN32_IE 0x0500
#define HB_OS_WIN_32_USED
#define _WIN32_WINNT 0x0400

#include <windows.h>
#include "hbapi.h"

HB_FUNC ( SETINSERT )
{
BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

if( (hb_parl(1) && !(keyState[VK_INSERT] & 0)) || (!hb_parl(1) && (keyState[VK_INSERT] & 1)) )
    {
      keybd_event( VK_INSERT, 0x45, KEYEVENTF_EXTENDEDKEY | 0, 0 );
      keybd_event( VK_INSERT, 0x45, KEYEVENTF_EXTENDEDKEY | KEYEVENTF_KEYUP, 0);
    }
}

#pragma enddump

#pragma begindump

#define _WIN32_IE 0x0500
#define HB_OS_WIN_32_USED
#define _WIN32_WINNT 0x0400

#include <windows.h>
#include "hbapi.h"

HB_FUNC ( VERCAPSLOCK )
{
BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

hb_retl( keyState[VK_CAPITAL] );
}

#pragma enddump

*-----------------------------------------------------------*
*            FUNCAO PARA VERIFICAR A TECLA NUMLOCK          *
*-----------------------------------------------------------*

#pragma begindump

#define _WIN32_IE 0x0500
#define HB_OS_WIN_32_USED
#define _WIN32_WINNT 0x0400

#include <windows.h>
#include "hbapi.h"

HB_FUNC ( VERNUMLOCK )
{
BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

hb_retl( keyState[VK_NUMLOCK] );
}

#pragma enddump

*-----------------------------------------------------------*
*          FUNCAO PARA VERIFICAR A TECLA SCROLLOCK          *
*-----------------------------------------------------------*

#pragma begindump

#define _WIN32_IE 0x0500
#define HB_OS_WIN_32_USED
#define _WIN32_WINNT 0x0400

#include <windows.h>
#include "hbapi.h"

HB_FUNC ( VERSCROLLOCK )
{
BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

hb_retl( keyState[VK_SCROLL] );
}

#pragma enddump

*-----------------------------------------------------------*
*          FUNCAO PARA VERIFICAR A TECLA SCROLLOCK          *
*-----------------------------------------------------------*

#pragma begindump

#define _WIN32_IE 0x0500
#define HB_OS_WIN_32_USED
#define _WIN32_WINNT 0x0400

#include <windows.h>
#include "hbapi.h"

HB_FUNC ( VERINSERT )
{
BYTE keyState[256];

GetKeyboardState((LPBYTE)&keyState);

hb_retl( keyState[VK_INSERT] );
}

#pragma enddump
Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion

Static archive · New replies & topics via GitHub Discussions