Discussion :

[Felipe_]

Bonjour.

Je cherche un moyen pour afficher un tableau formé de 2 colonnes dans lequel l'utilisateur pourrait entrer une série de données. J'ai créé un TStringGrid, qui s'affiche correctement, mais que l'utilisateur ne peut pas éditer! J'ai pourtant sélectionné le Input Enabled = True...

Quelqu'un pourrait-il m'aider sur TStringGrid, ou me suggérer une autre méthode?

Felipe.

[Interruption13h]

Salut !

Regardes dans les propriétés Options de TStringGrid, il y en a un nommé goEditing ou quelque chose comme ça, met le à true.

A+

[Felipe_]

Salut !

Regardes dans les propriétés Options de TStringGrid, il y en a un nommé goEditing ou quelque chose comme ça, met le à true.

A+

Super! Ca marche. Fallait le savoir! Merci Interruption13h.

Si je peux me permettre, je voudrais encore utiliser tes compétences: peut-on facilement contrôler le format de ce que peut entrer l'utilisateur (par exemple le forcer à ne taper que des nombres)?

[Interruption13h]

Salut !

Tu peux même utiliser des mask de saisie en utilisant l'evènement OnGetEditMask de TStringGrid :
depuis l'aide BCB6 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13

Occurs when the in-place editor requests an edit mask.

typedef void __fastcall (__closure *TGetEditEvent)(System::TObject* Sender, 
long ACol, long ARow, WideString &Value);
__property TGetEditEvent OnGetEditMask = {read=FOnGetEditMask, write=FOnGetEditMask};

Description

Write an OnGetEditMask event handler to provide the in-place editor with an edit mask that describes the valid input strings a user can type into a cell. Set the Value parameter to the string that describes the edit mask for the cell specified by the ACol and ARow parameters. If the cell does not have an edit mask, set the Value parameter to an empty string.

 OnGetEditMask does not occur unless the Options property includes goEditing.

Y en a même un exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
 
This example specifies an edit mask in a string grid to limit the cells that contain telephone numbers, as indicated by a label cell in the first row:
 
void __fastcall TForm1::StringGrid1GetEditMask(TObject *Sender, long ACol, long ARow, AnsiString &Value)
 
{
  if (StringGrid1->Cells[ACol, 0] == "Phone Number")
    Value = "!\(999\)000-0000;1";
}

Espérant t'avoir aider,

A+

[Felipe_]

Oui, c'est exactement ce qu'il me faut!

Il me reste à trouver la description des Mask dans la doc. Je vois ça demain.

Merci Interruption13h.