PureBasic

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

Styles appliqués à une fenêtre

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

Page 1 sur 2

Styles appliqués à une fenêtre

Publié : ven. 07/mai/2004 13:51
par Chris
Un petit prog qui donne les styles appliqués à une fenêtre.

Code : Tout sélectionner

;/Constantes Window
Enumeration
  #Window_0
EndEnumeration

;/Constantes Gadget
Enumeration
  #Edit
  #Fnt
  #Btn_Quit
EndEnumeration

#GA_ROOTOWNER = $00003

Structure WINPROPERTIES
  Border.s
  Caption.s
  Child.s
  Childwindow.s
  ClipChildren.s
  ClipSiblings.s
  Disabled.s
  Dlgframe.s
  Group.s
  HScroll.s
  Iconic.s
  Maximize.s
  MaximizeBox.s
  Minimize.s
  MinimizeBox.s
  Overlapped.s
  OverlappedWindow.s
  Popup.s
  PopupWindow.s
  SizeBox.s
  SysMenu.s
  TabStop.s
  ThickFrame.s
  Tiled.s
  TiledWindow.s
  Visible.s
  VScroll.s
EndStructure

NewList Prop.WINPROPERTIES()

CurPos.POINT

Global WinName$,ClassName$,HRoot

Procedure DisplayProperties()
  ClearGadgetItemList(#Edit)
  
  AddGadgetItem(#Edit,-1,"Propriétés :")
  AddGadgetItem(#Edit,-1,"")
  AddGadgetItem(#Edit,-1,"Titre     : "+ WinName$)
  AddGadgetItem(#Edit,-1,"Classe  : "+ ClassName$)
  AddGadgetItem(#Edit,-1,"Handle : "+ Str(HRoot))
  AddGadgetItem(#Edit,-1,"=============================")
  
  AddGadgetItem(#Edit,-1,"Style de la fenêtre :")
  AddGadgetItem(#Edit,-1,"")
  SelectElement(Prop(),0)   : If Prop()\Border           : AddGadgetItem(#Edit,-1,Prop()\Border)           :EndIf
  SelectElement(Prop(),1)   : If Prop()\Caption          : AddGadgetItem(#Edit,-1,Prop()\Caption)          :EndIf
  SelectElement(Prop(),2)   : If Prop()\Child            : AddGadgetItem(#Edit,-1,Prop()\Child)            :EndIf
  SelectElement(Prop(),3)   : If Prop()\Childwindow      : AddGadgetItem(#Edit,-1,Prop()\Childwindow)      :EndIf
  SelectElement(Prop(),4)   : If Prop()\ClipChildren     : AddGadgetItem(#Edit,-1,Prop()\ClipChildren)     :EndIf
  SelectElement(Prop(),5)   : If Prop()\ClipSiblings     : AddGadgetItem(#Edit,-1,Prop()\ClipSiblings)     :EndIf
  SelectElement(Prop(),6)   : If Prop()\Disabled         : AddGadgetItem(#Edit,-1,Prop()\Disabled)         :EndIf
  SelectElement(Prop(),7)   : If Prop()\Dlgframe         : AddGadgetItem(#Edit,-1,Prop()\Dlgframe)         :EndIf
  SelectElement(Prop(),8)   : If Prop()\Group            : AddGadgetItem(#Edit,-1,Prop()\Group)            :EndIf
  SelectElement(Prop(),9)   : If Prop()\HScroll          : AddGadgetItem(#Edit,-1,Prop()\HScroll)          :EndIf
  SelectElement(Prop(),10)  : If Prop()\Iconic           : AddGadgetItem(#Edit,-1,Prop()\Iconic)           :EndIf
  SelectElement(Prop(),11)  : If Prop()\Maximize         : AddGadgetItem(#Edit,-1,Prop()\Maximize)         :EndIf
  SelectElement(Prop(),12)  : If Prop()\MaximizeBox      : AddGadgetItem(#Edit,-1,Prop()\MaximizeBox)      :EndIf
  SelectElement(Prop(),13)  : If Prop()\Minimize         : AddGadgetItem(#Edit,-1,Prop()\Minimize)         :EndIf
  SelectElement(Prop(),14)  : If Prop()\MinimizeBox      : AddGadgetItem(#Edit,-1,Prop()\MinimizeBox)      :EndIf
  SelectElement(Prop(),15)  : If Prop()\Overlapped       : AddGadgetItem(#Edit,-1,Prop()\Overlapped)       :EndIf
  SelectElement(Prop(),16)  : If Prop()\OverlappedWindow : AddGadgetItem(#Edit,-1,Prop()\OverlappedWindow) :EndIf
  SelectElement(Prop(),17)  : If Prop()\Popup            : AddGadgetItem(#Edit,-1,Prop()\Popup)            :EndIf
  SelectElement(Prop(),18)  : If Prop()\PopupWindow      : AddGadgetItem(#Edit,-1,Prop()\PopupWindow)      :EndIf
  SelectElement(Prop(),19)  : If Prop()\SizeBox          : AddGadgetItem(#Edit,-1,Prop()\SizeBox)          :EndIf
  SelectElement(Prop(),20)  : If Prop()\SysMenu          : AddGadgetItem(#Edit,-1,Prop()\SysMenu)          :EndIf
  SelectElement(Prop(),21)  : If Prop()\TabStop          : AddGadgetItem(#Edit,-1,Prop()\TabStop)          :EndIf
  SelectElement(Prop(),22)  : If Prop()\ThickFrame       : AddGadgetItem(#Edit,-1,Prop()\ThickFrame)       :EndIf
  SelectElement(Prop(),23)  : If Prop()\Tiled            : AddGadgetItem(#Edit,-1,Prop()\Tiled)            :EndIf
  SelectElement(Prop(),24)  : If Prop()\TiledWindow      : AddGadgetItem(#Edit,-1,Prop()\TiledWindow)      :EndIf
  SelectElement(Prop(),25)  : If Prop()\Visible          : AddGadgetItem(#Edit,-1,Prop()\Visible)          :EndIf
  SelectElement(Prop(),26)  : If Prop()\VScroll          : AddGadgetItem(#Edit,-1,Prop()\VScroll)          :EndIf
EndProcedure

If OpenWindow(#Window_0, 300, 300, 300, 500, #PB_Window_SystemMenu|#PB_Window_ScreenCentered, "Propriétés",0)
  hWnd = WindowID()
  If CreateGadgetList(hWnd)
    EditorGadget(#Edit,0,0,300,WindowHeight()-55)
    ButtonGadget(#Btn_Quit, 100, WindowHeight()-30, 100, 25, "Quitter")
  EndIf
  
  SetTimer_(hWnd, 1, 10, 0)
  
  Repeat  
    GetCursorPos_(CurPos)
    HObjet = WindowFromPoint_(CurPos\x, CurPos\y)
    HRoot = GetAncestor_(HObjet, #GA_ROOTOWNER)
    WinName$ = Space(128)
    GetWindowText_(HRoot, @WinName$, 128)
    ClassName$ = Space(64)
    GetClassName_(HRoot, @ClassName$, 64)
    
    Style = GetWindowLong_(HRoot, #GWL_STYLE)
    
    Select WaitWindowEvent()
      Case #WM_TIMER
        
        ClearList(Prop())
        AddElement(Prop())
        
        If Style & #WS_BORDER           :Prop()\Border             = "#WS_BORDER"        : EndIf
        If Style & #WS_CAPTION          :Prop()\Caption            = "#WS_CAPTION"           : EndIf
        If Style & #WS_CHILD            :Prop()\Child              = "#WS_CHILD"             : EndIf
        If Style & #WS_CHILDWINDOW      :Prop()\Childwindow        = "#WS_CHILDWINDOW"       : EndIf
        If Style & #WS_CLIPCHILDREN     :Prop()\ClipChildren       = "#WS_CLIPCHILDREN"      : EndIf
        If Style & #WS_CLIPSIBLINGS     :Prop()\ClipSiblings       = "#WS_CLIPSIBLINGS"      : EndIf
        If Style & #WS_DISABLED         :Prop()\Disabled           = "#WS_DISABLED"          : EndIf
        If Style & #WS_DLGFRAME         :Prop()\Dlgframe           = "#WS_DLGFRAME"          : EndIf
        If Style & #WS_GROUP            :Prop()\Group              = "#WS_GROUP"             : EndIf
        If Style & #WS_HSCROLL          :Prop()\HScroll            = "#WS_HSCROLL"           : EndIf
        If Style & #WS_ICONIC           :Prop()\Iconic             = "#WS_ICONIC"            : EndIf
        If Style & #WS_MAXIMIZE         :Prop()\Maximize           = "#WS_MAXIMIZE"          : EndIf
        If Style & #WS_MAXIMIZEBOX      :Prop()\MaximizeBox        = "#WS_MAXIMIZEBOX"       : EndIf
        If Style & #WS_MINIMIZE         :Prop()\Minimize           = "#WS_MINIMIZE"          : EndIf
        If Style & #WS_MINIMIZEBOX      :Prop()\MinimizeBox        = "#WS_MINIMIZEBOX"       : EndIf
        If Style & #WS_OVERLAPPED       :Prop()\Overlapped         = "#WS_OVERLAPPED"        : EndIf
        If Style & #WS_OVERLAPPEDWINDOW :Prop()\OverlappedWindow   = "#WS_OVERLAPPEDWINDOW"  : EndIf
        If Style & #WS_POPUP            :Prop()\Popup              = "#WS_POPUP"             : EndIf
        If Style & #WS_POPUPWINDOW      :Prop()\PopupWindow        = "#WS_POPUPWINDOW"       : EndIf
        If Style & #WS_SIZEBOX          :Prop()\SizeBox            = "#WS_SIZEBOX"           : EndIf
        If Style & #WS_SYSMENU          :Prop()\SysMenu            = "#WS_SYSMENU"           : EndIf
        If Style & #WS_TABSTOP          :Prop()\TabStop            = "#WS_TABSTOP"           : EndIf
        If Style & #WS_THICKFRAME       :Prop()\ThickFrame         = "#WS_THICKFRAME"        : EndIf
        If Style & #WS_TILED            :Prop()\Tiled              = "#WS_TILED"             : EndIf
        If Style & #WS_TILEDWINDOW      :Prop()\TiledWindow        = "#WS_TILEDWINDOW"       : EndIf
        If Style & #WS_VISIBLE          :Prop()\Visible            = "#WS_VISIBLE"           : EndIf
        If Style & #WS_VSCROLL          :Prop()\VScroll            = "#WS_VSCROLL"           : EndIf
        
        If HRoot <> hTmp : hTmp = HRoot
          DisplayProperties()
        EndIf
        
      Case #PB_EventGadget : Select EventGadgetID() : Case #Btn_Quit : quit = 1 : EndSelect
      Case #PB_EventCloseWindow : quit = 1
    EndSelect
    
  Until quit = 1
  
  End
EndIf
:roll:

Chris :)

Publié : sam. 08/mai/2004 8:57
par Lukky
Super !

JL

Publié : sam. 08/mai/2004 11:57
par Flype
un petit couteau suisse ( avec une seule lame mais bon )

ceux qui connaissent l'Amiga, il y avait ( il y a ) un programme génial qui s'appelle SCOUT.
Véritable couteau suisse du programmeur, avec ce prog, rien de l'OS ne lui échappait...
Il y a aussi SnoopDOS mais c une autre histoire...

ton truc m'y fait penser un peu, me rappelant combien un prog dans
ce genre serait trop utile aux programmeurs bidouilleurs et curieux
que nous sommes :idea:

Publié : sam. 08/mai/2004 12:12
par Chris
J'avais déjà fait un petit prog dans ce genre, il y a un moment. Ca s'appelle "Classes".
Ca te retrouve le handle de la fenêtre, son nom de classe, sa taille, sa position, son titre, les mêmes infos pour le parent direct, etc...

Il est sur la petite page ou je met tous mes bouts de code. (Bouton WWW en bas des messages).

C'était la première lame du couteau suisse :lol:

Chris :)

Publié : sam. 08/mai/2004 12:52
par Chris
Je commence à préparer un autre utilitaire, un peu dans le style de celui dont le code est posté au dessus.

Celui-ci, devrait donner les attributs de chaque objet pointé par le curseur de la souris. Je ne sais pas trop, pour le moment, comment m'y prendre pour stocker les propriétés, alors je vais les mettre dans des datas. Si ça fonctionne, je les mettrais peut-être dans un fichier, ce qui permettra les mises à jour.

Si ca fonctionne, le programme sera un mix des deux que j'ai déjà fait, c'est à dire qu'il donnera les renseignements de classe, taille, position, attributs, coordonnées du parents, etc...

Alors si quelqu'un à des idées de renseignements que pourrait donner ce genre de soft, ne vous génez pas.

Wait & See ;)

PS : Merci de ne pas demander des fonctions qui existent dans un des deux précédents :lol:


Chris :)

Publié : sam. 18/août/2007 23:01
par Ollivier
Le couteau suisse de Chris en PB 4.10:

Code : Tout sélectionner

;/Constantes Window 
Enumeration 
  #Window_0 
EndEnumeration 

;/Constantes Gadget 
Enumeration 
  #Edit 
  #Fnt 
  #Btn_Quit 
EndEnumeration 

#GA_ROOTOWNER = $00003 

Structure WINPROPERTIES 
  Border.s 
  Caption.s 
  Child.s 
  Childwindow.s 
  ClipChildren.s 
  ClipSiblings.s 
  Disabled.s 
  Dlgframe.s 
  Group.s 
  HScroll.s 
  Iconic.s 
  Maximize.s 
  MaximizeBox.s 
  Minimize.s 
  MinimizeBox.s 
  Overlapped.s 
  OverlappedWindow.s 
  Popup.s 
  PopupWindow.s 
  SizeBox.s 
  SysMenu.s 
  TabStop.s 
  ThickFrame.s 
  Tiled.s 
  TiledWindow.s 
  Visible.s 
  VScroll.s 
EndStructure 

Global NewList Prop.WINPROPERTIES() 

CurPos.POINT 

Global WinName$,ClassName$,HRoot 

Procedure DisplayProperties() 
  ClearGadgetItemList(#Edit) 
  
  AddGadgetItem(#Edit,-1,"Propriétés :") 
  AddGadgetItem(#Edit,-1,"") 
  AddGadgetItem(#Edit,-1,"Titre     : "+ WinName$) 
  AddGadgetItem(#Edit,-1,"Classe  : "+ ClassName$) 
  AddGadgetItem(#Edit,-1,"Handle : "+ Str(HRoot)) 
  AddGadgetItem(#Edit,-1,"=============================") 
  
  AddGadgetItem(#Edit,-1,"Style de la fenêtre :") 
  AddGadgetItem(#Edit,-1,"") 
  SelectElement(Prop(),0)   : If Prop()\Border           : AddGadgetItem(#Edit,-1,Prop()\Border)           :EndIf 
  SelectElement(Prop(),1)   : If Prop()\Caption          : AddGadgetItem(#Edit,-1,Prop()\Caption)          :EndIf 
  SelectElement(Prop(),2)   : If Prop()\Child            : AddGadgetItem(#Edit,-1,Prop()\Child)            :EndIf 
  SelectElement(Prop(),3)   : If Prop()\Childwindow      : AddGadgetItem(#Edit,-1,Prop()\Childwindow)      :EndIf 
  SelectElement(Prop(),4)   : If Prop()\ClipChildren     : AddGadgetItem(#Edit,-1,Prop()\ClipChildren)     :EndIf 
  SelectElement(Prop(),5)   : If Prop()\ClipSiblings     : AddGadgetItem(#Edit,-1,Prop()\ClipSiblings)     :EndIf 
  SelectElement(Prop(),6)   : If Prop()\Disabled         : AddGadgetItem(#Edit,-1,Prop()\Disabled)         :EndIf 
  SelectElement(Prop(),7)   : If Prop()\Dlgframe         : AddGadgetItem(#Edit,-1,Prop()\Dlgframe)         :EndIf 
  SelectElement(Prop(),8)   : If Prop()\Group            : AddGadgetItem(#Edit,-1,Prop()\Group)            :EndIf 
  SelectElement(Prop(),9)   : If Prop()\HScroll          : AddGadgetItem(#Edit,-1,Prop()\HScroll)          :EndIf 
  SelectElement(Prop(),10)  : If Prop()\Iconic           : AddGadgetItem(#Edit,-1,Prop()\Iconic)           :EndIf 
  SelectElement(Prop(),11)  : If Prop()\Maximize         : AddGadgetItem(#Edit,-1,Prop()\Maximize)         :EndIf 
  SelectElement(Prop(),12)  : If Prop()\MaximizeBox      : AddGadgetItem(#Edit,-1,Prop()\MaximizeBox)      :EndIf 
  SelectElement(Prop(),13)  : If Prop()\Minimize         : AddGadgetItem(#Edit,-1,Prop()\Minimize)         :EndIf 
  SelectElement(Prop(),14)  : If Prop()\MinimizeBox      : AddGadgetItem(#Edit,-1,Prop()\MinimizeBox)      :EndIf 
  SelectElement(Prop(),15)  : If Prop()\Overlapped       : AddGadgetItem(#Edit,-1,Prop()\Overlapped)       :EndIf 
  SelectElement(Prop(),16)  : If Prop()\OverlappedWindow : AddGadgetItem(#Edit,-1,Prop()\OverlappedWindow) :EndIf 
  SelectElement(Prop(),17)  : If Prop()\Popup            : AddGadgetItem(#Edit,-1,Prop()\Popup)            :EndIf 
  SelectElement(Prop(),18)  : If Prop()\PopupWindow      : AddGadgetItem(#Edit,-1,Prop()\PopupWindow)      :EndIf 
  SelectElement(Prop(),19)  : If Prop()\SizeBox          : AddGadgetItem(#Edit,-1,Prop()\SizeBox)          :EndIf 
  SelectElement(Prop(),20)  : If Prop()\SysMenu          : AddGadgetItem(#Edit,-1,Prop()\SysMenu)          :EndIf 
  SelectElement(Prop(),21)  : If Prop()\TabStop          : AddGadgetItem(#Edit,-1,Prop()\TabStop)          :EndIf 
  SelectElement(Prop(),22)  : If Prop()\ThickFrame       : AddGadgetItem(#Edit,-1,Prop()\ThickFrame)       :EndIf 
  SelectElement(Prop(),23)  : If Prop()\Tiled            : AddGadgetItem(#Edit,-1,Prop()\Tiled)            :EndIf 
  SelectElement(Prop(),24)  : If Prop()\TiledWindow      : AddGadgetItem(#Edit,-1,Prop()\TiledWindow)      :EndIf 
  SelectElement(Prop(),25)  : If Prop()\Visible          : AddGadgetItem(#Edit,-1,Prop()\Visible)          :EndIf 
  SelectElement(Prop(),26)  : If Prop()\VScroll          : AddGadgetItem(#Edit,-1,Prop()\VScroll)          :EndIf 
EndProcedure 

If OpenWindow(#Window_0, 300, 300, 300, 500, "Propriétés", #PB_Window_SystemMenu|#PB_Window_ScreenCentered,0) 
  hWnd = WindowID(#Window_0) 
  If CreateGadgetList(hWnd) 
    EditorGadget(#Edit,0,0,300,WindowHeight(#Window_0)-55) 
    ButtonGadget(#Btn_Quit, 100, WindowHeight(#Window_0)-30, 100, 25, "Quitter") 
  EndIf 
  
  SetTimer_(hWnd, 1, 10, 0) 
  
  Repeat  
    GetCursorPos_(CurPos) 
    HObjet = WindowFromPoint_(CurPos\x, CurPos\y) 
    HRoot = GetAncestor_(HObjet, #GA_ROOTOWNER) 
    WinName$ = Space(128) 
    GetWindowText_(HRoot, @WinName$, 128) 
    ClassName$ = Space(64) 
    GetClassName_(HRoot, @ClassName$, 64) 
    
    Style = GetWindowLong_(HRoot, #GWL_STYLE) 
    
    Select WaitWindowEvent() 
      Case #WM_TIMER 
        
        ClearList(Prop()) 
        AddElement(Prop()) 
        
        If Style & #WS_BORDER           :Prop()\Border             = "#WS_BORDER"        : EndIf 
        If Style & #WS_CAPTION          :Prop()\Caption            = "#WS_CAPTION"           : EndIf 
        If Style & #WS_CHILD            :Prop()\Child              = "#WS_CHILD"             : EndIf 
        If Style & #WS_CHILDWINDOW      :Prop()\Childwindow        = "#WS_CHILDWINDOW"       : EndIf 
        If Style & #WS_CLIPCHILDREN     :Prop()\ClipChildren       = "#WS_CLIPCHILDREN"      : EndIf 
        If Style & #WS_CLIPSIBLINGS     :Prop()\ClipSiblings       = "#WS_CLIPSIBLINGS"      : EndIf 
        If Style & #WS_DISABLED         :Prop()\Disabled           = "#WS_DISABLED"          : EndIf 
        If Style & #WS_DLGFRAME         :Prop()\Dlgframe           = "#WS_DLGFRAME"          : EndIf 
        If Style & #WS_GROUP            :Prop()\Group              = "#WS_GROUP"             : EndIf 
        If Style & #WS_HSCROLL          :Prop()\HScroll            = "#WS_HSCROLL"           : EndIf 
        If Style & #WS_ICONIC           :Prop()\Iconic             = "#WS_ICONIC"            : EndIf 
        If Style & #WS_MAXIMIZE         :Prop()\Maximize           = "#WS_MAXIMIZE"          : EndIf 
        If Style & #WS_MAXIMIZEBOX      :Prop()\MaximizeBox        = "#WS_MAXIMIZEBOX"       : EndIf 
        If Style & #WS_MINIMIZE         :Prop()\Minimize           = "#WS_MINIMIZE"          : EndIf 
        If Style & #WS_MINIMIZEBOX      :Prop()\MinimizeBox        = "#WS_MINIMIZEBOX"       : EndIf 
        If Style & #WS_OVERLAPPED       :Prop()\Overlapped         = "#WS_OVERLAPPED"        : EndIf 
        If Style & #WS_OVERLAPPEDWINDOW :Prop()\OverlappedWindow   = "#WS_OVERLAPPEDWINDOW"  : EndIf 
        If Style & #WS_POPUP            :Prop()\Popup              = "#WS_POPUP"             : EndIf 
        If Style & #WS_POPUPWINDOW      :Prop()\PopupWindow        = "#WS_POPUPWINDOW"       : EndIf 
        If Style & #WS_SIZEBOX          :Prop()\SizeBox            = "#WS_SIZEBOX"           : EndIf 
        If Style & #WS_SYSMENU          :Prop()\SysMenu            = "#WS_SYSMENU"           : EndIf 
        If Style & #WS_TABSTOP          :Prop()\TabStop            = "#WS_TABSTOP"           : EndIf 
        If Style & #WS_THICKFRAME       :Prop()\ThickFrame         = "#WS_THICKFRAME"        : EndIf 
        If Style & #WS_TILED            :Prop()\Tiled              = "#WS_TILED"             : EndIf 
        If Style & #WS_TILEDWINDOW      :Prop()\TiledWindow        = "#WS_TILEDWINDOW"       : EndIf 
        If Style & #WS_VISIBLE          :Prop()\Visible            = "#WS_VISIBLE"           : EndIf 
        If Style & #WS_VSCROLL          :Prop()\VScroll            = "#WS_VSCROLL"           : EndIf 
        
        If HRoot <> hTmp : hTmp = HRoot 
          DisplayProperties() 
        EndIf 
        
      Case #PB_Event_Gadget : Select EventGadget() : Case #Btn_Quit : quit = 1 : EndSelect 
      Case #PB_Event_CloseWindow : quit = 1 
    EndSelect 
    
  Until quit = 1 
  
  End 
EndIf

Publié : sam. 18/août/2007 23:19
par Chris
Tiens! Je me souvenais même pas d'avoir fait ce truc. :lol:

Publié : sam. 18/août/2007 23:39
par Ollivier
C'est un joli petit morceau. :D

Publié : dim. 19/août/2007 10:52
par Jeff
logiciel WinDowse comme couteau suisse pour vos applications et avoir plein d'infos.

@+

JF

Publié : mer. 30/janv./2008 11:12
par Kwai chang caine
Pourquoi faut toujours que chez moi ça marche pas :?
J'ai un ruban rouge à la ligne 64 dans la version 4.10 de OLLIVIER, la 3.94 de maitre CHRIS marche.

Code : Tout sélectionner

"The linked list have a current element"
Je suis qous W2000 c'est peut etre ça :roll:

Publié : mer. 30/janv./2008 12:32
par Ulix
Idem ! Même erreur, même numéro de ligne, mais sous XP2 . :twisted:

Publié : mer. 30/janv./2008 12:32
par beauregard
Kwai chang caine a écrit :J'ai un ruban rouge à la ligne 64 dans la version 4.10 de OLLIVIER
même problème sur winXp :(

Publié : mer. 30/janv./2008 12:43
par nico
Il faut mettre l'indice 0 pour toutes les commandes SelectElement

Publié : mer. 30/janv./2008 13:15
par Ar-S
Jeff a écrit :logiciel WinDowse comme couteau suisse pour vos applications et avoir plein d'infos.

@+

JF
WinDowse est magnifique

Publié : jeu. 31/janv./2008 14:04
par beauregard
nico a écrit :Il faut mettre l'indice 0 pour toutes les commandes SelectElement
merci!
Fuseau horaire sur UTC+01:00
Page 1 sur 2

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

Traduction française officielle © Qiaeru