Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Getting totally crazy with this form
Message
De
03/12/2001 22:16:15
Dragan Nedeljkovich
Now officially retired
Zrenjanin, Serbia
 
 
À
03/12/2001 15:37:35
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00588816
Message ID:
00589055
Vues:
55
This message has been marked as a message which has helped to the initial question of the thread.
>Well, I don't really see how highlighting the lines and pressing enter would make CTRL-F & CTRL-W work improperly...unless you have a project hook doing something to affect it. On my machine (VFP6), if I hilite those 2 lines run them together, the project closes as soon as I click back into the command window.
>
>So I avoid running the project manager that way...

I rather have a shortcut to the project and open it with a doubleclick, or (preferrably, since I usually work on more than one project at a time) use the following project hook, which does just two things: CDs to the project's home directory and sets the path to include the directories of all the components.
**************************************************
*-- Class:        pjx (e:\dragan\dokumenti\rad\vfprc\app.vcx)
*-- ParentClass:  projecthook
*-- BaseClass:    projecthook
*-- Time Stamp:   11/15/01 04:13:07 PM
*
#INCLUDE "d:\program files\microsoft visual studio\vfp98\foxpro.h"
*
DEFINE CLASS pjx AS projecthook

	Height = 22
	Width = 23
	Name = "pjx"


	PROCEDURE addpath
		lParam cPath
		cPath=fullp(cPath)
		if atc(cPath+',', set('path')+',')=0
			cPath=set('path')+','+cPath
			set path to (cPath)
		endif
	ENDPROC


	PROCEDURE Init
		dodefault()
		local oPjx
		oPjx=_vfp.activeproject
		cd (oPjx.homedir)
		this.addpath(justpath(this.classlibrary))
		use (oPjx.name) again in 0 noup alias pjx
		select dist (justpath(name)) from pjx into array aa
		*use in pjx
		for i=1 to alen(aa)
			this.addpath(trim(aa[i]))
		endfor
		SELECT pjx
		USE
	ENDPROC


ENDDEFINE
*
*-- EndDefine: pjx
**************************************************

back to same old

the first online autobiography, unfinished by design
What, me reckless? I'm full of recks!
Balkans, eh? Count them.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform