Gambas Line Report

Auteur : gambix
Date d'envoi : aujourd'hui à 07:17:35
Catégorie : Bureautique
Niveau : Débutant
Version : Gambas 3

À propos de ce code

Un éditeur wisiwig a l'ancienne pour l'édition de documents...

Un truc a mis chemin entre un éditeur de type block et un tableur.

Il y a pas mal de petits truc sympas et réutilisable pour d'autres projets dans l'archive

- Une nouvelle boite pour la selection des polices
> la liste est plus lisible que dans la version de l'ide

- Une classe générique pour la gestion des tableaux de propriété comme ceux de Gambas Ide.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 $cPropSchemes!Orientation = ["Name": "Orientation", "Type": "Collection", "Values": ["Landscape": Printer.Landscape, "Portrait": Printer.Portrait], "Default": "Portrait", "Separator": TRUE] $cPropSchemes!Width = ["Name": "Width", "Type": "f", "Min": "0", "Default": 10, "NeedRefresh": TRUE] $cPropSchemes!Height = ["Name": "Height", "Type": "f", "NeedRefresh": TRUE] $cPropSchemes!Visible = ["Name": "Visible", "Type": "b", "Default": TRUE, "NeedRefresh": TRUE] $cPropSchemes!Autoresize = ["Name": "Autoresize", "Type": "b", "Default": FALSE, "NeedRefresh": TRUE] $cPropSchemes!Expand = ["Name": "Expand", "Type": "b", "Default": FALSE, "NeedRefresh": TRUE] $cPropSchemes!BackGround = ["Name": "BackGround", "Type": "Color", "Default": Color.Transparent] $cPropSchemes!Foreground = ["Name": "Foreground", "Type": "Color", "Default": Color.Black] $cPropSchemes!Tag = ["Name": "Tag", "Type": "s"] $cPropSchemes!Alignment = ["Name": "Alignment", "Type": "Class", "ClassName": "Align", "Default": Align.TopLeft] $cPropSchemes!Text = ["Name": "Text", "Type": "s", "NeedRefresh": TRUE] $cPropSchemes!Wrap = ["Name": "Wrap", "Type": "b", "Default": TRUE, "NeedRefresh": TRUE] $cPropSchemes!Font = ["Name": "Font", "Type": "Font", "NeedRefresh": TRUE] $cPropSchemes!Stretch = ["Name": "Stretch", "Type": "Class", "ClassName": "ReportCell", "ClassPrefix": "Stretch", "Default": ReportCell.StretchNone] $cPropSchemes!Key = ["Name": "Key", "Type": "s"] $cPropSchemes!DataType = ["Name": "DataType", "Type": "Class", "ClassName": "ReportCell", "ClassPrefix": "Type", "Default": ReportCell.TypeText] $cPropSchemes!Rotation = ["Name": "Rotation", "Type": "f", "Default": 0] $cPropSchemes!Display = ["Name": "Display", "Type": "Class", "ClassName": "ReportLine"] $cPropSchemes!ShadowX = ["Name": "ShadowX", "Type": "f", "Min": "0", "Default": 0, "NeedRefresh": TRUE] $cPropSchemes!ShadowY = ["Name": "ShadowY", "Type": "f", "Min": "0", "Default": 0, "NeedRefresh": TRUE] $cPropSchemes!ShadowColor = ["Name": "ShadowColor", "Type": "Color", "Default": Color.Gray]

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21	$cPropSchemes!Orientation = ["Name": "Orientation", "Type": "Collection", "Values": ["Landscape": Printer.Landscape, "Portrait": Printer.Portrait], "Default": "Portrait", "Separator": TRUE] $cPropSchemes!Width = ["Name": "Width", "Type": "f", "Min": "0", "Default": 10, "NeedRefresh": TRUE] $cPropSchemes!Height = ["Name": "Height", "Type": "f", "NeedRefresh": TRUE] $cPropSchemes!Visible = ["Name": "Visible", "Type": "b", "Default": TRUE, "NeedRefresh": TRUE] $cPropSchemes!Autoresize = ["Name": "Autoresize", "Type": "b", "Default": FALSE, "NeedRefresh": TRUE] $cPropSchemes!Expand = ["Name": "Expand", "Type": "b", "Default": FALSE, "NeedRefresh": TRUE] $cPropSchemes!BackGround = ["Name": "BackGround", "Type": "Color", "Default": Color.Transparent] $cPropSchemes!Foreground = ["Name": "Foreground", "Type": "Color", "Default": Color.Black] $cPropSchemes!Tag = ["Name": "Tag", "Type": "s"] $cPropSchemes!Alignment = ["Name": "Alignment", "Type": "Class", "ClassName": "Align", "Default": Align.TopLeft] $cPropSchemes!Text = ["Name": "Text", "Type": "s", "NeedRefresh": TRUE] $cPropSchemes!Wrap = ["Name": "Wrap", "Type": "b", "Default": TRUE, "NeedRefresh": TRUE] $cPropSchemes!Font = ["Name": "Font", "Type": "Font", "NeedRefresh": TRUE] $cPropSchemes!Stretch = ["Name": "Stretch", "Type": "Class", "ClassName": "ReportCell", "ClassPrefix": "Stretch", "Default": ReportCell.StretchNone] $cPropSchemes!Key = ["Name": "Key", "Type": "s"] $cPropSchemes!DataType = ["Name": "DataType", "Type": "Class", "ClassName": "ReportCell", "ClassPrefix": "Type", "Default": ReportCell.TypeText] $cPropSchemes!Rotation = ["Name": "Rotation", "Type": "f", "Default": 0] $cPropSchemes!Display = ["Name": "Display", "Type": "Class", "ClassName": "ReportLine"] $cPropSchemes!ShadowX = ["Name": "ShadowX", "Type": "f", "Min": "0", "Default": 0, "NeedRefresh": TRUE] $cPropSchemes!ShadowY = ["Name": "ShadowY", "Type": "f", "Min": "0", "Default": 0, "NeedRefresh": TRUE] $cPropSchemes!ShadowColor = ["Name": "ShadowColor", "Type": "Color", "Default": Color.Gray]

Gambas France BETA

À propos de ce code

Commentaires