Документ взят из кэша поисковой машины. Адрес оригинального документа : http://www.cplire.ru/Lab144/start/r_jam_d.html
Дата изменения: Mon Sep 24 15:02:27 2007
Дата индексирования: Tue Oct 2 02:15:46 2012
Кодировка: Windows-1251

Поисковые слова: galaxy cluster
Actor Prolog. Example "D:\MOROZOV\Z\DEMO\EXE\EXAMPLES\SADT\JAM\JAM.DLG"
grid(80,25)
failure_color(red,white)
diagram_font("Arial",20)
dialog_font("Arial",12)

dialog "ListOfInstruments" (
          "Посуда и инструменты",white,blue,default,
          centered,centered,default)
     vbox(center)
          listbox['Sort'](instruments,3000,30,9,[],[])
          button(close,"&Close")
     end_of_vbox
end_of_dialog

dialog "ChooseFruits" (
          "Выбрать ягоды и фрукты",white,blue,default,
          centered,centered,default)
     vbox(center)
          listbox(1000,value_o1,30,4,
               [
               "Черная рябина",
               "Яблоки \"Антоновка\"",
               "Земляника"
               ],
               [
               "Черная рябина"
               ])
          ok(close,"&Close")
     end_of_vbox
end_of_dialog

dialog "HeatUpMixture" (
          "Нагреть смесь",blue,default,default,
          centered,centered,default)
     vbox(center)
          "Для выбранных ягод и фруктов "
          text['AlignCenter','MultiLine'](fruits,15,1)
          "время нагрева сахарной смеси "
          hbox
               "составляет"
               text['AlignCenter','MultiLine'](time,3,1)
               "мин"
          end_of_hbox
          ok(close,"&Close")
     end_of_vbox
end_of_dialog