Initiation‎ > ‎

Tester des programmes simples

Des programmes simples pour se faire la main.
 

HelloWorld

C’est le premier programme de tous les débutants, c’est une vieille tradition. Dans Espace de travail, saisissez :

Window(#(Static,"Hello world!"))

Puis exécuter en appuyant sur F9 ou ! et vous obtenez une petite fenêtre indiquant "Hello world !". Vous pouvez remplacer "Hello world" par "Coucou", car le libellé entre guillemets est celui qui est affiché. Vous savez maintenant afficher une fenêtre et programmer......

Suneidraw

C’est un sympathique logiciel de dessin, caché dans la documentation. Dans Espace de travail, saisissez :

Window(DrawControl)

Puis exécuter en appuyant sur F9 ou !

Editeur de texte

Le tutoriel classique pour débuter est l’éditeur de texte : un logiciel simple qui permet l’apprentissage du menu et de la barre d’outils. Dans Espace de travail, saisissez :

Window(Controller
   {
   Title: "Simple Editeur de Texte"
   Commands:
       (
       (Cut,       "Ctrl+X",   "Cut the selected text to the clipboard")
       (Copy,      "Ctrl+C",   "Copy the selected text to the clipboard")
       (Paste,     "Ctrl+V",   "Insert the contents of the clipboard")
       (Delete,    "Delete",   "Delete the selected text or next character")
                (Users_Manual, "F1")
                (About_Suneido)
       )
   Menu:
       (
       ( "&Edit",
           "Cu&t", "&Copy", "&Paste", "&Delete" ,"","&Exit")
       ("&Help",
           "&Users Manual", "&About Suneido" )
       )
   Controls:
       ( Vert
           ( Toolbar, Cut, Copy, Paste)
           Editor )
   })
Puis exécuter en appuyant sur F9 ou ! et vous obtenez une fenêtre intitulée "Simple Editeur de Texte", avec un menu et une barre d’outils. Vous pouvez dès à présent préparer le menu de votre prochain logiciel.

Horloge

Quelle heure est-il ? Dans Espace de travail, saisissez :

(Controller
        {
         Title: 'Date & Clock'
         New(before = "", font = #(name: 'Courier', size: 12, weight: 600), format = 'dddd dd MMMM yyyy HH:mm:ss')
                {
                super(.ctrls(before, font, format))
                .before = before
                .format = format
                .timer = SetTimer(.WndProc.Hwnd, 100, 1000, .On_Timer)
                }
        ctrls(before, font, format)
                {
                return Object('Border'
                                Object('Static'  Date().Format(format), font: font.name, size: font.size, weight: font.weight))
                }
        On_Timer(@unused_arguments)
                {
                .Border.Static.Set(.before $ Date().Format(.format))
                }
        Destroy()
                {
                KillTimer(.WndProc.Hwnd, .timer)
                ClearCallback(.On_Timer)
                }
        })
Puis exécuter en appuyant sur F9 ou !