Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2011-05-02 23:27:42 ЛС | профиль | цитата
Да и эта строка лишняя -
   if fr < 40 then fr := 40; 
- она есть в вызываемой процедуре Beep(fr,dr)
------------ Дoбавленo в 23.27:
nesco писал(а):
Пусть пишит свой учебник, я его потом проверю по части интерфейса
А перед "потом" интересующийся скопирует себе то, что сейчас в Wiki и потом будем удивляться - кто придумал использовать EventFromData вместо ....
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0