bonjour je bute sur une exception causée par un this à cet endroit de mon code :

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
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
  private void mnuDossierEnregSous_Click()
  {
    try
    {
      VbFont x = new VbFont();
      // On Error Resume Next (optionally ignored)
      if( Variable.DejaFaitUnCalc == true )
      {
        x.setName( "Monospaced" );
        x.setSize( 11 );
        Pend.getFrmImprimer();
        Variable.Enregistrer = true;
        Variable.Enregistrer1 = true;
        Impression.ImprDossierPend();
        //À faire : Définir les indicateurs et les attributs du contrôle des dialogues communs
        Cmd.setFilter( "Documents (*.25000.doc)|*.25000.doc" );
        Cmd.setDialogTitle( "Enregistrer sous du Dossier en .doc" );
        Variable.sFile1 = Strings.replace( Variable.sFile1, ".25000.doc", "" );
        Variable.sFile1 = Strings.replace( Variable.sFile1, ".25000.dao", "" );
        Cmd.setFileName( Variable.sFile1 );
        //unsup Cmd.CancelError = true;
        Cmd.setInitDir( System.getProperty("user.dir") + "\\Resultats" );
        Cmd.showSave();
        Variable.sFile1 = Cmd.getFileName();
        Variable.sFile2 = Variable.sFile1;
        if( Err.getError().getNumber() != new Variant( this ).getValue( "MSComDlg.cdlCancel" ).toInt() )
        {
          Pend.getFrmImprimer().RichTxtImpr.saveFile( Variable.sFile1 );
        }
        else
        {
          Variable.Enregistrer = false;
          Variable.Enregistrer1 = false;
        }
Pour info je dois porter une application VB6 en Java j'ai utilisé un outil appelé VB Converter