PureBasic Forums - English

Code: Select all

	 
   
		 ; popup menu
		 WritePreferenceString("1","Open")
		 WritePreferenceString("2","Save_as")
		 WritePreferenceString("3","Save")
		 WritePreferenceString("4","Ajouter un onglet") Add a mitre???
		 WritePreferenceString("5","Retirer l'onglet")  remove mitre???
		 WritePreferenceString("6","Comment selection")
		 WritePreferenceString("7","Uncomment selection")
		 WritePreferenceString("8","Cut")
		 WritePreferenceString("9","Copy")
		 WritePreferenceString("10","Paste")
		 WritePreferenceString("11","Undo")
		 WritePreferenceString("12","Redo")
		 WritePreferenceString("13","Fold")
		 WritePreferenceString("14","Fold All")
		 WritePreferenceString("15","Unfold All")
		 WritePreferenceString("16","Compile")
		 WritePreferenceString("17","Compile/debugger")
		 WritePreferenceString("18","Compile/executable")
		 WritePreferenceString("19","Create Exe")
		 WritePreferenceString("20","create ASM")
		 
		 ; menu
		 WritePreferenceString("21","File")
		 WritePreferenceString("22","New")
		 WritePreferenceString("23","Open")
		 WritePreferenceString("24","Enregistrer") ??? Record???
		 WritePreferenceString("25","Enregistrer sous") ??Record Under??
		 WritePreferenceString("26","Ajouter un onglet") ??Mitre?
		 WritePreferenceString("27","Retirer l'onglet")	???
		 WritePreferenceString("28","Search")
		 WritePreferenceString("29","Folding")
		 WritePreferenceString("30","Fold all")
		 WritePreferenceString("31","Unfold all")
		 WritePreferenceString("32","Project")
		 WritePreferenceString("33","Project Options")
		 WritePreferenceString("34","Compile/Executable")
		 WritePreferenceString("35","Compile/Debugger")
		 WritePreferenceString("36","create exe")
		 WritePreferenceString("37","create asm")
		 WritePreferenceString("38","Tools")
		 WritePreferenceString("39","Convert")
		 WritePreferenceString("40","Converter ")
		 WritePreferenceString("41","Déblocker")       ???
		 WritePreferenceString("42","DéPuncher ")     ???
		 WritePreferenceString("43","Purebasic Help")
		 WritePreferenceString("44","Help")
		 WritePreferenceString("45","Help ext")        ???
		 WritePreferenceString("46","EPB Help")
		 WritePreferenceString("47","Update EPB?")   
		 WritePreferenceString("48","File not saved") ????
		 WritePreferenceString("49","Modifications will be Lost.")
		 WritePreferenceString("50","Save file?")
		 WritePreferenceString("51","Attempt conversion to V4.60") ???
		 WritePreferenceString("52","N'appliquez JAMAIS cette Algo 2 fois de suite !! ")
		 WritePreferenceString("53","file not saved") ???
		 WritePreferenceString("54","Modifications will be lost..")
		 WritePreferenceString("55","Warning! ")
		 WritePreferenceString("56","A newer version exists")
		 WritePreferenceString("57","Do you want to download it?")
		 WritePreferenceString("58","You have the current Version")
		 WritePreferenceString("59","Info")
		 WritePreferenceString("60","All occurrences were found.")
		 WritePreferenceString("61","All occurrences were replaced .")
		 WritePreferenceString("62","Errer ")
		 WritePreferenceString("63","It is necessary to define the path in menu") ??? 
		 WritePreferenceString("64","Project/Project Options")
		 WritePreferenceString("65","Conversion Finished")
		 WritePreferenceString("65","Additional manual edits will be required.")
		 WritePreferenceString("66","Which Image(s)")
		 WritePreferenceString("67","Which Sound(s)")
		 WritePreferenceString("68","Save")
		 
		 
		 
		 
		 
		 ; preferences: color options
		 WritePreferenceString("100","Compile Options")   
		 WritePreferenceString("101","Format of exe")   
		 WritePreferenceString("102","Enable inline assembler")   ???
		 WritePreferenceString("103","Executable thread safe")
		 WritePreferenceString("104","Executable unicode")
		 WritePreferenceString("105","Enable XP themes")
		 WritePreferenceString("105","Request Vista admin mode")
		 WritePreferenceString("106","Request Vista user mode")
		 WritePreferenceString("107","Tab space count ")		???
		 WritePreferenceString("108","Size of real tabs")		???
		 WritePreferenceString("109","Enable real tabs")
		 WritePreferenceString("110","Enable Show Tabs")
		 WritePreferenceString("111","Large Cursor")
		 WritePreferenceString("112","Under System")		???
		 WritePreferenceString("113","Editor Colors")
		 WritePreferenceString("114","Define Colors")
		 WritePreferenceString("115","Basic Colors")
		 WritePreferenceString("116","Color of Comments")
		 WritePreferenceString("117","Color of Strings")
		 WritePreferenceString("118","Color of Figures")
		 WritePreferenceString("119","Color of Procedures")
		 WritePreferenceString("120","Color of Variable Types")
		 WritePreferenceString("121","Color of Constants")
		 WritePreferenceString("122","Color of APIs")			???
		 WritePreferenceString("123","Color Debugger commands")
		 WritePreferenceString("124","Color of Hexadecimal")
		 WritePreferenceString("125","Color of Binary")
		 WritePreferenceString("126","Color of Numbers")
		 WritePreferenceString("127","Color Fond Procedure")	???fond???
		 WritePreferenceString("128","Gras")				 ???
		 WritePreferenceString("129","Color of Text")
		 WritePreferenceString("130","Color of Active Line")  ???
		 WritePreferenceString("131","Color of Cursor")
		 WritePreferenceString("132","Color of selected block")
		 WritePreferenceString("133","Color of Number Line")
		 WritePreferenceString("134","Save Style")				???
		 WritePreferenceString("135","Save Current Style")		???
		 WritePreferenceString("136","File Paths")					???
		 WritePreferenceString("137","Warning ")				???
		 WritePreferenceString("138","File Path to PBcompiler.exe, 32 bits")
		 WritePreferenceString("139","File Path to PBcompiler.exe, 64 bits")
		 WritePreferenceString("140","File Path for .mp3 or .wav")
		 WritePreferenceString("141","Turn on Sound")		???
		 WritePreferenceString("142","Definition of Paths")	???
		 WritePreferenceString("143","Path for 32-bit Compiler")
		 WritePreferenceString("144","Path for 64-bit Compiler")
		 WritePreferenceString("145","Activ")	???
		 WritePreferenceString("146","Checkbox to enable 64-bit Compiler")
		 WritePreferenceString("147","le Compilateur 64 permet de generer un executable en plus de l'executable 32 bits ") ???
		 WritePreferenceString("148","Path to End-of-Compilation Sound ") ???
		 WritePreferenceString("149","Alias")
		 WritePreferenceString("150","PureBasic Functions ")
		 WritePreferenceString("151","Enable Alias")
		 WritePreferenceString("152","Load Alias List")
		 WritePreferenceString("153","Save Alias List")	???
		 WritePreferenceString("154","Update EPB")
		 WritePreferenceString("155","Write parameters and Update EPB")
		 WritePreferenceString("156","When exiting with X, parameters are saved ")
		 WritePreferenceString("157","But, EPB restart will be required to see changes")
		 WritePreferenceString("158","At least one compiler must be enabled")
		 WritePreferenceString("159","Or is the compiler 32 bits ?")
		 WritePreferenceString("160","Choose an icon")
		 WritePreferenceString("161","Or are the files PB ?")
		 WritePreferenceString("162","Or is the compiler 64 bits ?")
		 WritePreferenceString("163","Play a Sound at end of compilation  ?")
		 WritePreferenceString("164","Save Alias List")
		 WritePreferenceString("165","Load Alias List")
		 WritePreferenceString("166","Save the Current Style")
		 WritePreferenceString("167","Load Style")
	  

Code: Select all

WritePreferenceString ("1", "Open")
         WritePreferenceString ("2", "save as")
         WritePreferenceString ("3", "save")
         WritePreferenceString ("4", "Add Tab")
         WritePreferenceString ("5", "Remove tab")
         WritePreferenceString ("6", "Comment selected")
         WritePreferenceString ("7", "Uncomment selected")
         WritePreferenceString ("8", "Cut")
         WritePreferenceString ("9", "Copy")
         WritePreferenceString ("10", "Paste")
         WritePreferenceString ("11", "Undo")
         WritePreferenceString ("12", "Redo")
         WritePreferenceString ("13", "Fold")
         WritePreferenceString ("14", "Fold all")
         WritePreferenceString ("15", "Expand All")
         WritePreferenceString ("16", "Compile")
         WritePreferenceString ("17", "Compiler / Debugger")
         WritePreferenceString ("18", "Compile / Run")
         WritePreferenceString ("19", "Create Exe")
         WritePreferenceString ("20", "Create an ASM")
         
         ; Menu
         WritePreferenceString ("21", "File")
         WritePreferenceString ("22", "New")
         WritePreferenceString ("23", "Open")
         WritePreferenceString ("24", "Save")
         WritePreferenceString ("25", "Save As")
         WritePreferenceString ("26", "Add Tab")
         WritePreferenceString ("27", "Remove tab")
         WritePreferenceString ("28", "Search")
         WritePreferenceString ("29", "Fold")
         WritePreferenceString ("30", "Fold all")
         WritePreferenceString ("31", "Unfold all")
         WritePreferenceString ("32", "Project")
         WritePreferenceString ("33", "Project Option")
         WritePreferenceString ("34", "Compile / Run")
         WritePreferenceString ("35", "Compiler / Debugger")
         WritePreferenceString ("36", "Create exe")
         WritePreferenceString ("37", "Create asm")
         WritePreferenceString ("38", "Tools")
         WritePreferenceString ("39", "Convert")
         WritePreferenceString ("40", "converter")
         WritePreferenceString ("41", "Deblock") ;I have no idea what this is
         WritePreferenceString ("42", "DéPuncher") ;I have no idea what this is
         WritePreferenceString ("43", "Purebasic Help")
         WritePreferenceString ("44", "Help")
         WritePreferenceString ("45", "Help ext")
         WritePreferenceString ("46", "About EPB")
         WritePreferenceString ("47", "update EPB?")
         WritePreferenceString ("48", "This listing has not been saved")
         WritePreferenceString ("49", "The changes will be lost.")
         WritePreferenceString ("50", "Do you want to save?")
         WritePreferenceString ("51", "We will try to convert to v4.60")
         WritePreferenceString ("52", "NEVER run the Algorithm twice in a row!")
         WritePreferenceString ("53", "This listing has not been saved")
         WritePreferenceString ("54", "The changes will be lost ..")
         WritePreferenceString ("55", "Warning!")
         WritePreferenceString ("56", "A newer version exists")
         WritePreferenceString ("57", "Do you want to download?")
         WritePreferenceString ("58", "You already have the latest version")
         WritePreferenceString ("59", "Info")
         WritePreferenceString ("60", "All occurrences were found.")
         WritePreferenceString ("61", "All occurrences have been replaced.")
         WritePreferenceString ("62", "Error")
         WritePreferenceString ("63", "We must define the paths in menu")
         WritePreferenceString ("64", "Project / Project option")
         WritePreferenceString ("65", "Conversion Done")
         WritePreferenceString ("65", "There may be other changes to do by hand ..")
         WritePreferenceString ("66", "What image (s)")
         WritePreferenceString ("67", "What sound (s)")
         WritePreferenceString ("68", "Save")
         WritePreferenceString ("69", "Create Scr")
         WritePreferenceString ("70", "Create Scr")
         
         
         
         
         , Preferably from option_couleurs
         WritePreferenceString ("100", "Options compilation")
         WritePreferenceString ("101", "Format exe")
         WritePreferenceString ("102", "Enable inline assembly")
         WritePreferenceString ("103", "Executable thread safe")
         WritePreferenceString ("104", "Executable unicode")
         WritePreferenceString ("105", "Enable XP themes")
         WritePreferenceString ("105", "Ask the admin mode vista")
         WritePreferenceString ("106", "Ask the vista user mode")
         WritePreferenceString ("107", "Number of spaces for tab")
         WritePreferenceString ("108", "Actual Size Tabs")
         WritePreferenceString ("109", "Enable tabs real")
         WritePreferenceString ("110", "Enable Tab Guide")
         WritePreferenceString ("111", "Large Cursor")
         WritePreferenceString ("112", "On System")
         WritePreferenceString ("113", "color");Colour in British English
         WritePreferenceString ("114", "Set the Colour");Colour in British English
         WritePreferenceString ("115", "Basic Color");Colour in British English
         WritePreferenceString ("116", "Comment Color");Colour in British English
         WritePreferenceString ("117", "Strings Color");Colour in British English
         WritePreferenceString ("118", "Numeric Color");Colour in British English
         WritePreferenceString ("119", "Procedures Color ");Colour in British English
         WritePreferenceString ("120", "Variable Types Color");Colour in British English
         WritePreferenceString ("121", "Constants Color ");Colour in British English
         WritePreferenceString ("122", "Colours of Api's");Colour in British English
         WritePreferenceString ("123", "Color Control Debugger");Colour in British English
         WritePreferenceString ("124", "Color Hexadecimal");Colour in British English
         WritePreferenceString ("125", "Binary Color");Colour in British English
         WritePreferenceString ("126", "Color Pointer")
         WritePreferenceString ("127", "Procedure Background Color");Colour in British English
         WritePreferenceString ("128", "Bold")
         WritePreferenceString ("129", "text color") ;Colour in British English
         WritePreferenceString ("130", "Selected Line color");Colour in British English
         WritePreferenceString ("131", "Cursor Color");Colour in British English
         WritePreferenceString ("132", "Selection block Color");Colour in British English
         WritePreferenceString ("133", "line number Color");Colour in British English
         WritePreferenceString ("134", "Load a Style")
         WritePreferenceString ("135", "Save Current Style")
         WritePreferenceString ("136", "Paths")
         WritePreferenceString ("137", "Warning")
         WritePreferenceString ("138", "Put here the path to PBcompiler.exe 32-bit version")
         WritePreferenceString ("139", "Put here the path to PBcompiler.exe 64-bit version")
         WritePreferenceString ("140", "Put here the path to a mp3 or wav")
         WritePreferenceString ("141", "you are not obliged to select a sound")  
         WritePreferenceString ("142", "Defining Paths")
         WritePreferenceString ("143", "32-bit compiler path")
         WritePreferenceString ("144", "64-bit compiler path")
         WritePreferenceString ("145", "Active")
         WritePreferenceString ("146", "Check this box to enable the use of 64-bit compiler")
         WritePreferenceString ("147", "Generate a 64-bit executable in addition to the 32-bit executable?")
         WritePreferenceString ("148", "End Path for compiled executable") ;A little to difficult to translate without seeing the code itself
         WritePreferenceString ("149", "Alias")
         WritePreferenceString ("150", "PureBasic Function")
         WritePreferenceString ("151", "Active Alias")
         WritePreferenceString ("152", "Load list of aliases")
         WritePreferenceString ("153", "Save alias list")
         WritePreferenceString ("154", "Refresh EPB")
         WritePreferenceString ("155", "Writes the parameters and updates EPB")
         WritePreferenceString ("156", "If you leave the red cross, the parameters are written")
         WritePreferenceString ("157", "you must restart EPB to see any changes")
         WritePreferenceString ("158", "At least one compiler must be enabled")
         WritePreferenceString ("159", "Where is the 32-bit compiler?")
         WritePreferenceString ("160", "Select icon")
         WritePreferenceString ("161", "PB Or are the files?")
         WritePreferenceString ("162", "Where is the 64-bit compiler?")
         WritePreferenceString ("163", "Where is the end of his compilation?")
         WritePreferenceString ("164", "save Alias list")
         WritePreferenceString ("165", "load Alias list ")
         WritePreferenceString ("166", "save the current style")
         WritePreferenceString ("167", "load a style")
  

Code: Select all

WindowID = OpenWindow(1,_
 0,_
 0,
800,_
 600,_
 "hello", #PB_Window_SystemMenu|_
#PB_Window_BorderLess |_
#PB_Window_ScreenCentered ) 

Code: Select all

WindowID = OpenWindow(1, 0, 0,800, 600, "hello", #PB_Window_SystemMenu|#PB_Window_BorderLess |#PB_Window_ScreenCentered ) 

Code: Select all

if:toto=255:endif

Code: Select all

if
     toto=255
endif

Code: Select all

_block
	If OpenWindow(0,_
 	100,_
 	200,_
 	195,_
 	260,_
 	"PureBasic Window",_
 	#PB_Window_SystemMenu_ 
	| #PB_Window_MinimizeGadget_
 	| #PB_Window_MaximizeGadget)
_endblock

Code: Select all

      
	
	; By Dobro
	; create a file "anglais.prefs"
	Declare save_preference_lang(Name$)
	
	Name$= SaveFileRequester("Sauve le fichier langage", "c:\", "*.prefs", 1)
	If FindString(Name$,".prefs",1)=0
		Name$=Name$+".prefs"
	EndIf
	save_preference_lang(Name$)
	
	
	Procedure save_preference_lang(Name$)
		
		
		; cette procedure se charge de charger les preferences du fichier "lang.prefs" ²
		;MessageRequester("info",GetCurrentDirectory())
		If CreatePreferences(Name$)
			PreferenceComment(" ********** Fichier de langage pour EPB *********")
			PreferenceComment("") 
			PreferenceGroup("Langues")
			;;;;WritePreferenceInteger ("window_x", x_window)
			;
			
			; popup menu²
			WritePreferenceString("1","Open")
			WritePreferenceString("2","Save_as")
			WritePreferenceString("3","Save")
			WritePreferenceString("4","Add Tab") ;"Ajouter un onglet"
			WritePreferenceString("5","Remove tab") ;"Retirer l'onglet"
			WritePreferenceString("6","Comment selected") ;"Commenter la selection"
			WritePreferenceString("7","Uncomment selected") ;"Décommenter la selection"
			WritePreferenceString("8","Cut");"Couper"
			WritePreferenceString("9","Copy") ;"Copier"
			WritePreferenceString("10","Paste") ;"Coller"
			WritePreferenceString("11","Undo") ;"Undo"
			WritePreferenceString("12","Redo") ;"Redo"
			WritePreferenceString("13","Fold") ;"Pliage"
			WritePreferenceString("14","Fold All") ;"Plier Tout"
			WritePreferenceString("15","Expand All") ;"Déplier Tout"
			WritePreferenceString("16","Compile") ;"Compiler"
			WritePreferenceString("17","Compiler/Debug") ;"Compiler/debugger"
			WritePreferenceString("18","Compiler/Run") ;"Compiler/executer"
			WritePreferenceString("19","Create Exe") ;"Creer un Exe"
			WritePreferenceString("20","Create ASM") ;"Creer un ASM"
			
			; menu
			WritePreferenceString("21","File") ;"Fichier"
			WritePreferenceString("22","New") ;"Nouveau"
			WritePreferenceString("23","Open") ;"Ouvrir"
			WritePreferenceString("24","Save") ;"Enregistrer"
			WritePreferenceString("25","Save As") ;"Enregistrer sous"
			WritePreferenceString("26","Add Tab") ;"Ajouter un onglet"
			WritePreferenceString("27","Remove tab") ;"Retirer l'onglet"
			WritePreferenceString("28","Search") ;"Chercher"
			WritePreferenceString("29","Fold") ;"Pliage"
			WritePreferenceString("30","Fold all") ;"Plier tout"
			WritePreferenceString("31","Unfold all") ;"Déplier tout"
			WritePreferenceString("32","Project");"Projet"
			WritePreferenceString("33","Project Option") ;"Option du Projet"
			WritePreferenceString("34","Compile / Run") ;"Compiler/Executer"
			WritePreferenceString("35","Compile / Debug") ;"Compiler/Débugger"
			WritePreferenceString("36","Create exe") ;"Creer un exe"
			WritePreferenceString("37","Create asm") ;"Creer un asm"
			WritePreferenceString("38","Tools") ;"Outils"
			WritePreferenceString("39","Convert") ;"Convert"
			WritePreferenceString("40","Converter") ;"Convertisseur "
			WritePreferenceString("41","Unblock") ;"Déblocker"
			WritePreferenceString("42","UnPunch ") ;"DéPuncher "
			WritePreferenceString("43","Purebasic Help") ;"Aide_Purebasic"
			WritePreferenceString("44","Help") ;"Aide"
			WritePreferenceString("45","External Help") ;"Aide ext"
			WritePreferenceString("46","About EPB") ;"A propos de EPB"
			WritePreferenceString("47","update EPB?") ;"mise a jour EPB ?"
			WritePreferenceString("48","This listing has not been saved") ;"Ce listing n'a pas été sauvegardé"
			WritePreferenceString("49","The changes will be lost.") ;"Les Modifications seront perdues."
			WritePreferenceString("50","Do you want to save?") ;"Voulez vous le sauver ?"
			WritePreferenceString("51","We will try to convert to v4.60") ;"On va tenter une conversion pour la V4.60"
			WritePreferenceString("52","NEVER run the Algorithm twice in a row!") ;"N'appliquez JAMAIS cette Algo 2 fois de suite !! "
			WritePreferenceString("53","This listing has not been saved") ;"Ce listing n'a pas été sauvegardé"
			WritePreferenceString("54","The changes will be lost ..") ;"Les Modifications seront perdues.."
			WritePreferenceString("55","Warning!") ;"Avertissement! "
			WritePreferenceString("56","A newer version exists") ;"Une version plus recente existe"
			WritePreferenceString("57","Do you want to download?") ;"Voulez-vous la telecharger ?"
			WritePreferenceString("58","You already have the latest version") ;"Vous avez deja la derniere Version"
			WritePreferenceString("59","Information") ;"Info"
			WritePreferenceString("60","All occurrences were found.") ;"Toutes les occurences ont été trouvées ."
			WritePreferenceString("61","All occurrences have been replaced.") ;"Toutes les occurences ont été remplacées ."
			WritePreferenceString("62","Error") ;"Erreur "
			WritePreferenceString("63","We must define the paths in menu") ;"Il faut definir les chemins dans menu"
			WritePreferenceString("64","Project / Project option") ;"Projet/option du projet"
			WritePreferenceString("65","Conversion Done") ;"Conversion Terminé"
			WritePreferenceString("65","There may be other changes to do by hand ..") ;"Il y  aura peut etre d'autres modifications a faire a la main.."
			WritePreferenceString("66","What picture (s)") ;"Quelle image(s)"
			WritePreferenceString("67","What sound (s)") ;"Quel Son(s)"
			WritePreferenceString("68","Save") ;"Sauve"
			WritePreferenceString("69","Create Scr") ;"Creer un Scr"
			WritePreferenceString("70","Create Scr") ;"Creer un Scr"
			WritePreferenceString("71","Search/replace") ; "Chercher/Remplacer"
			
			
			; preference de option_couleurs
			WritePreferenceString("100","Compile Options")	 ;"Options compilation"
			WritePreferenceString("101","Format of exe")	 ;"format de l'exe"
			WritePreferenceString("102","Enable inline assembler")	 ;"Activer l'assembleur en ligne"
			WritePreferenceString("103","Enable thread safe") ;"Executable thread safe"
			WritePreferenceString("104","Enable unicode") ;"Executable unicode"
			WritePreferenceString("105","Enable XP themes") ;"Activer les themes xp"
			WritePreferenceString("105","Request Vista admin mode") ;"Demander le mode admin vista"
			WritePreferenceString("106","Request Vista user mode");"Demander le mode user vista"
			WritePreferenceString("107","Number of spaces for tab") ;"Nombre d'espaces de Tabulations "
			WritePreferenceString("108","Size of real tabs") ;"Taille de Tabulations Reelles"
			WritePreferenceString("109","Enable real tabs") ;"Activer les tabulations Reelles"
			WritePreferenceString("110","Enable Tab Guide") ;"Activer le Guide de tabulations"
			WritePreferenceString("111","Large Cursor") ;"Gros Curseur"
			WritePreferenceString("112","Under System") ;"Sous System"
			WritePreferenceString("113","Editor Colours") ;"Colorations"
			WritePreferenceString("114","Set the Colour") ;"Definir la Coloration"
			WritePreferenceString("115","Basic Colour") ;"Couleur du Basic"
			WritePreferenceString("116","Comment Colour") ;"Couleur des Commentaires"
			WritePreferenceString("117","Strings Colour") ;"Couleur des Strings"
			WritePreferenceString("118","Numeric Colour") ;"Couleur des Chiffres"
			WritePreferenceString("119","Procedures Colour") ;"Couleur des Procedures"
			WritePreferenceString("120","Variable Types Colour") ;"Couleur des Types de variable"
			WritePreferenceString("121","Constants Colour") ;"Couleur des Constantes"
			WritePreferenceString("122","Api's Colour") ;"couleur des Apis"
			WritePreferenceString("123","Control Debugger Colour") ;"Couleur commande Debugger"
			WritePreferenceString("124","Hexadecimal Colour") ;"Couleur Hexadecimal"
			WritePreferenceString("125","Binary Colour") ;"Couleur Binaire"
			WritePreferenceString("126","Pointer Colour ") ;"Couleur Pointeur"
			WritePreferenceString("127","Procedure Background Color") ;"Couleur Fond Procedure"
			WritePreferenceString("128","Bold") ;"Gras"
			WritePreferenceString("129","text colour") ;"Couleur ecriture"
			WritePreferenceString("130","Selected Line colour") ;"Coul Ligne Selectionné"
			WritePreferenceString("131","Cursor Colour") ;"Couleur du Curseur"
			WritePreferenceString("132","Selection block Colour") ;"Couleur de selection bloc"
			WritePreferenceString("133","line number Colour") ;"Couleur numero de ligne"
			WritePreferenceString("134","Load a Style") ;"Charger un Style"
			WritePreferenceString("135","Save Current Style") ;"Sauver Le Style Courant"
			WritePreferenceString("136","Paths") ;"Chemins"
			WritePreferenceString("137","Warning ") ;"Attention "
			WritePreferenceString("138","Put here the path to PBcompiler.exe 32-bit version") ;"Mettre ici le chemin vers PBcompiler.exe version 32 bits"
			WritePreferenceString("139","Put here the path to PBcompiler.exe 64-bit version") ;"Mettre ici le chemin vers PBcompiler.exe version 64 bits"
			WritePreferenceString("140","Put here the path to a mp3 or wav") ;"Mettre ici le chemin vers un mp3 ou un Wav"
			WritePreferenceString("141","you are not obliged to select a sound") ;vous n'etes pas obligé d'indiquer un son"
			WritePreferenceString("142","Defining Paths") ;"Définition des Chemins"
			WritePreferenceString("143","32-bit compiler path") ;"Chemin du Compilateur 32bits"
			WritePreferenceString("144","64-bit compiler path") ;"Chemin du Compilateur 64bits"
			WritePreferenceString("145","On") ;"Activ"
			WritePreferenceString("146","Check this box to enable the use of 64-bit compiler") ;"Cochez cette case pour Activer l'utilisation du Compilateur 64 bits"
			WritePreferenceString("147","Generate a 64-bit executable in addition to the 32-bit executable") ;"le Compilateur 64 permet de generer un executable en plus de l'executable 32 bits "
			WritePreferenceString("148","Path To End-of-Compilation Sound ") ;"Chemin du son de fin de Compilation"
			WritePreferenceString("149","Alias") ;"Alias"
			WritePreferenceString("150","PureBasic Function ") ;"Fonction PureBasic "
			WritePreferenceString("151","Active Alias");"Active Alias"
			WritePreferenceString("152","Load list of aliases") ;"Charger liste d'alias"
			WritePreferenceString("153","Save alias list") ;"Sauver liste d'alias"
			WritePreferenceString("154","Refresh EPB") ;"Actualiser EPB"
			WritePreferenceString("155","Writes the parameters and updates EPB") ;"Ecrit les parametres et actualise EPB"
			WritePreferenceString("156","If you leave the red cross, the parameters are written ") ;"Si vous quittez par la croix rouge , les parametres sont ecrits "
			WritePreferenceString("157","you must restart EPB to see any changes") ;"Mais, il faudra redemarrer EPB pour voir les changements"
			WritePreferenceString("158","At least one compiler must be enabled") ;"Au moins un compilateur doit etre activé"
			WritePreferenceString("159","Where is the 32-bit compiler?") ;"Ou est le Compilateur 32 bits ?"
			WritePreferenceString("160","Select icon") ;"Choisir une icone"
			WritePreferenceString("161","Where is the PB files ?") ;"Ou sont les fichiers PB ?"
			WritePreferenceString("162","Where is the 64-bit compiler?") ;"Ou est le Compilateur 64 bits ?"
			WritePreferenceString("163","Where is the Path To End-of-Compilation Sound  ?") ;"Ou est le Son de fin de compilation  ?"
			WritePreferenceString("164","save Alias list") ;"sauve la liste des Alias "
			WritePreferenceString("165","load Alias list ") ;"charge la liste des Alias "
			WritePreferenceString("166","save the current style") ;"sauve le style courant"
			WritePreferenceString("167","load a style")	;"charger un style"
		EndIf
		ClosePreferences() 
	EndProcedure

Code: Select all

         
       
       ; By Dobro
       ; create a file "anglais.prefs"
       Declare save_preference_lang(Name$)
       
       Name$= SaveFileRequester("Sauve le fichier langage", "c:\", "*.prefs", 1)
       If FindString(Name$,".prefs",1)=0
          Name$=Name$+".prefs"
       EndIf
       save_preference_lang(Name$)
       
       
       Procedure save_preference_lang(Name$)
          
          
          ; cette procedure se charge de charger les preferences du fichier "lang.prefs" ²
          ;MessageRequester("info",GetCurrentDirectory())
          If CreatePreferences(Name$)
             PreferenceComment(" ********** Fichier de langage pour EPB *********")
             PreferenceComment("")
             PreferenceGroup("Langues")
             ;;;;WritePreferenceInteger ("window_x", x_window)
             ;
             
             ; popup menu²
             WritePreferenceString("1","Öffnen")
             WritePreferenceString("2","Speichern unter")
             WritePreferenceString("3","Speichern")
             WritePreferenceString("4","Tabulator hinzufügen") ;"Ajouter un onglet"
             WritePreferenceString("5","Tabulator entfernen") ;"Retirer l'onglet"
             WritePreferenceString("6","Auswahl kommentieren") ;"Commenter la selection"
             WritePreferenceString("7","Kommentar der Auswahl entfernen") ;"Décommenter la selection"
             WritePreferenceString("8","Ausschneiden");"Couper"
             WritePreferenceString("9","Kopieren") ;"Copier"
             WritePreferenceString("10","Einfügen") ;"Coller"
             WritePreferenceString("11","Rückgängig") ;"Undo"
             WritePreferenceString("12","Wiederherstellen") ;"Redo"
             WritePreferenceString("13","Einklappen") ;"Pliage"
             WritePreferenceString("14","Alles einklappen") ;"Plier Tout"
             WritePreferenceString("15","Alles expandieren") ;"Déplier Tout"
             WritePreferenceString("16","Kompilieren") ;"Compiler"
             WritePreferenceString("17","Kompilieren/Debuggen") ;"Compiler/debugger"
             WritePreferenceString("18","Kompilieren/Ausführen") ;"Compiler/executer"
             WritePreferenceString("19","'Exe' erzeugen") ;"Creer un Exe"
             WritePreferenceString("20","'Asm' erzeugen") ;"Creer un ASM"
             
             ; menu
             WritePreferenceString("21","Datei") ;"Fichier"
             WritePreferenceString("22","Neu") ;"Nouveau"
             WritePreferenceString("23","Öffnen") ;"Ouvrir"
             WritePreferenceString("24","Speichern") ;"Enregistrer"
             WritePreferenceString("25","Speichern unter") ;"Enregistrer sous"
             WritePreferenceString("26","Tabulator hinzufügen") ;"Ajouter un onglet"
             WritePreferenceString("27","Tabulator entfernen") ;"Retirer l'onglet"
             WritePreferenceString("28","Suchen") ;"Chercher"
             WritePreferenceString("29","Einklappen") ;"Pliage"
             WritePreferenceString("30","Alles einklappen") ;"Plier tout"
             WritePreferenceString("31","Alles expandieren") ;"Déplier tout"
             WritePreferenceString("32","Projekt");"Projet"
             WritePreferenceString("33","Projektoptionen") ;"Option du Projet"
             WritePreferenceString("34","Kompilieren/Ausführen") ;"Compiler/Executer"
             WritePreferenceString("35","Kompilieren/Debuggen") ;"Compiler/Débugger"
             WritePreferenceString("36","'Exe' erzeugen") ;"Creer un exe"
             WritePreferenceString("37","'Asm' erzeugen") ;"Creer un asm"
             WritePreferenceString("38","Hilfsprogramme") ;"Outils"
             WritePreferenceString("39","Konvertieren") ;"Convert"
             WritePreferenceString("40","Konverter") ;"Convertisseur "
?             WritePreferenceString("41","Unblock") ;"Déblocker"
?             WritePreferenceString("42","UnPunch ") ;"DéPuncher "
             WritePreferenceString("43","Purebasic-Hilfe") ;"Aide_Purebasic"
             WritePreferenceString("44","Hilfe") ;"Aide"
             WritePreferenceString("45","Externe Hilfe") ;"Aide ext"
             WritePreferenceString("46","Über EPB") ;"A propos de EPB"
             WritePreferenceString("47","EPB aktualisieren?") ;"mise a jour EPB ?"
             WritePreferenceString("48","Diese Datei wurde nicht gespeichert") ;"Ce listing n'a pas été sauvegardé"
             WritePreferenceString("49","Änderungen gehen verloren.") ;"Les Modifications seront perdues."
?[]             WritePreferenceString("50","Möchten sie [die Datei] speichern?") ;"Voulez vous le sauver ?"
             WritePreferenceString("51","Konvertierung nach Version 4.60 wird versucht") ;"On va tenter une conversion pour la V4.60"
?Zeile/Reihe             WritePreferenceString("52","Diesen Algorithmus NIEMALS zweimal in einer Zeile ausführen!") ;"N'appliquez JAMAIS cette Algo 2 fois de suite !! "
             WritePreferenceString("53","Diese Datei wurde nicht gespeichert") ;"Ce listing n'a pas été sauvegardé"
             WritePreferenceString("54","Die Änderungen gehen verloren...") ;"Les Modifications seront perdues.."
             WritePreferenceString("55","Warnung!") ;"Avertissement! "
             WritePreferenceString("56","Es existiert eine neuere Version") ;"Une version plus recente existe"
             WritePreferenceString("57","Möchten sie einen Download durchführen?") ;"Voulez-vous la telecharger ?"
             WritePreferenceString("58","Sie haben bereits die aktuelle Version") ;"Vous avez deja la derniere Version"
             WritePreferenceString("59","Information") ;"Info"
?             WritePreferenceString("60","Alle Vorkomnisse wurden gefunden.") ;"Toutes les occurences ont été trouvées ."
?             WritePreferenceString("61","Alle Vorkommnisse wurden ersetzt.") ;"Toutes les occurences ont été remplacées ."
             WritePreferenceString("62","Fehler") ;"Erreur "
?im             WritePreferenceString("63","Definition des Pfads im Menü erforderlich") ;"Il faut definir les chemins dans menu"
             WritePreferenceString("64","Projekt/Projektoptionen") ;"Projet/option du projet"
             WritePreferenceString("65","Umwandlung durchgeführt") ;"Conversion Terminé"
             WritePreferenceString("65","Möglicherweise sind weitere Änderungen erforderlich...") ;"Il y  aura peut etre d'autres modifications a faire a la main.."
             WritePreferenceString("66","Welche Bild-Datei(en)") ;"Quelle image(s)"
             WritePreferenceString("67","Welche Sound-Datei(en)") ;"Quel Son(s)"
             WritePreferenceString("68","Speichern") ;"Sauve"
             WritePreferenceString("69","'Scr' erzeugen") ;"Creer un Scr"
             WritePreferenceString("70","'Scr' erzeugen") ;"Creer un Scr"
             WritePreferenceString("71","Suchen/Ersetzen") ; "Chercher/Remplacer"
             
             
             ; preference de option_couleurs
             WritePreferenceString("100","Compiler-Optionen")    ;"Options compilation"
             WritePreferenceString("101","'Exe'-Format")    ;"format de l'exe"
             WritePreferenceString("102","Inline-Assembler aktiv")    ;"Activer l'assembleur en ligne"
?             WritePreferenceString("103","'Thread Safe'") ;"Executable thread safe"
             WritePreferenceString("104","Unicode") ;"Executable unicode"
             WritePreferenceString("105","XP Themen aktiv") ;"Activer les themes xp"
             WritePreferenceString("105","Vista Administrator-Mode erzwingen") ;"Demander le mode admin vista"
             WritePreferenceString("106","Vista User-Mode erzwingen");"Demander le mode user vista"
             WritePreferenceString("107","Anzahl der Leerzeichen für einen Tabulator") ;"Nombre d'espaces de Tabulations "
?             WritePreferenceString("108","Laufweite von 'echten' Tabulatoren") ;"Taille de Tabulations Reelles"
             WritePreferenceString("109","Echte Tabulatoren aktivieren") ;"Activer les tabulations Reelles"
             WritePreferenceString("110","Tabulator-Hilfslinien aktivieren") ;"Activer le Guide de tabulations"
             WritePreferenceString("111","Großer Cursor") ;"Gros Curseur"
             WritePreferenceString("112","Under System") ;"Sous System"
             WritePreferenceString("113","Farben Editor") ;"Colorations"
             WritePreferenceString("114","Farben definieren") ;"Definir la Coloration"
             WritePreferenceString("115","Farbe Basic") ;"Couleur du Basic"
             WritePreferenceString("116","Farbe Kommentar") ;"Couleur des Commentaires"
             WritePreferenceString("117","Farbe Strings") ;"Couleur des Strings"
             WritePreferenceString("118","Farbe Zahlenwerte") ;"Couleur des Chiffres"
             WritePreferenceString("119","Farbe Prozeduren") ;"Couleur des Procedures"
             WritePreferenceString("120","Farbe Variablentypen") ;"Couleur des Types de variable"
             WritePreferenceString("121","Farbe Konstante") ;"Couleur des Constantes"
             WritePreferenceString("122","Farbe API") ;"couleur des Apis"
             WritePreferenceString("123","Farbe Debugger") ;"Couleur commande Debugger"
             WritePreferenceString("124","Farbe Hexadezimalwerte") ;"Couleur Hexadecimal"
             WritePreferenceString("125","Farbe Binärwerte") ;"Couleur Binaire"
?             WritePreferenceString("126","Farbzeiger ") ;"Couleur Pointeur"
             WritePreferenceString("127","Hintergrund Prozeduren") ;"Couleur Fond Procedure"
             WritePreferenceString("128","Fett") ;"Gras"
             WritePreferenceString("129","Farbe Text") ;"Couleur ecriture"
             WritePreferenceString("130","Farbe der aktiven Zeile") ;"Coul Ligne Selectionné"
             WritePreferenceString("131","Farbe Cursor") ;"Couleur du Curseur"
             WritePreferenceString("132","Farbe Blockauswahl") ;"Couleur de selection bloc"
             WritePreferenceString("133","Frabe Zeilennummer") ;"Couleur numero de ligne"
?Stil/Palette             WritePreferenceString("134","Stil laden") ;"Charger un Style"
?             WritePreferenceString("135","Aktuellen Stil speichern") ;"Sauver Le Style Courant"
             WritePreferenceString("136","Pfade") ;"Chemins"
             WritePreferenceString("137","Warnung ") ;"Attention "
             WritePreferenceString("138","Pfad für die 32-Bit-Version des PB-Compilers hier eingeben") ;"Mettre ici le chemin vers PBcompiler.exe version 32 bits"
             WritePreferenceString("139","Pfad für die 64-Bit-Version des PB-Compilers hier eingeben") ;"Mettre ici le chemin vers PBcompiler.exe version 64 bits"
?Datei/Datei(en)             WritePreferenceString("140","Pfad für die MP3- oder WAV-Datei hier eingeben") ;"Mettre ici le chemin vers un mp3 ou un Wav"
???befugt             WritePreferenceString("141","Sie sind nicht ???, eine Sound-Datei auszuwählen") ;vous n'etes pas obligé d'indiquer un son"
             WritePreferenceString("142","Pfade definieren") ;"Définition des Chemins"
             WritePreferenceString("143","32-Bit Compiler-Pfad") ;"Chemin du Compilateur 32bits"
             WritePreferenceString("144","64-Bit Compiler-Pfad") ;"Chemin du Compilateur 64bits"
?Ein/Aktiv             WritePreferenceString("145","Ein") ;"Activ"
             WritePreferenceString("146","Selektieren sie diese Option, um den 64-Bit Compiler zu verwenden") ;"Cochez cette case pour Activer l'utilisation du Compilateur 64 bits"
             WritePreferenceString("147","Ausführbares 64-Bit-Programm zusätzlich zur 32-Bit-Version erzeugen") ;"le Compilateur 64 permet de generer un executable en plus de l'executable 32 bits "
?             WritePreferenceString("148","Sound-Datei für das Kompilationsende-Signal") ;"Chemin du son de fin de Compilation"
             WritePreferenceString("149","Alias") ;"Alias"
             WritePreferenceString("150","PureBasic-Funktion ") ;"Fonction PureBasic "
             WritePreferenceString("151","Aktive Alias-Definitionen");"Active Alias"
             WritePreferenceString("152","Alias-Definitionen laden") ;"Charger liste d'alias"
             WritePreferenceString("153","Alias-Definitionen speichern") ;"Sauver liste d'alias"
             WritePreferenceString("154","EPB aktualisieren") ;"Actualiser EPB"
             WritePreferenceString("155","Parameter speichern und EPB aktualisieren") ;"Ecrit les parametres et actualise EPB"
???             WritePreferenceString("156","Parameter werden bei Verlassen des roten Kreuzes geschrieben ") ;"Si vous quittez par la croix rouge , les parametres sont ecrits "
             WritePreferenceString("157","Sie müssen EFB neu starten, um die Änderungen wirksam zu machen") ;"Mais, il faudra redemarrer EPB pour voir les changements"
             WritePreferenceString("158","Mindestens ein Compiler muss konfiguriert sein") ;"Au moins un compilateur doit etre activé"
             WritePreferenceString("159","Wo befindet sich der 32-Bit-Compiler?") ;"Ou est le Compilateur 32 bits ?"
             WritePreferenceString("160","Icon auswählen") ;"Choisir une icone"
             WritePreferenceString("161","Wo befinden sich die PB-Dateien?") ;"Ou sont les fichiers PB ?"
             WritePreferenceString("162","Wo befindet sich der 64-Bit-Compiler?") ;"Ou est le Compilateur 64 bits ?"
             WritePreferenceString("163","Wo befindet sich die Sound-Datei für das Compiler-Signal?") ;"Ou est le Son de fin de compilation  ?"
             WritePreferenceString("164","Alias-Definition speichern") ;"sauve la liste des Alias "
             WritePreferenceString("165","Alias-Definition laden") ;"charge la liste des Alias "
?Stil             WritePreferenceString("166","Aktuellen Stil speichern") ;"sauve le style courant"
?Stil             WritePreferenceString("167","Stil laden")   ;"charger un style"
          EndIf
          ClosePreferences()
       EndProcedure