Gambas France BETA


Pas de compte ? Incription

Message.Warning

12
AuteurMessages
Foromus#1 Posté le 14/1/2010 à 13:42:00
Bonjour,

Ah, un petit souci avec la boîte "Message"....

Message.Warning("Your changes will be lost", "Save", "Ignore", "Cancel")

Bon, au niveau message, je mets ce que je veux je suppose ? Par exemple ("Your......"Save", "Ignore")

Le souci, ici, c'est de récupérer l'info.
L'aide me dit que c'est l'ordre des boutons qui est pris en considération. C'est bien, mais quelle est la variable qui va me dire quel bouton a été cliqué ?

J'ai tenté un """" If button(1) = True Then .... """ masi ça n'a pas du tout été accepté....

Merci :
spheris#2 Posté le 14/1/2010 à 15:36:00
Foromus,
tout chaud sorti du four !
http://gambaslinux.fr/articles.php?lng=fr&pg=519
A+
;)
Foromus#3 Posté le 14/1/2010 à 15:45:00
Ah merci...

C'est idiot, je n'y avais même pas pensé, alors que c'est sensiblement la même chose qu'en VB...
Mais voilà, à force de me dire que Gambas, ce n'est pas VB.....

J'ai un peu l'impression que je vous fais bosser, ces derniers temps...
Rassurez-vous, ce n'est pas perdu, je fais une compilation de tout ce que j'apprends..

Encore merci !....


(et si vous avez une idée sur les tableaux....)
pinky#4 Posté le 14/1/2010 à 16:27:00
Bonjour Foromus

Il y a aussi cette aide sur le wiki pour les MESSAGES
Dolmen (table pierre) : Caillou préféré des Bretons (un dolmen de prédilection).
spheris#5 Posté le 14/1/2010 à 16:41:00
Merci pinky pour l'info !
Le style GTK est vraiment horrible sur cette page du wiki.
De qui vient ces affreuses captures d'ecran ?
:tongue: :tongue: :tongue:

Foromus,
avec tout cet apprentissage, tu ne nous a même pas dis ce que tu concoctais comme logiciel.
Sais tu que tu pourras me le faire parvenir par mail pour que je le mette sur gambaslinux.eg2..fr au profit de tous.
Si tu es d'accord bien entendu !!
;) ;)
pinky#6 Posté le 14/1/2010 à 17:19:00
Merci pinky pour l'info !
Le style GTK est vraiment horrible sur cette page du wiki.
De qui vient ces affreuses captures d'ecran ?
:tongue: :tongue: :tongue:

Je ne m'en souviens plus. :oops:

:P
Dolmen (table pierre) : Caillou préféré des Bretons (un dolmen de prédilection).
Foromus#7 Posté le 14/1/2010 à 17:21:00
@ Sphéris,

Si si, je l'ai dit ! Mais vu le nombre de trucs que j'ai posté, vous n'avez probablement pas tout lu !

En fait, je vais me lancer dans un projet logiciel lorsque j'aurai des notions un peu sérieuses de Gambas.... Ce qui n'est pas encore le cas....
Ce que je fais tout de suite, et je peux le dire, c'est une compilation de mon apprentissage (j'en suis à une trentaine de pages).
Ce ne sera pas un cours proprement dit. Mais étant auto-didacte, j'ai souvent buté sur des choses qui devaient paraître complètement évidentes pour les auteurs, et j'en ai retenu la leçon, sans pour autant avoir la prétention de ne pas faire la même erreur.
Dès que j'estimerai que le volume de ma compilation sera suffisant, je le mettrai bien entendu à disposition. C'est pourquoi je répète que toutes les solutions que vous me donnez ici, seront reportées dans mon texte.
Voilà, je voudrais essayer d'apprendre et faire que mon apprentissage puisse aider de futurs apprenants !
spheris#8 Posté le 14/1/2010 à 19:49:00
Foromus,
Ce que tu fais est une excellente initiative, félicitation !
J'ai fais aussi mon "bloc-note de fonctions Gambas", pour pouvoir retrouver rapidement tel ou tel code lors de mon apprentissage.
C'est tout simplement le site gambaslinux.eg2.fr.
L'enorme avantage, c'est que tout le monde en profite tout de suite et surtout, surtout, c'est que d'autre programmeur bien plus aguéris que moi ont pu corriger les énormités que j'aurais pu écrire.

;) ;)
pinky#9 Posté le 3/11/2024 à 11:06:22
Bonjour,
Prise de tête pour retrouver comment j'utilisais les messages warning pour définir les actions à accomplir lorsque je clique sur "Oui" ou "Non".
Je pense avoir trouvé car ça fonctionne, mais la question est : Mon code est il correctement écrit ?
Le truc est très simple. J'ai plusieurs TextBox et Combobox que je remplis, puis je clique sur un Button afin d'insérer le tout dans un TableView.
Après clic sur button, un MessageWarning s'affiche afin de me demander si je confirme ou non l'insertion dans la TableView.
Si je clique sur le bouton "Oui" du Warning, ça fonctionne très bien et mes TextBox et ComboBox sont remises à zéro.
Si je clique sur le bouton "Non" du Warning, ça ferme le warning et mes données saisies dans les TextBox et Combobox sont toujours affichées. Donc ça fonctionne aussi. J'ai mis l'instruction "RETURN" pour la réponse "Non" du Warning afin de pouvoir conserver mes valeurs saisies dans les TextBox et Combobox.
Ma question est : Est ce correct d'utiliser l'instruction RETURN pour faire ça ? Je l'ai fait simplement pour mettre une PAUSE dans mon programme si je clique sur le bouton "Non dans ma Warning.

Voici le code pour mon ButtonText pour insérer les données dans le TableView :

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
PUBLIC SUB Button2_Click()

DIM reponsew AS INTEGER
reponsew = Message.Warning("Voulez vous vraiment ajouter ces données dans la table ?" "Oui", "Non")

SELECT CASE reponsew
CASE 1
TableView1.Rows.Count = ligne + 1

'on remplit les cellules de la ligne
TableView1[ligne, 0].Text = ComboBox1.Text
TableView1[ligne, 1].Text = TextBox1.Text
TableView1[ligne, 2].Text = TextBox2.Text
TableView1[ligne, 3].Text = TextBox3.Text
TableView1[ligne, 4].Text = ComboBox2.Text
TableView1[ligne, 5].Text = ComboBox3.Text
TableView1[ligne, 6].Text = ComboBox4.Text
TableView1[ligne, 7].Text = TextBox4.Text
CASE 2
RETURN

END SELECT
'on incrémente ligne
ligne += 1

TextBox1.Clear
TextBox2.Clear
TextBox3.Clear
ComboBox1.Text = ""
ComboBox2.Text = ""
ComboBox3.Text = ""
ComboBox4.Text = ""
TextBox4.Clear
Button2.Enabled = FALSE'Button2 à nouveau inactif après ajout des données
END
Dolmen (table pierre) : Caillou préféré des Bretons (un dolmen de prédilection).
O.Coquet#10 Posté le 3/11/2024 à 12:46:49
Ce qui n'est pas devra-t-être inventé....?

Je vois pas de return ?

ah si pardon je viens de le voir, bahhhhh y'a rien qui t'en empêche.....

En fait, pour obtenir un résultat, il y a toujours plusieurs manières d'opérer, l'essentiel étant de trouver celle que tu vas trouver comme la plus élégante.

Pour ma part je m'y serais pas pris comme ça.


voila ma méthode:

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
PUBLIC SUB Button2_Click()

IF Message.Warning("Voulez vous vraiment ajouter ces données dans la table ?" "Oui" "Non" THEN


TableView1.Rows.Count = ligne+1

'on remplit les cellules de la ligne
TableView1[ligne, 0].Text = ComboBox1.Text
TableView1[ligne, 1].Text = TextBox1.Text
TableView1[ligne, 2].Text = TextBox2.Text
TableView1[ligne, 3].Text = TextBox3.Text
TableView1[ligne, 4].Text = ComboBox2.Text
TableView1[ligne, 5].Text = ComboBox3.Text
TableView1[ligne, 6].Text = ComboBox4.Text
TableView1[ligne, 7].Text = TextBox4.Text

INC ligne 'Déplacé ici

TextBox1.Clear
TextBox2.Clear
TextBox3.Clear
ComboBox1.Text = ""
ComboBox2.Text = ""
ComboBox3.Text = ""
ComboBox4.Text = ""
TextBox4.Clear
Button2.Enabled = FALSE 'Button2 à nouveau inactif après ajout des données
END IF

END


Perso je trouve ça plus propre et surtout, dans deux mois ou plus quand tu voudras modifier, c'est facile à comprendre :o

Amitié
Olivier (Alias Olinux)
Amitié
Olivier (Alias Olinux)

Raspberry pi 3 et 4, pc Xubuntu, Arduino.....
Quelques autres "vieux" ordinateurs !
Et un bon fer à souder
pinky#11 Posté le 3/11/2024 à 15:10:00
Merci Olivier mais ton code ne fonctionne pas chez moi.
Quand je clique sur le Button2 pour insérer les données dans le TableView j'ai le message d'erreur suivant :
1
Bad row index (FMain:176)

Et rien n'est inséré dans le TableView.
Dolmen (table pierre) : Caillou préféré des Bretons (un dolmen de prédilection).
O.Coquet#12 Posté le 3/11/2024 à 15:48:30
Ce qui n'est pas devra-t-être inventé....et il y a quoi ligne 176 de ton FMain ??????
Amitié
Olivier (Alias Olinux)

Raspberry pi 3 et 4, pc Xubuntu, Arduino.....
Quelques autres "vieux" ordinateurs !
Et un bon fer à souder
pinky#13 Posté le 3/11/2024 à 16:01:19
Ma première ligne pour l'insertion des données dans la TableView, soit :
1
TableView1[ligne, 0].Text = ComboBox1.Text
Dolmen (table pierre) : Caillou préféré des Bretons (un dolmen de prédilection).
O.Coquet#14 Posté le 3/11/2024 à 16:45:09
Ce qui n'est pas devra-t-être inventéAh oui désolé j'avais pas vu....


Je corrige le code...

Voià c'est fait.....regarde le code, j'ai déplacé le inc.....
Amitié
Olivier (Alias Olinux)

Raspberry pi 3 et 4, pc Xubuntu, Arduino.....
Quelques autres "vieux" ordinateurs !
Et un bon fer à souder
pinky#15 Posté le 3/11/2024 à 18:19:42
Merci,
Ton code corrigé fonctionne parfaitement et il est certainement plus abouti que le mien. Je ne connaissais pas l'instruction INC.
Du coup, je vais te piquer ton code pour remplacer le mien. :pirat:
Bonne soirée.
Dolmen (table pierre) : Caillou préféré des Bretons (un dolmen de prédilection).
12