IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

MFC Discussion :

[ MsflexGrid ]


Sujet :

MFC

  1. #1
    Membre averti
    Inscrit en
    Juin 2005
    Messages
    25
    Détails du profil
    Informations forums :
    Inscription : Juin 2005
    Messages : 25
    Par défaut [ MsflexGrid ]
    Comment peut-on procéder pour que l'utilisateur puisse entrer des
    données dans la grille comme s'il s'agissait d'une feuille de calcul ???
    Merci d'avance!

  2. #2
    Membre à l'essai
    Inscrit en
    Avril 2004
    Messages
    5
    Détails du profil
    Informations forums :
    Inscription : Avril 2004
    Messages : 5
    Par défaut msflexgrid
    Bonjour,
    essai ça:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
     
     
    Public NumberRow, NumberCol As Integer
    Private Sub Saisie()
    'Recherche des coordonnées de la cellule active
    Dim x, y As Integer
    x = Grid1.Left + Grid1.CellLeft
    y = Grid1.Top + Grid1.CellTop
    'Mémorisation de la ligne et colonne active
    NumberRow = Grid1.MouseRow
    NumberCol = Grid1.MouseCol
    'Initialisation de l'objet tampon
    Text1.Left = x
    Text1.Top = y
    Text1.Width = Grid1.CellWidth
    Text1.Height = Grid1.CellHeight
    Text1.Visible = True
    Text1.Text = Grid1.Text
    Text1.SetFocus
    End Sub
     
    Private Sub Grid1_Click()
    Call Saisie
    End Sub
    Private Sub Grid1_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = &H27 Then 'vbKeyRight Then
    Call Saisie
    End If
    End Sub
     
    Private Sub Grid1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
    If Button = 2 Then
            PopupMenu MnuContext
    End If
    End Sub
     
    Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
    Grid1.Row = NumberRow
    Grid1.Col = NumberCol
    Grid1.Text = Text1.Text
     
    End Sub
    Private Sub MnuParam_click()
    frmParam.Show
    End Sub
    il s'agit de superposer visuellement un objet text à la cellule active et envoyer le texte saisi à la cellule lors de la perte de focus

    [Merci de donner du code dans le langage adapté à l'avenir, je le laisse ici à titre d'exemple / Nico-pyright]

  3. #3
    mat.M
    Invité(e)
    Par défaut Re: [ MsflexGrid ]
    Citation Envoyé par elasfer
    Comment peut-on procéder pour que l'utilisateur puisse entrer des
    données dans la grille comme s'il s'agissait d'une feuille de calcul ???
    Merci d'avance!
    Pas de multipostage merci
    Lawre c'est du code VB pas du C++

  4. #4
    Membre averti
    Inscrit en
    Juin 2005
    Messages
    25
    Détails du profil
    Informations forums :
    Inscription : Juin 2005
    Messages : 25
    Par défaut
    oui c'est un code VB mais moi je travaille avec visual C++ ,est ce qu'il n'y a pas possibilité de faire la meme chose on VC++

Discussions similaires

  1. Réponses: 5
    Dernier message: 17/06/2004, 23h38
  2. [VB6]PB d'importation d'un feuille Excel dans une MSFlexGrid
    Par mystere l dans le forum VB 6 et antérieur
    Réponses: 18
    Dernier message: 20/04/2004, 15h59
  3. [MSFlexGrid] problème générale
    Par Guigui_ dans le forum MFC
    Réponses: 5
    Dernier message: 30/07/2003, 18h03
  4. [] Difference entre MSHFlexGrid et MSFlexGrid
    Par olivierx dans le forum VB 6 et antérieur
    Réponses: 6
    Dernier message: 23/04/2003, 08h48
  5. [VB6] Multiselection avec CTRL dans une msflexgrid
    Par Troopers dans le forum VB 6 et antérieur
    Réponses: 6
    Dernier message: 17/04/2003, 10h57

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo