grid ++

J'ai eu envie de faire un mini-tableur,
alors je me suis précipité sur grid
ce truc à cellules tout neuf et plein d'avenir (peut-être).

Et impossible de faire en sorte qu'il occupe tout l'écran,
il reste invariablement confiné à un truc rabougri.
Il manque décidément encore bien des fonctions
à cette nouvelle commande !

Code:

grid 100
  grid_column 100,20
  grid_raw 100,20
  grid_column_width 100,25
  grid_raw_height 100,20

Citation :

Et impossible de faire en sorte qu'il occupe tout l'écran,

C'est vrai que full_space n'a pas encore été codé pour GRID, mais avec width et height, tu devrais pouvoir lui donner une grande taille.

Code:

grid 100
grid_column 100,20
grid_raw 100,20
grid_column_width 100,25
grid_raw_height 100,20

width 100,700
height 100,600

Aussi, il faudrait pouvoir écrire dans une cellule en un seul clic.

Ah !
J'avais oublié cette possibilité !
Merci, merci !

Nouvelle question :
Comment écrire dans la cellule qu'a choisie l'utilisateur ?

Exemple :

Code:

dim x , y
' x est l'abscisse de la cellule choisie par l'utilisateur
' y est est l'ordonnée de la cellule choisie par l'utilisateur
label go
grid 1
edit 2
top 2,200
on_key_up 2,go

end

go:
' comment déterminer x et y ?
x=3 : y=3 : ' Ceci pour éviter arbitrairement l'erreur "Zero value"
if key_up_code=13
  grid_write 1,x,y,text$(2)
end_if
return

A moins que j'ai encore oublié quelque chose,
il manque un :
x=position_x(N)
et
y=position_y(N)
qui donnerait dans grid
la position de la cellule sélectionnée par l'utilisateur.

A ma connaissance, on ne peut pas encore connaître la cellule cliquée ou sélectionnée par l'utilisateur. J'avais fait la demande pour une telle fonction dès la sortie de l'objet Grid, et Jack a dit que cela viendrait...

@jjn4, je n'ai que survolé la question, je ne connais rien aux grid n'en ayant pas eu l'usage jusqu'à présent, et je dis peut-être une bêtise.
Mais si je reprends ton bout de code légèrement modifié:

Code:

dim x , y
dim lg, hg
lg = 60: hg = 20
' x est l'abscisse de la cellule choisie par l'utilisateur
' y est est l'ordonnée de la cellule choisie par l'utilisateur
label go
GRID 1
GRID_COLUMN_WIDTH 1, lg: GRID_RAW_HEIGHT 1, hg
edit 2
top 2,200
on_key_up 2,go

end

go:
' comment déterminer x et y ?
x = 1+INT(MOUSE_X_LEFT_DOWN(1)/lg)
y = 1+INT(MOUSE_Y_LEFT_DOWN(1)/hg)
if key_up_code=13
    grid_write 1,x,y,text$(2)
end_if
return

est-ce que ça ne pourrait pas être une partie de la solution de ton problème ?
(je ne connais pas les dimensions implicites des cases, donc je les ai imposées, pour le calcul: lg et hg)

Fabuleux, ça marche !
JL35, je t'ai déjà dit que tu étais un ?
Je ne me souviens plus.

Tu peux le répéter, je ne m'en lasse pas !

Je butte encore sur une autre difficulté
toute simple sur le principe, mais là,
je crains qu'il n'y ait que Jack et son
interminable todolist qui en vienne un jour à bout.

Comment écrire sur plusieurs lignes dans une cellule de grid ?
exemple :

Code:

dim a$
a$="NOM Prénom"+chr$(13)+chr$(10)+"Adresse N° tél"
grid 1
width 1,500
height 1,300
font_size 1,12
grid_column_width 1,120
grid_raw_height 1,50
grid_write 1,3,3,a$

Peut-être quelqu'un d'autre aura une solution,
comme pour le problème précédent,
mais là, je n'arrive pas à y croire.
C'est à la fois très simple et compliqué.
Allez, je veux bien manger mon chapeau
si il y en a un qui trouve une solution !