Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Standard Toolbar gets closed
Message
De
23/05/2003 16:08:18
Hans-Otto Lochmann
Dr. Lochmann Consulting Gmbh
Frankfurt, Allemagne
 
Information générale
Forum:
Visual FoxPro
Catégorie:
CodeMine
Divers
Thread ID:
00791380
Message ID:
00792412
Vues:
26
This message has been marked as the solution to the initial question of the thread.
>Hi All,
>
>Is there anyway to stop CodeMine from clearing my VFP Standard Toolbar when I initialize a Codemine environment or Open Existing app?
>
>I am using CM 7.1 and VFP 8
>
>TIA,
>Cris

Hi Cris,

it is easily done by this quick and dirty approach. But beware: by this you will change a CodeMine class, i.e. this change will be overwritten each time you update to the next version:

In the classlib
  ..\common50\cmApp.vcx
you will find a class called
  cmApplicationManager.vcx 
with a method called
  CloseFoxToolbars()
In this method you will find an If-clause, whose first portion (before the "else") does what you do not like. So comment that out. In order to be shure, everthing works as you want it to, I suggest that you change the if-clause to
  If Not This.lApplicationStarted
    * If called from development env, only close the standard toolbar.
    *-- HL/start
    *--  IF WVISIBLE('Standard')
    *--    HIDE WINDOW Standard
    *--    THIS.aFoxToolbars[1] = 'Standard'
    *--  ENDIF
    If Not Wvisible('Standard')
      Show Window Standard
    Endif
    *-- HL/end
  Else
    ...
    < left unchanged >
    ...
  endif
Hope, it helps.

Hans
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform