Discussion :

[Rifton007]

Bonjour à vous tous et merci d'avance pour votre aide.
Je viens d'acquérir Xceed Grid pour ma société.
Mais j'ai une erreur qui s'affiche par rapport à la clé de license.

J'ai donc été sur Support Xceed comme c indiqué dans l'erreur.
Et il explique enfaite qu'il faut enregistrer la license dans son programme VB pour que ça fonctionne.

Voici le lien.
http://doc.xceedsoft.com/products/Xc...Licensing.html

Mais je parle pas anglais, et je vois pas trés bien où je dois insérer le code indiquer dans ma programmation.

[Carmel_O]

Bonjour,

Normalement tu as eu des licences key avec Xgrid il suffit de les mettre dans "Applications Events"
Pour cela tu vas dans les propriétés de ton projet:
-Onglet Application il y aura un boutton "View Application events" et ici il faut mettre les key

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup
            Xceed.Grid.Licenser.LicenseKey = "XXXX-XXXX-XXXX-XXXX"
            Xceed.Editors.Licenser.LicenseKey = "XXXX-XXXXX-XXXXX-XXXX"
            Xceed.Validation.Licenser.LicenseKey = "XXXX-XXXXX-XXXXX-XXXX"
        End Sub

La premiere doit suffire je pense, mais ca coute rien

[Rifton007]

Je ne sais pas pourquoi, je susi bien dans ApplicationEvents.vb
Mais j'ai un probléme avec:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup

J'ai regardé sur MSDN

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
' Usage
Public Sub Me_Startup( _
   ByVal sender As Object, _
   ByVal e As StartupEventArgs _
) Handles Me.Startup
End Sub

Mais rien à faire ça m'affiche une erreur de syntaxe.
Pour la tienne ça met tout simplement :
Erreur 1: Instruction non valide dans un espace de noms.

[Carmel_O]

Je vais te passer tout le code entier c'est du vb.net 2005

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Namespace My
 
    ' The following events are availble for MyApplication:
    ' 
    ' Startup: Raised when the application starts, before the startup form is created.
    ' Shutdown: Raised after all application forms are closed.  This event is not raised if the application terminates abnormally.
    ' UnhandledException: Raised if the application encounters an unhandled exception.
    ' StartupNextInstance: Raised when launching a single-instance application and the application is already active. 
    ' NetworkAvailabilityChanged: Raised when the network connection is connected or disconnected.
    Partial Friend Class MyApplication
        Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup
            Xceed.Grid.Licenser.LicenseKey = "XXXX-XXXXX-XXXXX-XXXX"
            Xceed.Editors.Licenser.LicenseKey = "XXXX-XXXXX-XXXXX-XXXX"
            Xceed.Validation.Licenser.LicenseKey = "XXXX-XXXXX-XXXXX-XXXX"
        End Sub
    End Class
 
End Namespace

Je n'ai rien eu a changé juste mettre les key et jamais d'erreur

[Rifton007]

Trop le top, ça marche, je te remercie infinément.

[Carmel_O]

De rien, passe une bonne journée bon courage avec cette grill