Discussion :

[WinRichi]

Bonsoir les copains ,

Je suis actuellement entrain de faire mon 2eme système (mon premier est WinRichi) qui s'appelle WinRichi Server 2015 .

Je travaille sur plusieurs applications (Python , FTP , SSH etc..) mais je suis bloquer sur ma première application : Téléchargement 1.0

Voici mon probléme : J'aimerais un 'Texte Box' pour entrer une adresse (http://) et en cliquant sur le bouton "Télécharger" on lance la commande TELECHARGER/ %Le HTTP que la personne aurons taper%

Voici mon code :

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
30
31
32
33
34
35
36
rem/ WinRichi Server 2015 ; Ceci est juste un test des applications qui seront utilisé .

rem/ Téléchargement :


ini/ fenetre(
	ini;nom 	= "TELEC_FEN" 
	ini;texte 	= "Téléchargement 1.0"
	ini;type 	= "1;AGR1,SIZ1" 
	ini;couleur 	= "075,075,075" 	
	ini;tx 		= "600" 
	ini;ty 		= "500" 
	ini;px 		= "MX" 
	ini;py 		= "MY" 
	creer/
ini/ fenetre)

:OBJETS:

FIX/ TMP1 = /C %TAILLE_X% - 5
FIX/ TMP2 = /C %TAILLE_Y% - 36
FIX/ TMP2 = /C %TMP2% - %TAILLE_TITRE%

ini/ textebox(
	ini;nom 	= "TELEC_TB"
	ini;fenetre 	= "TELEC_TB1"
	ini;type 	= "1;M1O0"
	ini;couleurf 	= "255,255,255"
	ini;couleurp 	= "255,255,255"
SI/ %CHANGETAILLE% = 0 (:ini;texte = "http://":)
	ini;px 		= "2"
	ini;py 		= "33"
	ini;tx 		= "%TMP1%"
	ini;ty 		= "%TMP2%"
	creer/
ini/ textebox)

[BlackoOSX]

J'aimerais un 'Texte Box' pour entrer une adresse (http://) et en cliquant sur le bouton "Télécharger" on lance la commande TELECHARGER/ %Le HTTP que la personne aurons taper%

Salut!
Le principe est simple.
Pour cela il faut que tu créer un bouton.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
ini/ bouton(
        ini;nom = "BOUTON1"
        ini;fenetre = "FENETRE_1"
        ini;texte = "Clique moi !"
        ini;img = "0"
        ini;couleurf = "255,255,255"
        ini;couleurp = "255,000,000"
        ini;tx = "180"
        ini;ty = "30"
        ini;px = "30"
        ini;py = "80"
        creer/
rem/ EV correspond à un évènement
ev/ OS\(L'emplacement de ton programme d'évènement)
ini/ bouton)

La ligne EV/... correspond à un évènement.
Un évènement c'est quoi?
C'est en faite une ligne qui détermine "si tu fait une action sur le bouton / image / texte etc..." et exécute un fichier dans une procédure.
Une procédure c'est quoi?
C'est juste un bloc d'instruction dans un autre fichier que l'évènement (ou le même) où à l'interrieur il y auras un bloc d'instruction appelé algorithme (c'est tout simplement un suite d'instruction). Cette procédure va répondre à l'évènement comme ceci.

Code :

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

1
2
3
4
rem/ Fichier de "réponse" à l'évènement

proc/ MON_BOUTON1(CLIC)
rem/ Ton code
fin/ proc

Le "proc" correspond au début du bloc d'instruction de la procédure.
Le "MON_BOUTON1" correspond au nom du bloc qui contient l'évènement.
Le "(CLIC)" correspond à un paramètre de la procédure. Exemple: (CLIC) = Avoir cliquer sur le bouton / (FOCUS) = Sélectionner la fenêtre etc...

Les paramètres disponibles en ce moment sont:

- CLIC ( Si l'utilisateur clique sur .. )
- FOCUS ( Si l'utilisateur sélectionne la fenêtre .. )
- ENTRER ( Si l'utilisateur presse ENTRER sur un TexteBox )
- FERME ( Si l'utilisateur ferme l'objet ou la fenêtre .. )
- REDUIRE ( Si l'utilisateur clique sur réduire )
- CYCLE ( Si le temps du cycle d'un Compteur s'est écoulé )
- AGRANDIR ( Si l'utilisateur agrandir une fenêtre )
- REDUIRE ( Si l'utilisateur réduit une fenêtre )
- SIZE ( Si l'utilisateur change la taille de la fenêtre via le bord bas/droit )
- SURVOLE ( Si l'utilisateur passe sa souris sur un objet )
- NONSURVOLE ( Si l'utilisateur sors sa souris d'un objet )

Entre "proc/ MON_BOUTON1(CLIC)" et "fin/ proc", tu mettras tout ton algorithme.
Le "fin/ proc" correspond à la fin du bloc d'instruction que tu as créer.
Ai-je répondus à ta question?

SI je résume ton message, ton code doit faire cela.

Dans CREATION_BOUTON.CPC:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
ini/ bouton(
        ini;nom = "BOUTON1"
        ini;fenetre = "FENETRE_1"
        ini;texte = "Clique moi !"
        ini;img = "0"
        ini;couleurf = "255,255,255"
        ini;couleurp = "255,000,000"
        ini;tx = "180"
        ini;ty = "30"
        ini;px = "30"
        ini;py = "80"
        creer/
ev/ %SYSTEME%\EV_BOUTON.CPC
ini/ bouton)

Dans EV_BOUTON.CPC:

Code :

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

1
2
proc/ MON_BOUTON1(CLIC)
rem/ Ton code
fin/ proc

Bien sûre, change tout les paramètres et met les à ton goût!

[WinRichi]

Salut!
Le principe est simple.
Pour cela il faut que tu créer un bouton.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
ini/ bouton(
        ini;nom = "BOUTON1"
        ini;fenetre = "FENETRE_1"
        ini;texte = "Clique moi !"
        ini;img = "0"
        ini;couleurf = "255,255,255"
        ini;couleurp = "255,000,000"
        ini;tx = "180"
        ini;ty = "30"
        ini;px = "30"
        ini;py = "80"
        creer/
rem/ EV correspond à un évènement
ev/ OS\(L'emplacement de ton programme d'évènement)
ini/ bouton)

La ligne EV/... correspond à un évènement.
Un évènement c'est quoi?
C'est en faite une ligne qui détermine "si tu fait une action sur le bouton / image / texte etc..." et exécute un fichier dans une procédure.
Une procédure c'est quoi?
C'est juste un bloc d'instruction dans un autre fichier que l'évènement (ou le même) où à l'interrieur il y auras un bloc d'instruction appelé algorithme (c'est tout simplement un suite d'instruction). Cette procédure va répondre à l'évènement comme ceci.

Code :

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

1
2
3
4
rem/ Fichier de "réponse" à l'évènement

proc/ MON_BOUTON1(CLIC)
rem/ Ton code
fin/ proc

Le "proc" correspond au début du bloc d'instruction de la procédure.
Le "MON_BOUTON1" correspond au nom du bloc qui contient l'évènement.
Le "(CLIC)" correspond à un paramètre de la procédure. Exemple: (CLIC) = Avoir cliquer sur le bouton / (FOCUS) = Sélectionner la fenêtre etc...

Les paramètres disponibles en ce moment sont:

- CLIC ( Si l'utilisateur clique sur .. )
- FOCUS ( Si l'utilisateur sélectionne la fenêtre .. )
- ENTRER ( Si l'utilisateur presse ENTRER sur un TexteBox )
- FERME ( Si l'utilisateur ferme l'objet ou la fenêtre .. )
- REDUIRE ( Si l'utilisateur clique sur réduire )
- CYCLE ( Si le temps du cycle d'un Compteur s'est écoulé )
- AGRANDIR ( Si l'utilisateur agrandir une fenêtre )
- REDUIRE ( Si l'utilisateur réduit une fenêtre )
- SIZE ( Si l'utilisateur change la taille de la fenêtre via le bord bas/droit )
- SURVOLE ( Si l'utilisateur passe sa souris sur un objet )
- NONSURVOLE ( Si l'utilisateur sors sa souris d'un objet )

Entre "proc/ MON_BOUTON1(CLIC)" et "fin/ proc", tu mettras tout ton algorithme.
Le "fin/ proc" correspond à la fin du bloc d'instruction que tu as créer.
Ai-je répondus à ta question?

SI je résume ton message, ton code doit faire cela.

Dans CREATION_BOUTON.CPC:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
ini/ bouton(
        ini;nom = "BOUTON1"
        ini;fenetre = "FENETRE_1"
        ini;texte = "Clique moi !"
        ini;img = "0"
        ini;couleurf = "255,255,255"
        ini;couleurp = "255,000,000"
        ini;tx = "180"
        ini;ty = "30"
        ini;px = "30"
        ini;py = "80"
        creer/
ev/ %SYSTEME%\EV_BOUTON.CPC
ini/ bouton)

Dans EV_BOUTON.CPC:

Code :

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

1
2
proc/ MON_BOUTON1(CLIC)
rem/ Ton code
fin/ proc

Bien sûre, change tout les paramètres et met les à ton goût!

J'ai bien mis les codes mais je voudrais que dans le code sa fais : TELECHARGER/ %Le HTTP que l'user a choisi sur le Texte Box%

[BlackoOSX]

J'ai bien mis les codes mais je voudrais que dans le code sa fais : TELECHARGER/ %Le HTTP que l'user a choisi sur le Texte Box%

Salut!
A ce moment là, dans la procédure tu met:

Code :

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

1
2
3
proc/ MON_BOUTON1(CLIC)
TELECHARGER/ URL
fin/ proc

Pour info, je ne pense pas que TELECHARGER/ URL soit une commande intégrer dans le CPCDOS...

[WinRichi]

Salut!
A ce moment là, dans la procédure tu met:

Code :

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

1
2
3
proc/ MON_BOUTON1(CLIC)
TELECHARGER/ URL
fin/ proc

Pour info, je ne pense pas que TELECHARGER/ URL soit une commande intégrer dans le CPCDOS...

Je vais quand même tester x)

[WinRichi]

Salut!
A ce moment là, dans la procédure tu met:

Code :

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

1
2
3
proc/ MON_BOUTON1(CLIC)
TELECHARGER/ URL
fin/ proc

Pour info, je ne pense pas que TELECHARGER/ URL soit une commande intégrer dans le CPCDOS...

Et sur le fichier avec le Texte Box je ne change rien a pars le URL ? (Bizzare quand même sans pas toucher au TextBox)

[BlackoOSX]

Et sur le fichier avec le Texte Box je ne change rien a pars le URL ? (Bizzare quand même sans pas toucher au TextBox)

Salut!
Qu'est-ce que tu veux que ton programme fasse?
Est-ce que tu veut que l'utilisateur entre une URL dans le textebox et qu'il télécharge le fichier de cette URL?
Si c'est cela il faut faire.

Dans TELECHARGE.CPC:

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
rem/ Fichier d'affichage de la fenêtre + textebox

rem/ Déclaration de la fenêtre
ini/ fenetre(
rem/ le code de la fenêtre
ini/ fenetre)

rem/ Déclaration de la variable
fix/ URL = 0

rem/ Déclaration de la textebox
ini/ textebox(
ini;nom = "MON_TEXTEBOX"
ini;fenetre = "FENETRE_1"
ini;type = "1"
ini;couleurf = "255,255,255"
ini;couleurp = "000,000,000"
rem/ Le "#%URL%" dans ini;texte, sera remplacé par l'utilisateur puis récupéré plus bas dans la variable URL
ini;texte = "#%URL%"
ini;px = "20"
ini;py = "20"
ini;tx = "210"
ini;ty = "17"
creer/
ini/ textebox)

rem/ Récupération du texte de la textebox
txt/ %URL%

rem/ Exécution du téléchargement "a ta façon"
TELECHARGER/ %URL%

Ai-ja répondus à ta question?