j'utilise la version purebasic 5.70 beta 2 en 64 bits.
L'erreur de syntaxe arrive après des ajouts d'objets ou modification des propriétés de la fenetre.
La ligne pointé est la déclaration des variables globales des gadgets utilisés.
C'est très bizare et je ne trouve pas d'erreur à la lecture de la ligne pointée.
Depuis, j'ai reconstruit l'interface.
Code : Tout sélectionner
; Form Designer for Purebasic - 5.70
; Warning: this file uses a strict syntax, if you edit it, make sure to respect the Form Designer limitation or it won't be opened again.
;
; This code is automatically generated by the FormDesigner.
; Manual modification is possible to adjust existing commands, but anything else will be dropped when the code is compiled.
; Event procedures needs to be put in another source file.
;
Global Window_Interface_Principale
Global Button_Quitter, Panel_MAIN, Combo_Fournisseur_Echéance, Saisie_Fournisseur, Frame_Saisie_Fournisseur, ListIcon_Correspondances, Button_Supprimer_Forunisseur, Frame_Saisie_Correspondances, String_correspondances_Description, Button_Corriger_Fournisseur, Button_Ajouter_Fournisseur, String_Correspondance_Lot, Button_Supprimer_Correspondances, Button_Corriger_Correspondances, Button_Ajouter_Correspondances, ListIcon_Fournisseurs, ListIcon_LISTE, Canvas_0
Procedure OpenWindow_Interface_Principale(x = 0, y = 0, width = 1138, height = 758)
Window_Interface_Principale = OpenWindow(#PB_Any, x, y, width, height, "Gestion des budgets", #PB_Window_SystemMenu | #PB_Window_TitleBar | #PB_Window_Tool | #PB_Window_ScreenCentered | #PB_Window_WindowCentered | #PB_Window_Maximize)
SetWindowColor(Window_Interface_Principale, RGB(0,128,192))
Button_Quitter = ButtonGadget(#PB_Any, 1034, 730, 100, 25, "Quitter")
Panel_MAIN = PanelGadget(#PB_Any, 0, 0, 1138, 726)
AddGadgetItem(Panel_MAIN, -1, "Configuration")
Combo_Fournisseur_Echéance = ComboBoxGadget(#PB_Any, 682, 426, 142, 25, #PB_ComboBox_Editable)
Saisie_Fournisseur = StringGadget(#PB_Any, 428, 424, 245, 25, "")
Frame_Saisie_Fournisseur = FrameGadget(#PB_Any, 420, 404, 408, 55, "Saisie_Fournisseurs", #PB_Frame_Single | #PB_Frame_Double)
ListIcon_Correspondances = ListIconGadget(#PB_Any, 6, 14, 403, 385, "Descriptions", 300, #PB_ListIcon_GridLines | #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)
AddGadgetColumn(ListIcon_Correspondances, 1, "N° de lot", 100)
Button_Supprimer_Forunisseur = ButtonGadget(#PB_Any, 528, 464, 100, 20, "Supprimer", #PB_Button_Toggle)
Frame_Saisie_Correspondances = FrameGadget(#PB_Any, 6, 406, 402, 55, "Saisie des Correspondances", #PB_Frame_Single | #PB_Frame_Double)
String_correspondances_Description = StringGadget(#PB_Any, 14, 428, 320, 25, "")
Button_Corriger_Fournisseur = ButtonGadget(#PB_Any, 634, 464, 100, 20, "Corriger")
Button_Ajouter_Fournisseur = ButtonGadget(#PB_Any, 424, 464, 100, 20, "Ajouter", #PB_Button_Default | #PB_Button_Toggle)
String_Correspondance_Lot = StringGadget(#PB_Any, 338, 428, 60, 25, "")
Button_Supprimer_Correspondances = ButtonGadget(#PB_Any, 220, 466, 100, 20, "Supprimer", #PB_Button_Toggle)
Button_Corriger_Correspondances = ButtonGadget(#PB_Any, 114, 466, 100, 20, "Corriger")
Button_Ajouter_Correspondances = ButtonGadget(#PB_Any, 8, 466, 100, 20, "Ajouter", #PB_Button_Default | #PB_Button_Toggle)
ListIcon_Fournisseurs = ListIconGadget(#PB_Any, 420, 16, 408, 384, "Noms", 200, #PB_ListIcon_GridLines | #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)
AddGadgetColumn(ListIcon_Fournisseurs, 1, "Echéance à ", 100)
AddGadgetItem(Panel_MAIN, -1, "Saisie", 0, 1)
ListIcon_LISTE = ListIconGadget(#PB_Any, 4, 4, 1134, 374, "DAI", 100, #PB_ListIcon_GridLines | #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)
AddGadgetColumn(ListIcon_LISTE, 1, "DAVI", 100)
AddGadgetColumn(ListIcon_LISTE, 2, "Projet", 100)
AddGadgetColumn(ListIcon_LISTE, 3, "Janvier", 100)
AddGadgetColumn(ListIcon_LISTE, 4, "Fevrier", 100)
AddGadgetColumn(ListIcon_LISTE, 5, "Mars", 100)
AddGadgetColumn(ListIcon_LISTE, 6, "Avril", 100)
AddGadgetColumn(ListIcon_LISTE, 7, "Mai", 100)
AddGadgetColumn(ListIcon_LISTE, 8, "Juin", 100)
AddGadgetColumn(ListIcon_LISTE, 9, "Juillet", 100)
AddGadgetColumn(ListIcon_LISTE, 10, "Aout", 100)
AddGadgetColumn(ListIcon_LISTE, 11, "Sept", 100)
AddGadgetColumn(ListIcon_LISTE, 12, "Oct", 100)
AddGadgetColumn(ListIcon_LISTE, 13, "Nov", 100)
AddGadgetColumn(ListIcon_LISTE, 14, "Dec", 100)
SetGadgetColor(ListIcon_LISTE, #PB_Gadget_FrontColor,RGB(255,255,255))
SetGadgetColor(ListIcon_LISTE, #PB_Gadget_BackColor,RGB(128,128,255))
AddGadgetItem(Panel_MAIN, -1, "Graphe", 0, 2)
Canvas_0 = CanvasGadget(#PB_Any, 0, 0, 1136, 700, #PB_Canvas_Border | #PB_Canvas_ClipMouse | #PB_Canvas_Keyboard | #PB_Canvas_DrawFocus)
AddGadgetItem(Panel_MAIN, -1, "Remerciements", 0, 3)
CloseGadgetList()
EndProcedure
Bien sur, je suis en cours de création de l'interface.