WxBasic

Un article de Wikipédia, l'encyclopédie libre.

wxBasic est un logiciel libre / open-source, multi-plateformes BASIC interpréteur. Il est basé sur la syntaxe facile du langage BASIC, il est simple à écrire, à relire et à comprendre, il permet aux novices en programmation de créer en toute simplicité des programmes à interface graphique pour Windows et Linux avec un minimum d'efforts.

Il peut créer un exécutable facilement grâce à l'interpréteur. Contrairement aux exécutables crées en Visual Basic, les exécutables crées avec wxBasic ne requiert aucun fichier DLL, fichier ressource, ou installation pour fonctionner. L'exécutable distribué seul peut être démarré immédiatement par les utilisateurs . comme pour tous les programmes écris avec un langage interprété, le code source des programmes peut être démarré si wxBasic est présent sur le système.

wxBasic est tout d'abord écris en C, ainsi qu'en C++ grâce à la bibliothèque wxWidgets. wxWidgets fournie aux programmes des caractéristiques multi-plateformes très puissantes pour nos amis débutants.

wxBasic fonctionne sous Windows en natif, et Linux(utilise la bibliothèque GTK+ ). Un port sous Macintosh est en cours.

wxBasic est un langage basé sur le bytecode, comme Perl ou Java.

Il est licencié sous LGPL, afin que le propriétaire du code puisse-t-y être relié.

[modifier] Exemple de code

Pour vous donner une idée de la syntaxe, voici le code d'un Visualiseur de texte :

  ' de http://wxbasic.sourceforge.net/phpBB2/viewtopic.php?t=554
  ' Simple Visualiseur de texte écris en WxBasic
  dim AppName = "Visualiseur de texte"
  fileName = "" 

  ' Fenêtre principale
  dim frame = new wxFrame( Nothing, -1, AppName & " - Document Sans Titre" )
  ' Controle : Editeur de texte
  dim control = new wxTextCtrl( frame, -1, "", wxPoint( 0, 0 ),
  wxSize( 100, 100 ), wxTE_MULTILINE | wxTE_READONLY | wxTE_RICH)

  ' Barre de Status - La barre en bas de la fenêtre
  dim status = frame.CreateStatusBar( 1 )
  frame.SetStatusText("Prêt")
  '
  ' Dialogue pour l'ouverture d'un fichier
  dim fileDialog = new wxFileDialog( frame )
  '
  ' Ajouter une barre de menu
  dim mBar = new wxMenuBar()
  frame.SetMenuBar(mBar)
  '
  ' Mettre le menu Fichier dans la barre de menu
  dim mFile = new wxMenu()
  mBar.Append(mFile, "&Fichier")

  ' Mettre les sous menu de fichier
  '
  mFile.Append( wxID_OPEN, "&Ouvrir...", "Charger un fichier existant sur le disque" )
  '
  mFile.AppendSeparator()
  mFile.Append( wxID_EXIT, "Q&uitter\tAlt-F4", "Exit Application" )

  Sub onFileOpen( event )
     fileDialog.SetMessage("Ouvrir un fichier")
     fileDialog.SetStyle( wxOPEN )
     If fileDialog.ShowModal() = wxID_OK Then
       fileName = fileDialog.GetPath()
       Ext = fileDialog.GetFilename()
       control.Clear()
       control.LoadFile( fileName )
       frame.SetTitle( AppName & " - " & fileName )
       frame.SetStatusText(Ext)
    End If
  End Sub
  '
  Connect( frame, wxID_OPEN, wxEVT_COMMAND_MENU_SELECTED, "onFileOpen" )

  Sub onFileExit( event )
    frame.Close(True)
  End Sub
  '
  Connect( frame, wxID_EXIT, wxEVT_COMMAND_MENU_SELECTED, "onFileExit" )

  ' Mettre le menu Aide dans la barre de menu
  dim mHelp = new wxMenu()
  mBar.Append(mHelp, "&Aide")
  mHelp.Append( wxID_HELP, "&A propos de\tF1", "A propos de ce programme" )
  '
  Sub onHelpAbout( event )
    Dim msg = "Le visualiseur de texte permet de visualiser n'importe quel fichier texte indépendament de son extension.\n" &
        "Si le fichier est déjà ouvert par un autre programme, alors il ne pourra pas être affiché."
    wxMessageBox( msg, "A propos du Visualiseur de Texte", wxOK + wxICON_INFORMATION, frame )
  End Sub
  Connect( frame, wxID_HELP, wxEVT_COMMAND_MENU_SELECTED, "onHelpAbout" )

  frame.Show(True)

[modifier] Liens externes

Autres langues