Discussion :

[PhilLU]

Bonjour,
Je cherche à récupérer le contenu d'une cellule clickée d'une grille IWGrid Intraweb via OnCellClick.
Malheureusement, rien ne se passe, au click sur une cellule, je n'entre même pas dans la procédure
Est-ce un problème de navigateur ?
Qui peut m'aider?
Merci d'avance,
PhiLu

[pprem]

Bonjour

Quelles versions de Delphi et d'IntraWeb ?

Est-ce que AJAX est activé ?

[PhilLU]

Bonjour et merci pour votre réponse
Delphi est XE2
Intraweb version XII
AJAX?
Non pas activé...

[pprem]

Alors déjà je suggèrerais de passer à la version 14 ou 15 d'IntraWeb selon si la licence actuelle était achetée ou était "livrée avec Delphi". Il y a eu pas mal d'évolutions, corrections de bugs et améliorations en tous genres dessus. C'est téléchargeable depuis https://www.atozed.com/intraweb/

Et pas de bol, seule la version 12 passe sur la XE2.
Il faut au moins XE3 pour la version 14.

Pas de VM dispo avec cette version, je ne peux tester, donc google is my friend...

Le OnCellClick se déclenche si la cellule a sa propriété Clickable à True. C'est false par défaut.

Dans le remplissage de ta grille, tu dois donc changer sa valeur.

[pprem]

Cherche "VCL for the Web, Bob Swart", tu devrais tomber sur un PDF écrit à l'époque avec pas mal de choses utiles dedans (contrairement à la doc d'Atozed en direct).

[PhilLU]

Alors déjà je suggèrerais de passer à la version 14 ou 15 d'IntraWeb selon si la licence actuelle était achetée ou était "livrée avec Delphi". Il y a eu pas mal d'évolutions, corrections de bugs et améliorations en tous genres dessus. C'est téléchargeable depuis https://www.atozed.com/intraweb/

Et pas de bol, seule la version 12 passe sur la XE2.
Il faut au moins XE3 pour la version 14.

Pas de VM dispo avec cette version, je ne peux tester, donc google is my friend...

Le OnCellClick se déclenche si la cellule a sa propriété Clickable à True. C'est false par défaut.

Dans le remplissage de ta grille, tu dois donc changer sa valeur.

Un grand merci pour ton aide
Malheureusement, je ne trouve pas de Clickable à mettre à True!?!
Tu aurais une idée???

[pprem]

Un grand merci pour ton aide
Malheureusement, je ne trouve pas de Clickable à mettre à True!?!
Tu aurais une idée???

montre nous un bout de ton code source, à l'endroit où tu remplis les cellules de la grille

[PhilLU]

Voici...
(c'est donc par code qu'il faut y aller?)

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
 
type
    Resultats: TIWGrid;
...
implementation
...
 
Resultats.ColumnCount:=3;
Resultats.Clear;
Resultats.RowCount:=1;
Resultats.Cell[0,0].text:='Numero';
Resultats.Cell[0,1].text:='Patient';
Resultats.Cell[0,2].text:='Prescripteur';
 
i:=1;
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add('SELECT Numero, Patient, Prescripteu from prescription');
SQLQuery1.SQL.Add('ORDER BY Numero DESC');
SQLQuery1.Open;
while NOT SQLQuery1.Eof do
begin
Resultats.RowCount:=Resultats.RowCount+1;
Resultats.Cell[i,0].text:=SQLQuery1.FieldByName('Numero').Asstring;
Resultats.Cell[i,1].text:=SQLQuery1.FieldByName('Patient').Asstring;
Resultats.Cell[i,2].text:=SQLQuery1.FieldByName('Prescripteur').Asstring;
 
   i:=i+1;
   SQLQuery1.Next;
end;

[PhilLU]

Cherche "VCL for the Web, Bob Swart", tu devrais tomber sur un PDF écrit à l'époque avec pas mal de choses utiles dedans (contrairement à la doc d'Atozed en direct).

Super, oui de fait, j'ai trouvé dans cette "bible"

Code :

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

Resultats.Cell[i,0].Clickable := True;

lors du remplissage de la grille et le tour est joué...
pprem