23.07.2013 / 12:18 |  | 
Virus-ON    Пользователь  
   Сейчас: Offline 
 Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
   | lehaAKO,  Да.
   | 
  23.07.2013 / 12:46 |  | 
lehaAKO    Пользователь  
   Сейчас: Offline 
 Имя: Алексей Откуда: Малая Тавра-Екатеринбург(Свердловская область) Регистрация: 21.02.2013
   | Virus-ON, а как пишется?
   | 
  23.07.2013 / 13:04 |  | 
vl@volk    Пользователь  
   Сейчас: Offline 
 Имя: Владислав Откуда: Земля Регистрация: 26.12.2012
   | в этой версии константы надо объявлять после типов, дерево программы program  
 uses  
  types  
   constants  
    variables  
     procedures and functions  
   program begin  
end.  
  __________________
   знает толк  | 
  23.07.2013 / 14:01 |  | 
ВитаминКО    Супермодератор  
   Сейчас: Offline 
 Имя: Василиус Откуда: RZN Регистрация: 20.04.2012
   | lehaAKO, на твой пост ( 23.07.2013 / 13:46) отвечу,  чуть выше список функций  __________________
   わからない!!  | 
  23.07.2013 / 14:28 |  | 
Sprite    Пользователь  
   Сейчас: Offline 
 Имя: Сергей Откуда: Одесса Регистрация: 20.05.2013
   | ВитаминКО,  Спасибо =) . Час попробую
   | 
  23.07.2013 / 14:40 |  | 
Sprite    Пользователь  
   Сейчас: Offline 
 Имя: Сергей Откуда: Одесса Регистрация: 20.05.2013
   | ВитаминКО,  Не пашет    . Либы не работают.  | 
  23.07.2013 / 14:50 |  | 
Dimonik    Пользователь  
   Сейчас: Offline 
 Имя: Димон Откуда: Украина Регистрация: 20.02.2010
   | Либу vibra попробовал-ничего не вышло.
   | 
  23.07.2013 / 14:52 |  | 
lehaAKO    Пользователь  
   Сейчас: Offline 
 Имя: Алексей Откуда: Малая Тавра-Екатеринбург(Свердловская область) Регистрация: 21.02.2013
   | integerToString(i); а как это использовать? просто хочу попытаться сделать аннимацию типа на мб 40 ten$=str$(land%+anim%) 50 dg ten$ ну что то так, ланд это номер картинки с которой начинается аннимация, ф аним понятно думаю, или вот так как нить только как его перевести на мп  20 dg str$(land%+anim%),50,50
   | 
  23.07.2013 / 16:33 |  | 
ВитаминКО    Супермодератор  
   Сейчас: Offline 
 Имя: Василиус Откуда: RZN Регистрация: 20.04.2012
   | var  
 ten: String;  
 land, anim: Integer;  
begin  
 // ...  
 ten:=integerToString(land)+integerToString(anim);  
 // ...  
 drawImage(ten, 50, 50);  
 // ...  
end  
 Ябысделал так.  __________________
   わからない!!  |