Пример создания приложения с помощью VLE 2.0

VLE - Visual Layout Editor - средство визуального проектирования интерфейса для языка CURL созданного корпорацией CURL и доступного в версии 2.0 Surge Lab IDE.

Чтоб продемонстрировать его возможности, напишим с его помощью простой калькулятор.

Для начала создадим новый проект:



Назвем файл с кодом - start.curl  и разместим его на диске "c:" .
Теперь мы получили проект, который имеет только пустое окно:



Для создания калькулятора нам понадобится всего два компонента TextField (для отображения результата) и CommandButton (для кнопок ).

Поставим для начала компоненту TextField и поменяем всего одно свойство: design-name, то-есть имя компоненты на Ekran:



Теперь поставим кнопки (CommandButton), у которых нужно изменить поля  Lable на соответствующие названия кнопок:




Теперь настало время добавить в наш калькулятор код. Первым делом, создадим общие переменные, которые придется добавить вручную в Surge Lab IDE или отредактировать файл start.curl (почему-то непосредственно из VLE этого сделать нельзя ):

{curl 2.0 applet}

|| ---------- код, который нужно добавить -----------

{
let Cod:int = 0 }                      || Cod = 1 нажали "+", Cod = 2 нажали "-"
{ let v1:double, v2:double}              ||
значения в числовом виде

{ let temp:StringBuf = {StringBuf ""} }  || значения в текстовом виде
{ let temp2:StringBuf = {StringBuf ""} } || . . .

|| -------------------------------------------------


Дальше добавим возможность ввода чисел. Для этого, на каждой кнопке с изображением цифр и знака "." сделаем двойной клик (или выберем свойство Action в закладке Event Handler). При этом откроется окно для ввода кода:



Код для кнопки "7":

    {temp.append '7'} || добавляем символ "7" в конец строки (для каждой кнопки свой символ)
    {
set Ekran.value = {temp.to-String}} || выводим новое число на екран

То-же самое проделаем и с остальными цифровыми кнопками и кнопкой ".", меняя для каждой свой символ.

Для кнопки "C" введем следующий код:

    set Cod = 0          || Очистим код операции
    {temp.clear}         || Очистим переменную для ввода числа
    
set Ekran.value = "" || Очистим "екран"
 
Kод для кнопки "+":

     set Cod = 1                  
    
{temp2.set-contents temp}     || присвоим переменной temp2 значение переменной temp
    
set temp = {StringBuf ""}  || ... temp очистим

Код для кнопки "-":

    
set Cod = 2
     
{temp2.set-contents temp}      || присвоим переменной temp2 значение переменной temp
     set temp = {StringBuf ""}   || ... temp очистим  

Код для кнопки "=":

    set v1 = {temp.to-double}   || "превратим" строковую переменную в числовую
    
set v2 = {temp2.to-double}  || . . .
    {switch Cod
      case 1 do 
set v1 = v1 + v2
      case 2 do 
set v1 = v2 - v1
    }

   
set Ekran.value = {String v1} || Выводим результат на екран
   set temp = {StringBuf ""}     || Очистим переменную для нового числа
    set Cod = 0                  

Теперь нажав кнопку на панели VLE : "Run file" откроется Internet Explorer или Netscape (плагин также может работать с браузером Mozilla) с нашим калькулятором:



Полный текст программы можно посмотреть тут start.curl.
Заметьте, что для повторного редактирования калькулятора, достаточно просто загрузить его в VLE. В отличии от некоторых других редакторов интерфейса, VLE анализирует код файла *.curl и не нуждается в дополнительных файлах ресурсов.


Автор: Федотов А.В.

e-mail: feal@pbank.if.ua