diff --git a/comp/src/gb.form/.lang/fr.po b/comp/src/gb.form/.lang/fr.po
index 1976a2b90..39144eaaf 100644
--- a/comp/src/gb.form/.lang/fr.po
+++ b/comp/src/gb.form/.lang/fr.po
@@ -27,498 +27,76 @@
 msgid ""
 msgstr ""
 "Project-Id-Version: gb.form 3.17.90\n"
-"POT-Creation-Date: 2022-12-28 14:03 UTC\n"
-"PO-Revision-Date: 2022-12-21 03:21 UTC\n"
+"PO-Revision-Date: 2023-01-02 02:06 UTC\n"
 "Last-Translator: benoit <benoit@benoit-TOWER>\n"
 "Language: fr\n"
 "MIME-Version: 1.0\n"
 "Content-Type: text/plain; charset=UTF-8\n"
 "Content-Transfer-Encoding: 8bit\n"
 
-#: .project:1
-msgid "More controls for graphical components"
-msgstr "Contrôles graphiques supplémentaires"
+#: FFileProperties.class:219 Main.module:375
+msgid "&1 B"
+msgstr "&1 o"
 
-#: CBookmarkList.class:51
-msgid "Home"
-msgstr "Dossier personnel"
+#: Main.module:391
+msgid "&1 GB"
+msgstr "&1 Go"
 
-#: CBookmarkList.class:53
-msgid "Desktop"
-msgstr "Bureau"
+#: Main.module:381
+msgid "&1 GiB"
+msgstr "&1 Gio"
 
-#: CBookmarkList.class:55
-msgid "System"
-msgstr "Système"
+#: Main.module:387
+msgid "&1 KB"
+msgstr "&1 Ko"
 
-#: ColorPalette.class:146
-msgid "Last colors"
-msgstr "Dernières couleurs"
+#: Main.module:377
+msgid "&1 KiB"
+msgstr "&1 Kio"
 
-#: ColorPalette.class:249
-msgid "Remove color"
-msgstr "Retirer la couleur"
+#: Main.module:389
+msgid "&1 MB"
+msgstr "&1 Mo"
 
-#: ColorPalette.class:253
-msgid "Remove all colors"
-msgstr "Retirer toutes les couleurs"
-
-#: ColorPalette.class:257
-msgid "Sort colors"
-msgstr "Trier les couleurs"
-
-#: DirView.class:595
-msgid "Cannot rename directory."
-msgstr "Impossible de renommer le répertoire."
-
-#: DirView.class:626
-msgid "New folder"
-msgstr "Nouveau répertoire"
-
-#: DirView.class:645
-msgid "Cannot create directory."
-msgstr "Impossible de créer le répertoire."
-
-#: FBugFileView.form:32
-msgid "Toggle Fileview Detailed View"
-msgstr ""
-
-#: FBugFileView.form:37
-msgid "Toggle Filechooser Detailed View"
-msgstr ""
-
-#: FCalendar.form:48
-msgid "Today"
-msgstr "Aujourd'hui"
-
-#: FCalendar.form:54
-msgid "Previous month"
-msgstr "Mois précédent"
-
-#: FCalendar.form:60
-msgid "Next month"
-msgstr "Mois suivant"
-
-#: FCalendar.form:147
-msgid "Apply"
-msgstr "Appliquer"
-
-#: FColorChooser.form:81
-msgid "Follow color grid"
-msgstr "Suivre la grille de couleurs"
-
-#: FDirChooser.class:448
-msgid "Directory not found."
-msgstr "Répertoire introuvable."
-
-#: FDirChooser.class:557
-msgid "All files (*)"
-msgstr "Tous les fichiers (*)"
-
-#: FDirChooser.class:910
-msgid "Overwrite"
-msgstr "Ecraser"
-
-#: FDirChooser.class:910
-msgid ""
-"This file already exists.\n"
-"\n"
-"Do you want to overwrite it?"
-msgstr ""
-"Ce fichier existe déjà.\n"
-"\n"
-"Désirez-vous le remplacer ?"
-
-#: FDirChooser.class:1028
-msgid "&Bookmark current directory"
-msgstr "&Marquer le répertoire courant"
-
-#: FDirChooser.class:1036
-msgid "&Edit bookmarks..."
-msgstr "&Editer les signets..."
-
-#: FDirChooser.class:1077
-msgid "Show hidden files"
-msgstr "Afficher les fichiers cachés"
-
-#: FDirChooser.class:1083
-msgid "Show image preview"
-msgstr "Afficher les aperçus"
-
-#: FDirChooser.class:1089
-msgid "Preview big files"
-msgstr "Aperçu des gros fichiers"
-
-#: FDirChooser.class:1096
-msgid "Rename"
-msgstr "Renommer"
-
-#: FDirChooser.class:1101
-msgid "Copy"
-msgstr "Copier"
-
-#: FDirChooser.class:1106
-msgid "Delete"
-msgstr "Supprimer"
-
-#: FDirChooser.class:1118
-msgid "&Uncompress file"
-msgstr "&Décompresser le fichier"
-
-#: FDirChooser.class:1123
-msgid "&Create directory"
-msgstr "&Créer un répertoire"
-
-#: FDirChooser.class:1128
-msgid "Open in &file manager..."
-msgstr "Ouvrir dans le gestionnaire de &fichiers..."
-
-#: FDirChooser.class:1133
-msgid "&Refresh"
-msgstr "&Actualiser"
-
-#: FDirChooser.class:1141
-msgid "&Properties"
-msgstr "&Propriétés"
-
-#: FDirChooser.class:1334
-msgid "Overwrite all"
-msgstr "Tout écraser"
-
-#: FDirChooser.class:1334
-msgid "This file or directory already exists."
-msgstr "Ce fichier ou ce répertoire existe déjà."
-
-#: FDirChooser.class:1355
-msgid "Cannot list archive contents"
-msgstr "Impossible de lister le contenu de l'archive"
-
-#: FDirChooser.class:1395
-msgid "Cannot uncompress file."
-msgstr "Impossible de décompresser le fichier."
-
-#: FDirChooser.class:1395
-msgid "Unknown archive."
-msgstr "Archive inconnue."
-
-#: FDirChooser.class:1466
-msgid "Delete file"
-msgstr "Supprimer le fichier"
-
-#: FDirChooser.class:1467
-msgid "&Delete"
-msgstr "&Supprimer"
-
-#: FDirChooser.class:1467
-msgid "Do you really want to delete that file?"
-msgstr "Désirez-vous réellement supprimer ce fichier ?"
-
-#: FDirChooser.class:1474
-msgid "Unable to delete file."
-msgstr "Impossible de supprimer le fichier."
-
-#: FDirChooser.class:1484
-msgid "Delete directory"
-msgstr "Supprimer le répertoire"
-
-#: FDirChooser.class:1485
-msgid "Do you really want to delete that directory?"
-msgstr "Désirez-vous vraiment supprimer ce répertoire ?"
-
-#: FDirChooser.class:1492
-msgid "Unable to delete directory."
-msgstr "Impossible de supprimer le répertoire."
-
-#: FDirChooser.form:76
-msgid "Parent directory"
-msgstr "Répertoire parent"
-
-#: FDirChooser.form:82
-msgid "Root directory"
-msgstr "Répertoire racine"
-
-#: FDirChooser.form:147
-msgid "Image preview"
-msgstr "Prévisualisation des images"
-
-#: FDirChooser.form:160
-msgid "Icon view"
-msgstr "Vue en icônes"
-
-#: FDirChooser.form:171
-msgid "Compact view"
-msgstr "Vue compacte"
-
-#: FDirChooser.form:181
-msgid "Detailed view"
-msgstr "Vue détaillée"
-
-#: FDirChooser.form:194
-msgid "File properties"
-msgstr "Propriétés du fichier"
-
-#: FDirChooser.form:200
-msgid "Show files"
-msgstr "Afficher les fichiers"
-
-#: FDirChooser.form:220
-msgid "Bookmarks"
-msgstr "Signets"
-
-#: FDirChooser.form:287 FInputBox.form:45 FWizard.class:76 Form1.form:36
-msgid "OK"
-msgstr "OK"
-
-#: FDirChooser.form:293 FEditBookmark.class:119 FInputBox.form:51
-#: FSidePanel.class:1142 FWizard.form:52 Form1.form:42
-msgid "Cancel"
-msgstr "Annuler"
-
-#: FDocumentView.form:58
-msgid "Zoom :"
-msgstr ""
-
-#: FDocumentView.form:63
-msgid "Show Shadow"
-msgstr ""
-
-#: FDocumentView.form:73 FTestTabPanel.form:65
-msgid "Padding"
-msgstr ""
-
-#: FDocumentView.form:78
-msgid "Spacing"
-msgstr ""
-
-#: FDocumentView.form:87
-msgid "Scale Mode"
-msgstr ""
-
-#: FDocumentView.form:96
-msgid "Goto :"
-msgstr ""
-
-#: FDocumentView.form:102
-msgid "Column"
-msgstr ""
-
-#: FDocumentView.form:102
-msgid "Fill"
-msgstr ""
-
-#: FDocumentView.form:102
-msgid "Horizontal"
-msgstr ""
-
-#: FDocumentView.form:102
-msgid "None"
-msgstr ""
-
-#: FDocumentView.form:102
-msgid "Row"
-msgstr ""
-
-#: FDocumentView.form:102
-msgid "Vertical"
-msgstr ""
-
-#: FDocumentView.form:103 FMain.form:118
-msgid "ComboBox1"
-msgstr ""
-
-#: FDocumentView.form:108 FMain.form:103 FTestBalloon.form:18
-#: FTestCompletion.form:23 FTestMenuButton.form:150 FTestMessageView.form:27
-#: FTestWizard.form:24
-msgid "Button1"
-msgstr ""
-
-#: FDocumentView.form:117
-msgid "Columns"
-msgstr ""
-
-#: FDocumentView.form:127
-msgid "Center"
-msgstr ""
-
-#: FEditBookmark.class:23 FileView.class:165
-msgid "Name"
-msgstr "Nom"
-
-#: FEditBookmark.class:24
-msgid "Path"
-msgstr "Emplacement"
-
-#: FEditBookmark.class:119
-msgid "Do you really want to remove this bookmark?"
-msgstr "Désirez-vous réellement supprimer ce signet ?"
-
-#: FEditBookmark.form:15
-msgid "Edit bookmarks"
-msgstr "Edition des signets"
-
-#: FEditBookmark.form:34
-msgid "Up"
-msgstr "Haut"
-
-#: FEditBookmark.form:40
-msgid "Down"
-msgstr "Bas"
-
-#: FEditBookmark.form:46 FListEditor.class:277
-msgid "Remove"
-msgstr "Supprimer"
-
-#: FEditBookmark.form:57 FFileProperties.form:275
-msgid "Close"
-msgstr "Fermer"
-
-#: FFileProperties.class:120
-msgid "Image"
-msgstr "Image"
-
-#: FFileProperties.class:125
-msgid "Audio"
-msgstr "Audio"
-
-#: FFileProperties.class:129
-msgid "Video"
-msgstr "Vidéo"
+#: Main.module:379
+msgid "&1 MiB"
+msgstr "&1 Mio"
 
 #: FFileProperties.class:188
 msgid "&1 properties"
 msgstr "Propriétés de &1"
 
-#: FFileProperties.class:219 Main.module:375
-msgid "&1 B"
-msgstr "&1 o"
+#: FDirChooser.class:1028
+msgid "&Bookmark current directory"
+msgstr "&Marquer le répertoire courant"
 
-#: FFileProperties.class:224
-msgid "no file"
-msgstr "aucun fichier"
+#: FDirChooser.class:1123
+msgid "&Create directory"
+msgstr "&Créer un répertoire"
 
-#: FFileProperties.class:226
-msgid "one file"
-msgstr "un fichier"
+#: FDirChooser.class:1466
+msgid "&Delete"
+msgstr "&Supprimer"
 
-#: FFileProperties.class:228
-msgid "files"
-msgstr "fichiers"
+#: FDirChooser.class:1036
+msgid "&Edit bookmarks..."
+msgstr "&Editer les signets..."
 
-#: FFileProperties.class:232
-msgid "no directory"
-msgstr "aucun répertoire"
+#: FWizard.class:88
+msgid "&Next"
+msgstr "&Suivant"
 
-#: FFileProperties.class:234
-msgid "one directory"
-msgstr "un répertoire"
+#: FDirChooser.class:1141
+msgid "&Properties"
+msgstr "&Propriétés"
 
-#: FFileProperties.class:236
-msgid "directories"
-msgstr "répertoires"
+#: FDirChooser.class:1133
+msgid "&Refresh"
+msgstr "&Actualiser"
 
-#: FFileProperties.form:54
-msgid "General"
-msgstr "Général"
-
-#: FFileProperties.form:83
-msgid "Type"
-msgstr "Type"
-
-#: FFileProperties.form:96
-msgid "Link"
-msgstr "Lien"
-
-#: FFileProperties.form:110
-msgid "Directory"
-msgstr "Répertoire"
-
-#: FFileProperties.form:122 FileView.class:166
-msgid "Size"
-msgstr "Taille"
-
-#: FFileProperties.form:134 FileView.class:167
-msgid "Last modified"
-msgstr "Modifié le"
-
-#: FFileProperties.form:146 FileView.class:168
-msgid "Permissions"
-msgstr "Permissions"
-
-#: FFileProperties.form:159
-msgid "Owner"
-msgstr "Propriétaire"
-
-#: FFileProperties.form:171
-msgid "Group"
-msgstr "Groupe"
-
-#: FFileProperties.form:181
-msgid "Preview"
-msgstr "Aperçu"
-
-#: FFileProperties.form:246
-msgid "Errors"
-msgstr "Erreurs"
-
-#: FFontChooser.class:374
-msgid "How quickly daft jumping zebras vex"
-msgstr "Portez ce vieux whisky au juge blond qui fume"
-
-#: FFontChooser.form:73
-msgid "Building cache"
-msgstr "Construction du cache"
-
-#: FFontChooser.form:80
-msgid "Refresh cache"
-msgstr "Rafraîchir le cache"
-
-#: FFontChooser.form:86
-msgid "Show font preview"
-msgstr "Afficher l'aperçu des polices"
-
-#: FFontChooser.form:110
-msgid "Bold"
-msgstr "Gras"
-
-#: FFontChooser.form:117
-msgid "Italic"
-msgstr "Italique"
-
-#: FFontChooser.form:124
-msgid "Underline"
-msgstr "Souligné"
-
-#: FFontChooser.form:131
-msgid "Strikeout"
-msgstr "Barré"
-
-#: FFontChooser.form:140
-msgid "Relative"
-msgstr "Relatif"
-
-#: FIconPanel.form:18
-msgid "Item 0"
-msgstr ""
-
-#: FIconPanel.form:23
-msgid "Toto"
-msgstr ""
-
-#: FIconPanel.form:26
-msgid "Item 1"
-msgstr ""
-
-#: FIconPanel.form:28
-msgid "Item 2"
-msgstr ""
-
-#: FIconPanel.form:35
-msgid "Item 3"
-msgstr ""
-
-#: FLCDLabel.form:15
-msgid "12:34"
-msgstr ""
+#: FDirChooser.class:1118
+msgid "&Uncompress file"
+msgstr "&Décompresser le fichier"
 
 #: FListEditor.class:276
 msgid "Add"
@@ -528,323 +106,403 @@ msgstr "Ajouter"
 msgid "Add item"
 msgstr "Ajouter un élément"
 
-#: FListEditor.form:53
-msgid "Remove item"
-msgstr "Supprimer l'élément"
+#: Help.module:71
+msgid "A file or directory name cannot be void."
+msgstr "Le nom d'un fichier ou d'un répertoire ne peut être vide."
 
-#: FListEditor.form:61
-msgid "Move item up"
-msgstr "Déplacer l'élément vers le haut"
+#: FDirChooser.class:557
+msgid "All files (*)"
+msgstr "Tous les fichiers (*)"
 
-#: FListEditor.form:69
-msgid "Move item down"
-msgstr "Déplacer l'élément vers le bas"
+#: FCalendar.form:147
+msgid "Apply"
+msgstr "Appliquer"
 
-#: FMain.class:25
-#, fuzzy
-msgid "PDF files"
-msgstr "fichiers"
+#: FFileProperties.class:125
+msgid "Audio"
+msgstr "Audio"
 
-#: FMain.class:25
-msgid "Postscript files"
-msgstr ""
+#: FFontChooser.form:110
+msgid "Bold"
+msgstr "Gras"
 
-#: FMain.form:31 FTestFileChooser.form:31 FTestMenuButton.form:40 FWiki.form:20
-msgid "Menu2"
-msgstr ""
+#: FDirChooser.form:220
+msgid "Bookmarks"
+msgstr "Signets"
 
-#: FMain.form:35 FTestFileChooser.form:36 FTestMenuButton.form:44 FWiki.form:24
-msgid "Menu3"
-msgstr ""
+#: FFontChooser.form:73
+msgid "Building cache"
+msgstr "Construction du cache"
 
-#: FMain.form:84
-msgid "http://gambas.sf.net"
-msgstr ""
+#: FDirChooser.form:293 FEditBookmark.class:119 FInputBox.form:51 FSidePanel.class:1142 FWizard.form:52
+msgid "Cancel"
+msgstr "Annuler"
 
-#: FMain.form:92
-msgid "ComboBox2"
-msgstr ""
+#: DirView.class:645
+msgid "Cannot create directory."
+msgstr "Impossible de créer le répertoire."
 
-#: FMain.form:98 FTestBalloon.form:12 FTestFileChooser.form:86
-#: FTestSwitchButton.form:22
-msgid "TextBox1"
-msgstr ""
+#: FDirChooser.class:1354
+msgid "Cannot list archive contents"
+msgstr "Impossible de lister le contenu de l'archive"
 
-#: FMain.form:108 Form2.form:121
-msgid "MenuButton1"
-msgstr ""
+#: DirView.class:595
+msgid "Cannot rename directory."
+msgstr "Impossible de renommer le répertoire."
 
-#: FMain.form:117 FTestListEditor.form:11
-msgid "Élément 1"
-msgstr ""
+#: FileView.class:1257
+msgid "Cannot rename file."
+msgstr "Impossible de renommer le fichier."
 
-#: FMain.form:117 FTestListEditor.form:11
-msgid "Élément 2"
-msgstr ""
+#: FDirChooser.class:1394
+msgid "Cannot uncompress file."
+msgstr "Impossible de décompresser le fichier."
 
-#: FMain.form:117 FTestListEditor.form:11
-msgid "Élément 3"
-msgstr ""
+#: FEditBookmark.form:57 FFileProperties.form:275
+msgid "Close"
+msgstr "Fermer"
 
-#: FMain.form:117 FTestListEditor.form:11
-msgid "Élément 4"
-msgstr ""
+#: FDirChooser.form:171
+msgid "Compact view"
+msgstr "Vue compacte"
+
+#: FDirChooser.class:1101
+msgid "Copy"
+msgstr "Copier"
+
+#: FDirChooser.class:1106
+msgid "Delete"
+msgstr "Supprimer"
+
+#: FDirChooser.class:1483
+msgid "Delete directory"
+msgstr "Supprimer le répertoire"
+
+#: FDirChooser.class:1465
+msgid "Delete file"
+msgstr "Supprimer le fichier"
+
+#: CBookmarkList.class:53
+msgid "Desktop"
+msgstr "Bureau"
+
+#: FDirChooser.form:181
+msgid "Detailed view"
+msgstr "Vue détaillée"
+
+#: FFileProperties.class:236
+msgid "directories"
+msgstr "répertoires"
+
+#: FFileProperties.form:110
+msgid "Directory"
+msgstr "Répertoire"
+
+#: FDirChooser.class:448
+msgid "Directory not found."
+msgstr "Répertoire introuvable."
 
 #: FMessage.form:39
 msgid "Do not display this message again"
 msgstr "Ne plus afficher ce message"
 
+#: FEditBookmark.form:40
+msgid "Down"
+msgstr "Bas"
+
+#: FDirChooser.class:1484
+msgid "Do you really want to delete that directory?"
+msgstr "Désirez-vous vraiment supprimer ce répertoire ?"
+
+#: FDirChooser.class:1466
+msgid "Do you really want to delete that file?"
+msgstr "Désirez-vous réellement supprimer ce fichier ?"
+
+#: FEditBookmark.class:119
+msgid "Do you really want to remove this bookmark?"
+msgstr "Désirez-vous réellement supprimer ce signet ?"
+
+#: FEditBookmark.form:15
+msgid "Edit bookmarks"
+msgstr "Edition des signets"
+
+#: FFileProperties.form:246
+msgid "Errors"
+msgstr "Erreurs"
+
+#: FDirChooser.form:194
+msgid "File properties"
+msgstr "Propriétés du fichier"
+
+#: FFileProperties.class:228
+msgid "files"
+msgstr "fichiers"
+
+#: FColorChooser.form:81
+msgid "Follow color grid"
+msgstr "Suivre la grille de couleurs"
+
+#: FFileProperties.form:54
+msgid "General"
+msgstr "Général"
+
+#: FFileProperties.form:171
+msgid "Group"
+msgstr "Groupe"
+
 #: FSidePanel.class:1121
 msgid "Hidden"
 msgstr "Masqué"
 
-#: FSidePanel.class:1128
-msgid "Transparent handle"
-msgstr "Poignée transparente"
-
 #: FSidePanel.class:1136
 msgid "Hide automatically"
 msgstr "Cacher automatiquement"
 
-#: FSpinBar.form:24
-msgid "Test"
-msgstr ""
+#: CBookmarkList.class:51
+msgid "Home"
+msgstr "Dossier personnel"
 
-#: FTestBalloon.form:17
-msgid "Ceci est une bulle d'aide"
-msgstr ""
+#: FFontChooser.class:374
+msgid "How quickly daft jumping zebras vex"
+msgstr "Portez ce vieux whisky au juge blond qui fume"
 
-#: FTestColorChooser.form:20
-msgid "Resizable"
-msgstr ""
+#: FDirChooser.form:160
+msgid "Icon view"
+msgstr "Vue en icônes"
 
-#: FTestCompletion.form:28 FTestMessageView.form:38
-msgid "Button2"
-msgstr ""
+#: FFileProperties.class:120
+msgid "Image"
+msgstr "Image"
 
-#: FTestDateChooser.form:33
-msgid "Enable"
-msgstr ""
-
-#: FTestExpander.form:16
-msgid "Expander"
-msgstr ""
-
-#: FTestFileBox.form:17
-#, fuzzy
-msgid "Open a file"
-msgstr "aucun fichier"
-
-#: FTestFileBox.form:18
-msgid "File to open"
-msgstr ""
-
-#: FTestFileBox.form:24
-#, fuzzy
-msgid "Save file as"
-msgstr "Afficher les fichiers"
-
-#: FTestFileBox.form:25
-msgid "File to save"
-msgstr ""
-
-#: FTestFileBox.form:30
-#, fuzzy
-msgid "Open image file"
-msgstr "un fichier"
-
-#: FTestFileBox.form:33
-#, fuzzy
-msgid "Image filters"
+#: FDirChooser.form:147
+msgid "Image preview"
 msgstr "Prévisualisation des images"
 
-#: FTestFileChooser.form:28 FTestMenuButton.form:36
-msgid "Menu1"
-msgstr ""
+#: FFontChooser.form:117
+msgid "Italic"
+msgstr "Italique"
 
-#: FTestFileChooser.form:41 FTestMenuButton.form:70
-msgid "Menu7"
-msgstr ""
+#: ColorPalette.class:146
+msgid "Last colors"
+msgstr "Dernières couleurs"
 
-#: FTestFileChooser.form:49 FTestMenuButton.form:53 FWiki.form:28
-msgid "Menu4"
-msgstr ""
+#: FFileProperties.form:134 FileView.class:167
+msgid "Last modified"
+msgstr "Modifié le"
 
-#: FTestFileChooser.form:54 FTestMenuButton.form:57 FWiki.form:32
-msgid "Menu5"
-msgstr ""
+#: FFileProperties.form:96
+msgid "Link"
+msgstr "Lien"
 
-#: FTestFileChooser.form:76
-msgid "Balloon"
-msgstr ""
+#: .project:1
+msgid "More controls for graphical components"
+msgstr "Contrôles graphiques supplémentaires"
 
-#: FTestFileChooser.form:81 FTestSwitchButton.form:38
-msgid "Label1"
-msgstr ""
+#: FListEditor.form:69
+msgid "Move item down"
+msgstr "Déplacer l'élément vers le bas"
 
-#: FTestFileView.form:22
-msgid "Selection"
-msgstr ""
+#: FListEditor.form:61
+msgid "Move item up"
+msgstr "Déplacer l'élément vers le haut"
 
-#: FTestListEditor.form:11
-msgid "Élément 5"
-msgstr ""
+#: FEditBookmark.class:23 FileView.class:165
+msgid "Name"
+msgstr "Nom"
 
-#: FTestMenuButton.form:32
-msgid "Project"
-msgstr ""
-
-#: FTestMenuButton.form:49
-msgid "View"
-msgstr ""
-
-#: FTestMenuButton.form:61
-msgid "Menu6"
-msgstr ""
-
-#: FTestMenuButton.form:66
-msgid "Tools"
-msgstr ""
-
-#: FTestMenuButton.form:74
-msgid "Menu8"
-msgstr ""
-
-#: FTestMenuButton.form:78
-msgid "Menu9"
-msgstr ""
-
-#: FTestMenuButton.form:81
-msgid "Menu10"
-msgstr ""
-
-#: FTestMenuButton.form:85
-msgid "Menu11"
-msgstr ""
-
-#: FTestMenuButton.form:124
-msgid "Menu button"
-msgstr ""
-
-#: FTestSwitchButton.form:45
-msgid "Label2"
-msgstr ""
-
-#: FTestTabPanel.form:42
-msgid "Text"
-msgstr ""
-
-#: FTestTabPanel.form:55
-msgid "Border"
-msgstr ""
-
-#: FTestTabPanel.form:60
-msgid "Orientation"
-msgstr ""
-
-#: FTestTabPanel.form:70
-msgid "TabBar"
-msgstr ""
-
-#: FTestToolPanel.form:17
-msgid "Toolbar 1"
-msgstr ""
-
-#: FTestToolPanel.form:19
-msgid "Toolbar 2"
-msgstr ""
-
-#: FTestToolPanel.form:21
-msgid "Toolbar 3"
-msgstr ""
-
-#: FTestToolPanel.form:23
-msgid "Toolbar 4"
-msgstr ""
-
-#: FTestValueBox.form:16
-msgid "Hello world!"
-msgstr ""
-
-#: FTestWizard.form:20
-msgid "Étape n°1"
-msgstr ""
-
-#: FTestWizard.form:27
-msgid "Ceci est une longue étape"
-msgstr ""
-
-#: FTestWizard.form:33
-msgid "Étape n°3"
-msgstr ""
-
-#: FTestWizard.form:35
-msgid "Étape n°4"
-msgstr ""
-
-#: FWizard.class:88
-msgid "&Next"
-msgstr "&Suivant"
+#: DirView.class:626
+msgid "New folder"
+msgstr "Nouveau répertoire"
 
 #: FWizard.form:58
 msgid "Next"
 msgstr "Suivant"
 
+#: FCalendar.form:60
+msgid "Next month"
+msgstr "Mois suivant"
+
+#: FFileProperties.class:232
+msgid "no directory"
+msgstr "aucun répertoire"
+
+#: FFileProperties.class:224
+msgid "no file"
+msgstr "aucun fichier"
+
+#: FDirChooser.form:287 FInputBox.form:45 FWizard.class:76
+msgid "OK"
+msgstr "OK"
+
+#: FFileProperties.class:234
+msgid "one directory"
+msgstr "un répertoire"
+
+#: FFileProperties.class:226
+msgid "one file"
+msgstr "un fichier"
+
+#: FDirChooser.class:1128
+msgid "Open in &file manager..."
+msgstr "Ouvrir dans le gestionnaire de &fichiers..."
+
+#: FDirChooser.class:910
+msgid "Overwrite"
+msgstr "Ecraser"
+
+#: FDirChooser.class:1333
+msgid "Overwrite all"
+msgstr "Tout écraser"
+
+#: FFileProperties.form:159
+msgid "Owner"
+msgstr "Propriétaire"
+
+#: FDirChooser.form:76
+msgid "Parent directory"
+msgstr "Répertoire parent"
+
+#: FEditBookmark.class:24
+msgid "Path"
+msgstr "Emplacement"
+
+#: FFileProperties.form:146 FileView.class:168
+msgid "Permissions"
+msgstr "Permissions"
+
+#: FFileProperties.form:181
+msgid "Preview"
+msgstr "Aperçu"
+
+#: FDirChooser.class:1089
+msgid "Preview big files"
+msgstr "Aperçu des gros fichiers"
+
 #: FWizard.form:64
 msgid "Previous"
 msgstr "Précédent"
 
-#: FileView.class:188
-msgid "This folder is empty."
-msgstr "Ce répertoire est vide."
+#: FCalendar.form:54
+msgid "Previous month"
+msgstr "Mois précédent"
 
-#: FileView.class:1237
-msgid "Cannot rename file."
-msgstr "Impossible de renommer le fichier."
+#: FFontChooser.form:80
+msgid "Refresh cache"
+msgstr "Rafraîchir le cache"
 
-#: Form2.form:126
-msgid "ButtonBox2"
-msgstr ""
+#: FFontChooser.form:140
+msgid "Relative"
+msgstr "Relatif"
 
-#: Form3.form:25
-msgid "Raise"
-msgstr ""
+#: FEditBookmark.form:46 FListEditor.class:277
+msgid "Remove"
+msgstr "Supprimer"
 
-#: Help.module:71
-msgid "A file or directory name cannot be void."
-msgstr "Le nom d'un fichier ou d'un répertoire ne peut être vide."
+#: ColorPalette.class:253
+msgid "Remove all colors"
+msgstr "Retirer toutes les couleurs"
 
-#: Help.module:72
-msgid "The '/' character is forbidden inside file or directory names."
-msgstr "Le caractère '/' est interdit dans les noms de fichiers ou de répertoires."
+#: ColorPalette.class:249
+msgid "Remove color"
+msgstr "Retirer la couleur"
 
-#: Main.module:377
-msgid "&1 KiB"
-msgstr "&1 Kio"
+#: FListEditor.form:53
+msgid "Remove item"
+msgstr "Supprimer l'élément"
 
-#: Main.module:379
-msgid "&1 MiB"
-msgstr "&1 Mio"
+#: FDirChooser.class:1096
+msgid "Rename"
+msgstr "Renommer"
 
-#: Main.module:381
-msgid "&1 GiB"
-msgstr "&1 Gio"
+#: FDirChooser.form:82
+msgid "Root directory"
+msgstr "Répertoire racine"
 
-#: Main.module:387
-msgid "&1 KB"
-msgstr ""
+#: FDirChooser.form:200
+msgid "Show files"
+msgstr "Afficher les fichiers"
 
-#: Main.module:389
-msgid "&1 MB"
-msgstr ""
+#: FFontChooser.form:86
+msgid "Show font preview"
+msgstr "Afficher l'aperçu des polices"
 
-#: Main.module:391
-msgid "&1 GB"
-msgstr ""
+#: FDirChooser.class:1077
+msgid "Show hidden files"
+msgstr "Afficher les fichiers cachés"
+
+#: FDirChooser.class:1083
+msgid "Show image preview"
+msgstr "Afficher les aperçus"
+
+#: FFileProperties.form:122 FileView.class:166
+msgid "Size"
+msgstr "Taille"
+
+#: ColorPalette.class:257
+msgid "Sort colors"
+msgstr "Trier les couleurs"
 
 #: Wizard.class:86
 msgid "Step #&1"
 msgstr "Étape n°&1"
 
-#~ msgid "&Overwrite"
-#~ msgstr "&Remplacer"
+#: FFontChooser.form:131
+msgid "Strikeout"
+msgstr "Barré"
+
+#: CBookmarkList.class:55
+msgid "System"
+msgstr "Système"
+
+#: Help.module:72
+msgid "The '/' character is forbidden inside file or directory names."
+msgstr "Le caractère '/' est interdit dans les noms de fichiers ou de répertoires."
+
+#: FDirChooser.class:910
+msgid "This file already exists.\n\nDo you want to overwrite it?"
+msgstr "Ce fichier existe déjà.\n\nDésirez-vous le remplacer ?"
+
+#: FDirChooser.class:1333
+msgid "This file or directory already exists."
+msgstr "Ce fichier ou ce répertoire existe déjà."
+
+#: FileView.class:188
+msgid "This folder is empty."
+msgstr "Ce répertoire est vide."
+
+#: FCalendar.form:48
+msgid "Today"
+msgstr "Aujourd'hui"
+
+#: FSidePanel.class:1128
+msgid "Transparent handle"
+msgstr "Poignée transparente"
+
+#: FFileProperties.form:83
+msgid "Type"
+msgstr "Type"
+
+#: FDirChooser.class:1491
+msgid "Unable to delete directory."
+msgstr "Impossible de supprimer le répertoire."
+
+#: FDirChooser.class:1473
+msgid "Unable to delete file."
+msgstr "Impossible de supprimer le fichier."
+
+#: FFontChooser.form:124
+msgid "Underline"
+msgstr "Souligné"
+
+#: FDirChooser.class:1394
+msgid "Unknown archive."
+msgstr "Archive inconnue."
+
+#: FEditBookmark.form:34
+msgid "Up"
+msgstr "Haut"
+
+#: FFileProperties.class:129
+msgid "Video"
+msgstr "Vidéo"
+
diff --git a/comp/src/gb.form/.src/File/CTaskPreview.class b/comp/src/gb.form/.src/File/CTaskPreview.class
index 15cb97bc1..4d3784119 100644
--- a/comp/src/gb.form/.src/File/CTaskPreview.class
+++ b/comp/src/gb.form/.src/File/CTaskPreview.class
@@ -13,6 +13,7 @@ Private $iMaxFileSize As Integer
 Private $sCache As String
 Private $sFFmpeg As String
 Private $sUnzip As String
+Private $cIcon As New Collection
 
 Public Sub _new(sDir As String, iSize As Integer, iMaxFileSize As Integer, aPreview As String[], sTempDir As String)
   
@@ -58,7 +59,37 @@ Private Sub IsTextFile(sPath As String) As Boolean
 
 End
 
-Private Sub PrintIcon(hImage As Image, sThumb As String, Optional bVideo As Boolean, Optional nPage As Integer)
+Private Sub PaintRoundText(sText As String, sIcon As String, hImage As Image, X As Float, Y As Float)
+
+  Dim hRect As RectF
+  Dim iSize As Integer
+  
+  Paint.Font.Size = Max(7, Min($iSize / 12, Application.Font.Size))
+  hRect = Paint.TextSize(sText)
+  hRect.W += hRect.H * 2
+  hRect.X = Max(0, X + hImage.W - hRect.W - hRect.H / 4)
+  hRect.Y = Y + hImage.H - hRect.H - hRect.H / 4
+  Paint.Rectangle(hRect.X, hRect.Y, hRect.W, hRect.H, hRect.H)
+  Paint.Background = Color.Gradient(Color.TextForeground, Color.TextBackground, 0.33)
+  Paint.Fill(True)
+  Paint.Background = Color.TextBackground
+  Paint.LineWidth = 1
+  Paint.Stroke
+
+  iSize = CInt(hRect.H * 0.7)
+  hImage = $cIcon[sIcon]
+  If Not hImage Then 
+    hImage = Image.Load("img/" & sIcon & ".png").Stretch(iSize, iSize)
+    $cIcon[sIcon] = hImage
+  Endif
+  
+  Paint.DrawImage(hImage, CInt(hRect.X + hRect.H / 2), CInt(hRect.Y + (hRect.H - iSize) / 2))
+
+  Paint.DrawText(sText, CInt(hRect.X + hRect.H / 2 + iSize + hRect.H / 4), hRect.Y, hRect.W, hRect.H, Align.Normal)
+  
+End
+
+Private Sub PrintIcon(hImage As Image, sThumb As String, Optional bVideo As Boolean, Optional nPage As Integer) As Rect
 
   Dim hIcon As Image
   Dim X As Integer
@@ -67,7 +98,6 @@ Private Sub PrintIcon(hImage As Image, sThumb As String, Optional bVideo As Bool
   Dim I As Integer
   Dim iSize As Integer
   Dim iSizeBinding As Integer
-  Dim hRect As RectF
 
   If nPage > 1 And If Not bVideo Then
     iSizeBinding = Min(Min($iSize / 8, Max(1, nPage / 512 * $iSize)), (nPage - 1))
@@ -119,46 +149,38 @@ Private Sub PrintIcon(hImage As Image, sThumb As String, Optional bVideo As Bool
       Paint.FillRect(X + I + 1, Y + hImage.H + I, hImage.W, 1, Color.LightForeground)
     Next
     
-    If $iSize >= 64 Then
-      Paint.Font.Size = Min($iSize / 12, Application.Font.Size)
-      hRect = Paint.TextSize(CStr(nPage))
-      hRect.W += hRect.H
-      hRect.X = X + hImage.W - hRect.W - hRect.H / 4
-      hRect.Y = Y + hImage.H - hRect.H - hRect.H / 4
-      Paint.Rectangle(hRect.X, hRect.Y, hRect.W, hRect.H, hRect.H)
-      Paint.Background = Color.Gradient(Color.TextForeground, Color.TextBackground, 0.33)
-      Paint.Fill(True)
-      Paint.Background = Color.TextBackground
-      Paint.LineWidth = 1
-      Paint.Stroke
-      Paint.DrawText(CStr(nPage), hRect.X, hRect.Y, hRect.W, hRect.H, Align.Center)
-    Endif
+    If $iSize >= 64 Then PaintRoundText(CStr(nPage), "page", hImage, X, Y)
     
   Endif
   
   Paint.End
   
   Try hIcon.Save(sThumb)
+  
+  Return Rect(X, Y, hImage.W, hImage.H)
     
 End
 
-Private Sub PrintTextFile(sPath As String, sThumb As String)
+Private Sub PrintTextFile(sPath As String, sThumb As String) As Rect
 
   Dim hImage As Image
   Dim hFile As File
   Dim sLine As String
   Dim X, Y As Integer
   Dim fSize As Float
+  Dim sData As String
+  Dim iPos As Integer
+  Dim nLines As Integer
 
   If $iSize <= 16 Then Return
 
-  hImage = New Image($iSize, $iSize, Color.TextBackground)
+  hImage = New Image($iSize, $iSize, Color.Merge(Color.TextBackground, Color.TextForeground, 0.05))
   
   hFile = Open sPath
 
   Paint.Begin(hImage)
   
-  fSize = Min($iSize / 16, Desktop.Scale)
+  fSize = Min($iSize / 16, Desktop.Scale * 0.8)
   
   X = CInt(fSize) + 1
   Y = X
@@ -195,17 +217,31 @@ Private Sub PrintTextFile(sPath As String, sThumb As String)
   Paint.Rectangle(0.5, 0.5, hImage.W - 1, hImage.H - 1)
   Paint.Background = Color.LightForeground
   Paint.Stroke
-  Paint.End
+  
+  Seek #hFile, 0
+  While Not Eof(hFile)
+    sData = Read #hFile, -4096
+    iPos = 0
+    Do
+      iPos = InStr(sData, "\n", iPos + 1)
+      If iPos = 0 Then Break 
+      Inc nLines
+    Loop
+  Wend
+  
+  If $iSize >= 64 Then PaintRoundText(Format(nLines, ",0"), "line", hImage, 0, 0)
 
   Paint.End
 
-  Close hFile
+  Close #hFile
     
   Try hImage.Save(sThumb)
-    
+  
+  Return Rect(0, 0, $iSize, $iSize)
+  
 End
 
-Private Sub PrintPdfFile(sPath As String, sThumb As String)
+Private Sub PrintPdfFile(sPath As String, sThumb As String) As Rect
 
   Dim hPdf As PdfDocument
   Dim hPage As Image
@@ -221,11 +257,11 @@ Private Sub PrintPdfFile(sPath As String, sThumb As String)
   If hPdf.Count = 0 Then Return
   
   hPage = hPdf[0].Render()
-  PrintIcon(hPage, sThumb,, hPdf.Count)
+  Return PrintIcon(hPage, sThumb,, hPdf.Count)
 
 End
 
-Private Sub PrintVideo(sPath As String, sThumb As String)
+Private Sub PrintVideo(sPath As String, sThumb As String) As Rect
 
   Dim sFile As String
   Dim hImage As Image
@@ -237,11 +273,11 @@ Private Sub PrintVideo(sPath As String, sThumb As String)
   Try hImage = Image.Load(sFile)
   Try Kill sFile
   If Error Then Return
-  PrintIcon(hImage, sThumb, True)
+  Return PrintIcon(hImage, sThumb, True)
   
 End
 
-Private Sub PrintLibreOffice(sPath As String, sThumb As String)
+Private Sub PrintLibreOffice(sPath As String, sThumb As String) As Rect
 
   Dim sData As String
   Dim hImage As Image
@@ -256,11 +292,11 @@ Private Sub PrintLibreOffice(sPath As String, sThumb As String)
   Exec [$sUnzip, "-p", sPath, "meta.xml"] To sData
   If sData Then Try nPage = CInt(Scan(sData, "*meta:page-count=\"*\"*")[1])
 
-  PrintIcon(hImage, sThumb,, nPage)
+  Return PrintIcon(hImage, sThumb,, nPage)
   
 End
 
-Private Sub PrintEPub(sPath As String, sThumb As String)
+Private Sub PrintEPub(sPath As String, sThumb As String) As Rect
 
   Dim sData As String
   Dim hImage As Image
@@ -308,7 +344,7 @@ Private Sub PrintEPub(sPath As String, sThumb As String)
   Try hImage = Image.FromString(sData)
   If Error Then Return
 
-  PrintIcon(hImage, sThumb,, 16)
+  Return PrintIcon(hImage, sThumb,, 16)
   
 End
 
@@ -327,6 +363,9 @@ Public Sub Main()
   Dim hImage As Image
   Dim hSvgImage As SvgImage
   Dim sThumb As String
+  Dim sType As String
+  Dim hRect As Rect
+  Dim sRect As String
 
   Application.Priority += 10
   
@@ -340,11 +379,16 @@ Public Sub Main()
     
     sThumb = GetThumbnailPath(sPath)
     If Exist(sThumb) Then
-      Print sFile; "\t"; sThumb
+      Print sFile; "\t"; sThumb; "\t"; 
+      Try Print File.Load(File.SetExt(sThumb, "inf"));
+      Print
       Continue
     Endif
     
-    If Main.Ext[sExt] = "image" Then
+    If sExt Ends "~" Then sExt = Left(sExt, -1)
+    sType = Main.Ext[sExt]
+    
+    If sType = "image" Then
       
       If $iMaxFileSize > 0 And If Stat(sPath).Size > $iMaxFileSize Then Goto NEXT_FILE
         
@@ -364,37 +408,37 @@ Public Sub Main()
           hSvgImage.Paint()
           Paint.End
           
-          PrintIcon(hImage, sThumb)
+          hRect = PrintIcon(hImage, sThumb)
         
         Endif
       
       Else
       
         Try hImage = Image.Load(sPath)
-        If Not Error Then PrintIcon(hImage, sThumb)
+        If Not Error Then hRect = PrintIcon(hImage, sThumb)
         
       Endif
     
     Else If sExt = "pdf" Then
       
       If $iMaxFileSize > 0 And If Stat(sPath).Size > $iMaxFileSize Then Goto NEXT_FILE
-      Try PrintPdfFile(sPath, sThumb)
+      hRect = PrintPdfFile(sPath, sThumb)
     
-    Else If Main.Ext[sExt] = "video" Then
+    Else If sType = "video" Then
     
-      Try PrintVideo(sPath, sThumb)
+      hRect = PrintVideo(sPath, sThumb)
       
-    Else If Main.Ext[sExt] Begins "office" And If sExt Begins "od" Then
+    Else If sType Begins "office" And If sExt Begins "od" Then
       
-      Try PrintLibreOffice(sPath, sThumb)
+      hRect = PrintLibreOffice(sPath, sThumb)
       
     Else If sExt = "epub" Then
       
-      Try PrintEPub(sPath, sThumb)
+      hRect = PrintEPub(sPath, sThumb)
     
-    Else If IsTextFile(sPath) Then
+    Else If sType Not Begins "office" And If IsTextFile(sPath) Then
       
-      Try PrintTextFile(sPath, sThumb)
+      hRect = PrintTextFile(sPath, sThumb)
         
     Endif
     
@@ -402,6 +446,12 @@ Public Sub Main()
     
     Print sFile; "\t";
     If Exist(sThumb) Then Print sThumb;
+    Print "\t";
+    If hRect Then
+      sRect = CStr(hRect.X) & "," & CStr(hRect.Y) & "," & CStr(hRect.W) & "," & CStr(hRect.H)
+      File.Save(File.SetExt(sThumb, "inf"), sRect)
+      Print sRect;
+    Endif 
     Print
     
   Next
diff --git a/comp/src/gb.form/.src/File/FileView.class b/comp/src/gb.form/.src/File/FileView.class
index 0162c9a91..a045392e5 100644
--- a/comp/src/gb.form/.src/File/FileView.class
+++ b/comp/src/gb.form/.src/File/FileView.class
@@ -601,15 +601,41 @@ Private Sub StartPreview(aPreview As String[])
 
 End
 
+Private Sub PaintImageWithOutline(hImage As Image, X As Float, Y As Float, W As Integer, H As Integer)
+
+  Dim hOutline As Image
+
+  hOutline = hImage.Stretch(W, H)
+  hOutline.Brightness(1)
+  hOutline.Colorize(Color.TextBackground)
+  
+  Paint.DrawImage(hOutline, X - 1, Y - 1)
+  Paint.DrawImage(hOutline, X + 1, Y - 1)
+  Paint.DrawImage(hOutline, X + 1, Y + 1)
+  Paint.DrawImage(hOutline, X - 1, Y + 1)
+  
+  Paint.DrawImage(hImage, X, Y, W, H)
+
+End
+
 Public Sub TaskPreview_Read(Data As String)
   
-  Dim iPos As Integer
   Dim sPath As String
   Dim sPreview As String
   Dim sLine As String
+  Dim hImage As Image
+  Dim DS As Integer
+  Dim hItem As Object
+  Dim sType As String
+  Dim S As Integer
+  Dim aLine As String[]
+  Dim aRect As String[]
+  Dim hRect As Rect
   
   If Not $bShowPreview Then Return
   
+  DS = Desktop.Scale
+  
   For Each sLine In Split(Data, "\n", "", True)
   
     If sLine = "." Then
@@ -617,12 +643,35 @@ Public Sub TaskPreview_Read(Data As String)
       Return
     Endif
     
-    iPos = InStr(sLine, "\t")
-    sPath = Left(sLine, iPos - 1)
-    sPreview = Mid$(sLine, iPos + 1)
+    aLine = Split(sLine, "\t")
+    
+    sPath = aLine[0]
+    sPreview = aLine[1]
     
     If sPreview Then
-      Try GetView()[PREFIX_FILE & sPath].Picture = Image.Load(sPreview).Picture
+      hItem = GetView()[PREFIX_FILE & sPath]
+      If hItem Then
+        Try hImage = Image.Load(sPreview)
+        If Not Error And If hItem.Picture Then
+          sType = Main.Ext[File.Ext(sPath)]
+          If sType <> "image" And If sType <> "video" Then
+            If hImage.W > DS * 8 Then
+              
+              hRect = Null
+              Try aRect = Split(aLine[2])
+              If Not Error Then Try hRect = Rect(CInt(aRect[0]), CInt(aRect[1]), CInt(aRect[2]), CInt(aRect[3]))
+              If Not hRect Then hRect = Rect(0, 0, hImage.W, hImage.H)
+              
+              Paint.Begin(hImage)
+              S = GetIconSize() \ 32
+              PaintImageWithOutline(hItem.Picture.Image, hRect.X + hRect.W - DS * 4 - S, hRect.Y + S, DS * 4, DS * 4)
+              Paint.End
+              
+            Endif
+          Endif
+          hItem.Picture = hImage.Picture
+        Endif
+      Endif
     Endif
     
     Inc $iPreviewCount
diff --git a/comp/src/gb.form/.src/Main.module b/comp/src/gb.form/.src/Main.module
index 2c47d1236..036d26b4d 100644
--- a/comp/src/gb.form/.src/Main.module
+++ b/comp/src/gb.form/.src/Main.module
@@ -359,9 +359,9 @@ Private Sub FormatNumber(fNum As Float) As String
 
   Dim sStr As String
   
-  sStr = Format(fNum, "0.##")
-  If String.Len(sStr) > 4 Then
-    sStr = String.Left(sStr, 4)
+  sStr = Format(fNum, "0.#")
+  If String.Len(sStr) > 3 Then
+    sStr = String.Left(sStr, 3)
     If Not IsDigit(Right(sStr)) Then sStr = Left(sStr, -1)
   Endif
   Return sStr
@@ -495,6 +495,7 @@ Public Sub InitExt()
   Ext["odp"] = "office-presentation"
   Ext["odf"] = "office-math"
   
+  Ext["rtf"] = "office"
   Ext["doc"] = "office"
   Ext["docx"] = "office"
   Ext["xls"] = "office-calc"
@@ -523,4 +524,4 @@ Public Sub UrlUnquote((Path) As String, Optional DoNotDecodePlus As Boolean) As
 
   Return sRes  
   
-End
\ No newline at end of file
+End
diff --git a/comp/src/gb.form/img/line.png b/comp/src/gb.form/img/line.png
new file mode 100644
index 000000000..b91502ad2
Binary files /dev/null and b/comp/src/gb.form/img/line.png differ
diff --git a/comp/src/gb.form/img/page.png b/comp/src/gb.form/img/page.png
new file mode 100644
index 000000000..2f87175b0
Binary files /dev/null and b/comp/src/gb.form/img/page.png differ