MSFlexGrid - redigere data

Hej Peter.

Hvorledes du får ændrede data tilbage i din database kan jeg ikke svare på, da du intet skriver om, hvad du bruger.

Du kan ikke komme til at skrive direkte i gridden, men du kan tage indholdet af en celle eller en række ud i nogle tekst-felter, rette dér og føre dem tilbage til gridden.

Gælder det kun én celle ad gangen er det nemt at få data ud,  det er blot tekstfelt.text = grid1.text

For at få teksten tilbage skal du vide hvilken celle den er læst fra.

grid.selrow indeholder rækkens nummer og grid.selcol indeholder kolonnens nummer.  Så efter rettelse må du skrive

grid.row = grid.selrow
grid.col = grid.selcol
grid.text = tekstfelt.text

Andet spørgsmål er lettere:    tekstfelt.text = grid.selrow

M.v.h.  Jørn

Kan ikke få det til at virke.

det jeg gerne vil er at, når der bliver klikket på en række, får jeg et ID nummer der ligger i Col 0 i den række.

Private Sub msflexbox_Click()
MsgBox grid.selrow
End Sub

Peter lang

Hej Peter.

Ikke afprøvet, skrevet ud fra hukommelsen:

Private Sub msflexbox_Click()
  msflexbox.row = msflexbox.selrow
  msflexbox.col = 0
  MsgBox (msflexbox.text)
End Sub

M.v.h.  Jørn

Hej Peter.

Sorry!!  rowsel ikke selrow

Private Sub msflexbox_Click()
      msflexbox.row = msflexbox.rowsel
      msflexbox.col = 0
      MsgBox (msflexbox.text)
End Sub

M.v.h.  Jørn

Tak for svaret

jeg kan desværre først prøve det efter i morgen.
men jeg håber det virker (ser rigtig ud) så jeg lukker og slukker

tak