1. Forum
  2. USENET
  3. comp.lang.xharbour

  • MEMOEDIT AUTOSAVE

    From Marco Boschi@info@marcoboschi.it to comp.lang.xharbour on Wed Feb 21 03:50:20 2024
    From Newsgroup: comp.lang.xharbour

    Hi, I hope you can read this my question.
    Is it possible with some tricks to activate a kind of autosave?
    For example every 60 seconds It saves in a TXT file the content of variable I'm editing? It happened that a program froze and the only way to close it was to close the cmd window.
    Many thanks
    Marco
    --- Synchronet 3.21d-Linux NewsLink 1.2
  • From Marco Boschi@info@marcoboschi.it to comp.lang.xharbour on Wed Feb 21 05:10:46 2024
    From Newsgroup: comp.lang.xharbour

    Il giorno mercoled|4 21 febbraio 2024 alle 12:50:23 UTC+1 Marco Boschi ha scritto:
    Hi, I hope you can read this my question.
    Is it possible with some tricks to activate a kind of autosave?
    For example every 60 seconds It saves in a TXT file the content of variable I'm editing? It happened that a program froze and the only way to close it was to close the cmd window.
    Many thanks
    Marco
    I've found memoedit.prg in my HD and I made a few small changes that are right for me,
    where can I found memoedit.prg of (Build 20161123)?
    in
    METHOD Edit() CLASS TMemoEditor
    I add this little code
    if nNextKey == 0
    nKey := Inkey( 60 ) // instead of Inkey(0)
    else
    nKey := nNextKey
    nNextKey := 0
    endif
    also this one a few lines below
    IF nKey = 0
    @ 23 , 0 SAY nKey
    @ 24 , 0 SAY ::GetText()
    memowrit( "editazione_" + ute_dos + ".TXT" , ::GetText() , .F. )
    ENDIF
    --- Synchronet 3.21d-Linux NewsLink 1.2