Показать сообщение отдельно
Старый 04.03.2009, 04:39   #1
7ion.
AnyKey`щик
 
Регистрация: 03.03.2009
Сообщений: 8
Написано 0 полезных сообщений
(для 0 пользователей)
Что у меня неверно?

Вчера начал кодить на Мидлет Паскале. Поэтому не ржать Вот почему тут ошибка, понять немогу:
    if userName <> 't9ote48te' Or kotName <> '7ion' then
вот в этой строке. Переменные объявлены так и до этого все идет так:
   var okCommand:command; 
      nameField:integer; 
      kotField, label_id:integer; 
      userName:string; 
      kotName:string; 
       cm : command;
  begin  
    okCommand := createCommand('Далее', CM_OK, 1); 
    showForm; 
    addCommand(okCommand); 
     setTicker('Simple Antivirus');
    label_id := formAddString('Cracked by 7ion. Введенный ключ и имя оставьте в покое и жмите далее ;)');  
    kotField := formAddTextField('Введите имя', '7ion', 20, TF_ANY); 
    nameField := formAddTextField('Введите лицензионный ключ', 't9ote48te', 20, TF_ANY); 
    userName := formGetText(nameField); 
    kotName := formGetText(kotField); 
    if userName <> 't9ote48te' Or kotName <> '7ion' then
и еще - что в этой строке
    kotField := formAddTextField('Введите имя', '7ion', 20, TF_ANY);
означает TF_ANY и что еще туда можно подставить? заранее спасибо.
(Offline)
 
Ответить с цитированием