PureBasic

Forums PureBasic - Français
http://forums.purebasic.com/french/

Procedure avec pointeur vers un string en paramètre

http://forums.purebasic.com/french/viewtopic.php?t=9968

Page 2 sur 2

Re: Procedure avec pointeur vers un string en paramètre

Publié : sam. 05/déc./2009 8:03
par Thyphoon
Tu as raison ! :P

Re: Procedure avec pointeur vers un string en paramètre

Publié : sam. 05/déc./2009 10:32
par GeBonet
@Dobro
Bonjour,
Toujours dans les Iles :lol: Profite en... du moins du soleil !
Dobro a écrit :
Thyphoon a écrit :Un sujet qui pourrait passer dans les tutos !! :D
non !
Personnellement je n'ai pas placé cela comme un "Tuto"... ni prétendu le faire !
Ni même être une confrontation avec qui que ce soit, mais une forme de traiter le problème
qui par ailleurs pourrait encore être simplifié !
Et simplement suffisamment commenté pour qui comprend :wink:
Car c'est transformer une chose "compliqué" en chose "simple"...

Entre autre, la forme que je présente et utilise (les tableaux), éffectivement pourrait faire l'objet d'un Tuto...
Ou entrer en complément des pointeurs comme exemple d'utilisation. Mais éffectivement à faire !
Et c'est une approche qui simplement découle de la lecture de la DOC, mais qui n'a pas d'exemple complet, concret et liant les choses entre elles (causes à effets) !
Je trouve par exemple dans "PureBasic Survival Guide" une plus grande liaison entre le documentaire et l'application de la doc. Malheureusement en anglais. Comme le livre de Kale aussi, mais là c'est le but !

Et c'est d'ailleurs pour cela aussi, du moins je le crois que VOUS avez créer le point [TUTOS] !
et ce bien longtemps avant que je ne connaisse PureBasic (et quand je dis "connaisse", j'entends en avoir la connaissance de son existence :D et non sa "pratique"). Et qui m'aura aidé à accélérer ma modeste compréhension des choses :wink:

Voilà, voilà et bonne continuation ! :lol:

Re: Procedure avec pointeur vers un string en paramètre

Publié : sam. 20/févr./2010 18:13
par Le Soldat Inconnu
Bon, je galère vraiment avec ces histoires

Je souhaite passer une structure avec des textes à une procedure et pouvoir lire chaque texte à partir de la procedure, mais sans les modifier

Code : Tout sélectionner

Structure SkinWindowLanguage
		Title.s
		Item_list.s
		Item_color.s
		Item_action.s
		Item_font_size.s
		bold.s
		Italic.s
		Underline.s
		Font_Name.s
		Font_preview.s
		Draw_item_without_text_if_font_size_is_equal_to_0.s
		Skin_preview.s
		Normal_state.s
		Hot_state.s
		Selected_state.s
		Selected_and_hot_state.s
		Disable_state.s
		Item_position.s
		Browse.s
		Use_state.s
		Reload_image.s
		Error.s
		Normal_state_image_and_item_position_image_are_missing.s
		Image_dont_have_correct_size.s
	EndStructure

ProcedureDLL EditSkinWindowTheme(ThemeDirectory.s, *Language.SkinWindowLanguage, *ActionList.SkinWindowAction, ActionListSize) ; Create a theme to do skinned window
	
	
EndProcedure







;- Test de la librairie
SWL.SkinWindowLanguage
With SWL
	Title.s = "Editer l'apparence"
	Item_list.s = "Liste des objets"
	Item_color.s = "Couleur"
	Item_action.s = "Action"
	Item_font_size.s = "Taille de police"
	bold.s = "Gras"
	Italic.s = "Italique"
	Underline.s = "Souligné"
	Font_Name.s = "Police"
	Font_preview.s = "Aperçu"
	Draw_item_without_text_if_font_size_is_equal_to_0.s = "Si la taille de police est égale à 0, l'objet n'aura pas de texte"
	Skin_preview.s = "Aperçu de l'apparence"
	Normal_state.s = "Etat normal"
	Hot_state.s = "Etat survolé"
	Selected_state.s = "Etat sélectionné"
	Selected_and_hot_state.s = "Etat sélectionné et survolé"
	Disable_state.s = "Etat désactivé"
	Item_position.s = "Position des objets"
	Load_normal_state_image.s = "Charger l'image de l'état normal"
	Load_hot_state_image.s = "Charger l'image de l'état survolé"
	Load_selected_state_image.s = "Charger l'image de l'état sélectionné"
	Load_selected_and_hot_state_image.s = "Charger l'image de l'état sélectionné et survolé"
	Load_disable_state_image.s = "Charger l'image de l'état désactivé"
	Load_item_position_image.s = "Charger l'image de la positon des objets "
	Reload_image.s = "Recharger les images"
	Browse.s = "Parcourir"
	Use_state.s = "Utiliser cet état"
	Reload_image.s = "Recharger les images"
	Error.s = "Erreur"
	Normal_state_image_and_item_position_image_are_missing.s = "L'image de l'état normal et l'image de la position des objets sont manquantes"
	Image_dont_have_correct_size.s = "L'image n'a pas la bonne dimension"
EndWith

EditSkinWindowTheme("Calculette", @SWL, 0, 0) ; Create a theme to do skinned window
Et je n'y arrive pas :cry:

Re: Procedure avec pointeur vers un string en paramètre

Publié : sam. 20/févr./2010 20:18
par Kwai chang caine
Bonjour mon ami soldat

Alors attention, KCC y va faire quelque chose qu'il ose jamais faire...c'est essayer d'aider alors qu'il y connais rien.
Mais pour toi....je me lance

Alors je sais pas si je dit une connerie...surement
Mais j'ai voulu essayer de t'aider, alors j'ai commencé simplement a vouloir faire un debug de la premiere ligne de ta variable structurée
Et la rien n'est revenu 8O
Alors j'm'ai dit que c'etait de ma faute...que j'y comprenais rien comme dab
Mais j'ai lu la doc...et FRED y met un anti-slash dans le WITH, regarde l'exemple de FRED

Code : Tout sélectionner

Exemple: 

  Structure Personne
    Nom$
    Age.l
    Taille.l
  EndStructure

  Ami.Personne
  
  With Ami
    \Nom$ = "Yann"
    \Age   = 30
    \Taille  = 196
    
    Debug \Taille+\Taille
  EndWith
Et quand on met l'anti-slash ça marche 8)
Regarde ta premiere ligne ou j'ai rajouté à ton code l'anti-slash, elle remonte la valeur et celle ou j'ai rien touché rien
Si y'a rien au debut, c'est peut etre deja normal qu'il y ai rien dans la procedure, sans aller plus loin ??? :roll:

J'ai viré l'autre structure dans la procedure car tu ne l'avais pas donné, et raccourci le code pour te montrer ce que je crois avoir trouvé pour commencer :oops:

A mon avis tu le sais deja.....mais bon ... :oops:

Code : Tout sélectionner

Structure SkinWindowLanguage
   Title.s
   Item_list.s
   Item_color.s
   Item_action.s
   Item_font_size.s
   bold.s
   Italic.s
   Underline.s
   Font_Name.s
   Font_preview.s
   Draw_item_without_text_if_font_size_is_equal_to_0.s
   Skin_preview.s
   Normal_state.s
   Hot_state.s
   Selected_state.s
   Selected_and_hot_state.s
   Disable_state.s
   Item_position.s
   Browse.s
   Use_state.s
   Reload_image.s
   Error.s
   Normal_state_image_and_item_position_image_are_missing.s
   Image_dont_have_correct_size.s
EndStructure

ProcedureDLL EditSkinWindowTheme(ThemeDirectory.s, *Language.SkinWindowLanguage, ActionListSize) ; Create a theme to do skinned window
   
   
EndProcedure

;- Test de la librairie
SWL.SkinWindowLanguage

With SWL
   \Title.s = "Editer l'apparence" ; <<<< Avec anti-slash
   Item_list.s = "Liste des objets" ; <<<< Sans anti-slash
EndWith

Debug SWL\Title
Debug SWL\Item_list

EditSkinWindowTheme("Calculette", @SWL, 0) ; Create a theme to do skinned window

Re: Procedure avec pointeur vers un string en paramètre

Publié : sam. 20/févr./2010 20:33
par Kwai chang caine
Bon j'continue dans mon delire, parce que tant qu'a dire des conneries...autant continuer tant qu'on ne m'arrette pas.... :oops:
Et comme ce soir c'est un autoroute :lol:

Voila ça passe dans la procedure....

Code : Tout sélectionner

Structure SkinWindowLanguage
   Title.s
   Item_list.s
   Item_color.s
   Item_action.s
   Item_font_size.s
   bold.s
   Italic.s
   Underline.s
   Font_Name.s
   Font_preview.s
   Draw_item_without_text_if_font_size_is_equal_to_0.s
   Skin_preview.s
   Normal_state.s
   Hot_state.s
   Selected_state.s
   Selected_and_hot_state.s
   Disable_state.s
   Item_position.s
   Browse.s
   Use_state.s
   Reload_image.s
   Error.s
   Normal_state_image_and_item_position_image_are_missing.s
   Image_dont_have_correct_size.s
EndStructure

ProcedureDLL EditSkinWindowTheme(ThemeDirectory.s, *Language.SkinWindowLanguage, ActionListSize) ; Create a theme to do skinned window
 Debug *Language\Title
 Debug *Language\Item_list
EndProcedure

;- Test de la librairie
SWL.SkinWindowLanguage

With SWL
   \Title.s = "Editer l'apparence"
   \Item_list.s = "Liste des objets"
EndWith

Debug SWL\Title
Debug SWL\Item_list
Debug ""

EditSkinWindowTheme("Calculette", @SWL, 0) ; Create a theme to do skinned window

Re: Procedure avec pointeur vers un string en paramètre

Publié : sam. 20/févr./2010 20:35
par Le Soldat Inconnu
ben non, tu as raison, c'est une grosse connerie de ma part d'avoir oublier le "\"

Merci KCC

Re: Procedure avec pointeur vers un string en paramètre

Publié : sam. 20/févr./2010 20:44
par Kwai chang caine
Ouaaah j'sui drolement content d'avoir pu aider un MAITRE 8)
Comme quoi les cours de SROD portent leur benefices

J'ai le palpitant qui palpite...en fait pour toi c'est une "connerie" comme tu dit, pour moi c'etait une epreuve...prendre le courage de repondre....bravant ma peur pour un copain soldat dans la tranchée :wink: .....et pour une fois essayer de ne pas dire de conneries 8)

Si tu as une autre question...compte pas sur moi.....j'ai tellement eu peur que je vais me coucher :lol: :lol: :lol:
Fuseau horaire sur UTC+01:00
Page 2 sur 2

Développé par phpBB® Forum Software © phpBB Limited

Traduction française officielle © Qiaeru