lundi 27 octobre 2014

DotNet Renamer : MAJ vers 1.1.4.0

Modifié : Ajout de l'interface ICore20Reader afin de simplifier l'utilisation$
Ajouté : Classe Cls_Task afin d'améliorer et de simplifier l'utilisation de la librairie de renommage..

Comment utiliser simplement la librairie :

Dim _param = New Cls_Parameters(TxbSelectedFile.Text, TxbSelectedFile.Text & "-Renamed.exe")
    If _param.isValidFile Then
 
          Dim _paramArgs As New Cls_RenamerState() With { _
                                                         .Namespaces = True, _
                                                         .Types = True, _
                                                         .Methods = True, _
                                                         .Properties = True, _
                                                         .CustomAttributes = True, _
                                                         .Events = True, _
                                                         .Fields = True, _
                                                         .Parameters = True, _
                                                         .Variables = True, _
                                                         .RenameMainNamespaceSetting = Cls_RenamerState.RenameMainNamespace.NotOnly, _
                                                         .ReplaceNamespacesSetting = Cls_RenamerState.ReplaceNamespaces.Empty, _
                                                         .RenamingType = Cls_RandomizerType.RenameEnum.Chinese, _
                                                         .RenameRuleSetting = Cls_RenamerState.RenameRule.Personalize}
 
          Dim _Task = New Cls_Task(_param, _paramArgs)
          _Task.StartTask()
 
          MessageBox.Show("Renamed :" & vbNewLine & vbNewLine & _
                          "Namespace(s) : " & _Task.Result.Item("Namespace").ToString & vbNewLine & _
                          "Type(s) : " & _Task.Result.Item("Type").ToString & vbNewLine & _
                          "Method(s) : " & _Task.Result.Item("Method").ToString & vbNewLine & _
                          "Parameter(s) : " & _Task.Result.Item("Parameter").ToString & vbNewLine & _
                          "Generic Parameter(s) : " & _Task.Result.Item("Generic Parameter").ToString & vbNewLine & _
                          "Variable(s) : " & _Task.Result.Item("Variable").ToString & vbNewLine & _
                          "Property(s) : " & _Task.Result.Item("Property").ToString & vbNewLine & _
                          "Event(s) : " & _Task.Result.Item("Event").ToString & vbNewLine & _
                          "Field(s) : " & _Task.Result.Item("Field").ToString _
           , "Completed", MessageBoxButtons.OK, MessageBoxIcon.Information)
 
    End If

--> Projet accessible ici

Aucun commentaire:

Enregistrer un commentaire