bonjour,

        Quand je fait apparaitre un browse , je n'arrive pas a faire CTRL+Y, ou CTRL+T , etc dans le browse a question. J,ai essayer de jouer avec les SET DELETE ON ou OFF , mais rien ne marche ! avez-vous une idée pour m'aider ?

                                                                                                       Merci d'avance

 

Je te conseille fortement de ne pas utiliser BROWSE pour présenter le data à l'utilisateur. C'est une méthode qui date d'au moins 15 ans et est maintenu pour aider le programmeur. Mais je te suggère d'utiliser une grille qui te permet de mieux géré les actions de ton utilisateur.
Mais cela étant dit, normallement un simple browse devrait te permettre de faire CTRL-Y, mais je présume qui y a quelques chose d'autre qui empèche cela. Comme ceci va empecher
BROWSE noappend

Peux-tu poster ton code pour voir?

Mike Gagnon

voila mon code :

SELECT

1

BASE4=

TRIM ("&BASE")+"V.DBF"

IF .NOT. FILE ("&BASE4")

*!* DO CENTRE WITH "** VOUS DEVEZ ENTRER LES PRIX UNITAIRE PREALABLEMENT **","R/W",23

*!*

*!* WAIT ""

DO FCTWAIT WITH " VOUS DEVEZ ENTRER LES PRIX UNITAIRE PREALABLEMENT ",1

*_SCREEN.Picture = 'C:\SOUMISNT\SOURCE\Windows XP soumiciel 800.jpg'

DO verifScreen

RETURN TO MASTER

ENDIF

USE

&BASE4

BASE_TEMP =

DBF ()

SELECT

3

BASE3=

TRIM (BASE)+"S"

USE (BASE3)

PACK

SET FILTER TO

D1<>0

GO TOP

SET COLOR TO

+W/B

ON KEY LABEL ALT

+I do INS_IT

INSMODE

(.F.)

BROWSE NAME

BRWVENDANT FONT 'MS LineDraw',12 SAVE TITLE "ALT+I [Insérer] CTRL+W [Imprimer] CTRL+T [Supprimer] Escape [Annuler] " FIELDS D1:H="Début",F1:H=" Fin",S_TOTAL:H=" SOUS-TOTAL",RUE:H=" TITRE" PREFERENCE BRWIMPP1

ON KEY LABEL ALT

+I

IF LASTKEY

()=27

RETURN

ENDIF

SET COLOR TO

+W/B

@15,5

CLEAR TO 21,73

GO TOP

TOUCHE = 0

T_RUE = S_TOTAL

T_ST = RUE

LIGNE = " "

 

=INSMODE(.F.) 



Mike Gagnon

excuse moi , je comprend pas ?

 

 =INSMODE(.F.) 

Cela veut dire "pas de insert"
change le à    =INSMODE(.T.) 


Mike Gagnon

merci pour ton dévouement a mon problème , mais ce que je veut dire c'est pas ca qui va faire marcher le CTRL+Y dans le browse ?

 

>> mais ce que je veut dire c'est pas ca qui va faire marcher le CTRL+Y dans le browse ?

Je ne comprends ce commentaire

Et le raison pourquoi tu n'utilise pas CTRL+Y directement?


Mike Gagnon

parce que le problème est quand j'utilise le browse dans l'éditeur foxpro le ctrl+y ajoute une nouvelle enregistrement dans la table ,alors que quand j'utilise le ctrl+y dans un browse dans mon programme , il ne l'ajoute pas comme dans l'éditieur et le ctrl+t ne marque pas les enregistrement a effacée. J'ai essayer de set carry on , set deleted on , rien ne marche , je voudrais savoir comment je pourrais arrengé pour qu'il marche ?

PS . je n'est pas mis de noappend a mon browse

 

Est-ce un browse sur une table direct ou un curseur?

Mike Gagnon