home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / tema / SW602 / Winbase / EShop_demo / NOVY_OBCH.VWD < prev    next >
Text File  |  2000-03-16  |  3KB  |  74 lines
  1. {$$3220792553 .                              }`Obchodnici` TABLEVIEW 0 0 382 297
  2. STYLE 262208
  3. HDFTSTYLE 4862464
  4. _STYLE3 0
  5. BACKGROUND *12632256
  6. FONT 8 238 34 "MS Sans Serif" 
  7. CAPTION "Nov² obchodnφk"
  8. HELP 13006
  9. OPENACTION _ id_prov:=info_provozovatel[0].id;mailtyp:="Internet" _
  10. BEGIN
  11.  EDITTEXT 6,42,50 40 18 65664 5
  12.   COLOUR *11141120
  13.   BACKGROUND *117440511
  14.   ACCESS _ titl _
  15.  EDITTEXT 3,90,50 112 18 65664 5
  16.   COLOUR *11141120
  17.   BACKGROUND *16777215
  18.   ACCESS _ jmeno _
  19.  EDITTEXT 7,210,50 134 18 65664 5
  20.   COLOUR *11141120
  21.   BACKGROUND *16777215
  22.   ACCESS _ prijmeni _
  23.  COMBOBOX 4,96,76 248 104 10551362 1
  24.   COLOUR *11141120
  25.   BACKGROUND *16777215
  26.   ACCESS _ logname _
  27.   COMBOSELECT _ Useri _
  28.   STATUSTEXT "^Logovacφ jmΘno obchodnφka,  kter²m se p°ihlaÜuje do WinBase"
  29.  EDITTEXT 20,98,102 244 20 65664 5
  30.   COLOUR *11141120
  31.   BACKGROUND *16777215
  32.   ACCESS _ fotka _
  33.   STATUSTEXT "^jmΘno souboru s fotkou obchodnφka"
  34.  EDITTEXT 14,46,142 108 18 65664 5
  35.   BACKGROUND *117440511
  36.   ACCESS _ telef _
  37.  COMBOBOX 25,228,140 108 58 10551362 1
  38.   BACKGROUND *16777215
  39.   ACCESS _ mailtyp _
  40.   DEFAULT _ "Internet" _
  41.   ENUMERATE "Internet","MAIL602",
  42.   STATUSTEXT "^Zvolte typ poÜtovnφho klienta - je-li jmeno@firma.cz - zadejte typ Internet"
  43.  EDITTEXT 16,46,178 108 18 65664 5
  44.   BACKGROUND *117440511
  45.   ACCESS _ fax _
  46.  EDITTEXT 18,178,180 156 18 65664 5
  47.   BACKGROUND *117440511
  48.   ACCESS _ mail_adres _
  49.   STATUSTEXT "^Pokud zvolφte typ klienta Mail602 zadejte ID, jinak adresu typu ""novak@telecom.cz"""
  50.  LTEXT "Mail. adresa:" 17,176,162 64 16 0 0
  51.  LTEXT "Titul" 27,40,28 44 16 0 0
  52.  LTEXT "JmΘno" 5,96,28 44 16 0 0
  53.  LTEXT "P°φjmenφ" 28,208,28 80 16 0 0
  54.  LTEXT "Tel:" 13,16,144 24 16 0 0
  55.  LTEXT "Fax:" 15,16,180 24 16 0 0
  56.  LTEXT 8,8,132 156 82 7 0
  57.  LTEXT 9,168,132 180 82 7 0
  58.  PUSHBUTTON "&Storno" 12,184,234 80 22 0 0
  59.   ACTION _ ACTION_(32,'Novy_obch','','');ACTION_(46,'','','');ACTION_(2,'Novy_obch','','');ACTION_(1,'Info_provozovatel','','') _
  60.   STATUSTEXT "^Zav°φt pohled"
  61.  PUSHBUTTON "&OK" 26,84,234 80 22 0 0
  62.   ENABLED _ (activni<2) _
  63.   ACTION _ ACTION_(31,'Novy_obch','','');test_obchinp(id_obchodnika);ACTION_(2,'Novy_obch','','');kdo();ACTION_(1,'Info_provozovatel','',''); _
  64.   STATUSTEXT "^Ulo₧it provedenΘ zm∞ny a zav°φt pohled"
  65.  LTEXT "Logname:" 58,32,80 52 16 0 0
  66.   STATUSTEXT "^Logovacφ jmΘno obchodnφka,  kter²m se p°ihlaÜuje do WinBase"
  67.  LTEXT 34,264,8 68 20 0 0
  68.   VALUE _ id_prov _
  69.   VISIBILITY _ false _
  70.  LTEXT "Typ poÜty:" 19,176,140 52 20 0 0
  71.  LTEXT "Fotka:" 21,36,104 48 16 0 0
  72.   STATUSTEXT "^Heslo obchodnφka,  kterΘ bude po₧adovßno p°i p°ihlßÜenφ k zpracovßnφ objednßvek po Internetu"
  73. END