Al Morakib Logiciel de serveillance par
camera et par internet ...
Al Modabbir Beton Une version de Al Modabbir destinée aux entreprises dont l'activité est la production et vente du beton ...
AsSaydalani Un logiciel pour la gestion pharmaceutique ...
- ventes aux guichets, reglements - utilisation de codes barres - Base de données des médicament saisie et ajour - Gestion des achats et des fournisseurs - Gestion des peromptions - ...
Ce code permet de passer un paramètre défini dans le code .NET à un état crystal report. Il est au préalable nécessaire d'avoir un état crystal report nommé "ETAT" rempli par un dataset nommé "ds". L'état sera affiché dans un contrôle crystalreportviewer nommé "CRV" et possédera un paramètre nommé "param".
Deux imports sont nécessaires : Imports CrystalDecisions.CrystalReports.Engine Imports CrystalDecisions.Shared
Dim crparamfielddefs As ParameterFieldDefinitions
Dim crparamfielddef As ParameterFieldDefinition
Dim crparamvalues As ParameterValues
Dim crparamdiscretevalue As New ParameterDiscreteValue
Dim report As New ETAT
report.SetDataSource(ds)
crparameterdiscretevalue.Value = "toto" ' ou une valeur de textbox par exemple, textbox.text
crparamfielddefs = report.DataDefinition.ParameterFields
crparamfielddef = crparamfielddefs.Item("param")
crparamvalues = crparamfielddef.CurrentValues
crparamvalues.Add(crparamdiscretevalue)
crparamfielddef.ApplyCurrentValues(crparamvalues)
CRV.ReportSource = report
créer une grille avec le contrôle Lamegrid
Il faut tout d'abord télécharger la dll à cette adresse.
Ensuite, il suffit de l'importer dans la boîte à outils pour pourvoir l'utiliser.
Pour créer une grille par le code, rien de plus simple :
For i As Integer = 0 To .ColsCount - 1
For j As Integer = 0 To .RowsCount - 1
.Cell(i, j).BackColor = Color.Red 'colorie toutes les cases en rouge
.Cell(i, j).Text = "test" 'ajoute du texte dans la cellule
.Row(i).Height = 30 'fixe la hauteur des rangées à 20px
.Col(j).Width = 30 'fixe la largeur des colonnes à 20px
Next
Next
End With
Placer ce code dans l'événement load de votre form.
Commentaires des visiteurs :
dkYcEFWJOyqyLKz
That's not just the best aswenr. It's the bestest answer!
Avenue des F.A.R. Rsidence Niama N6 - Ttouan (Maroc)
