Справился)))

благодарю за объяснения... дело стронулось, правда появились другие ошибки... но пока справляюсь...

теперь то что не совсем правильно я объяснил в другом посте...
procedure First ('G''Unit');<<< объявление
Char[1] : First('G''Unit'); <<< вызов
и сама ошибка:
96:30: Invalid number of parameter

есть разница в словах.... дайте мне рабочий скрипт? и объясните в чем ошибка? я просил 2 вариант... да есть моменты которые не понимаю... так это сразу подразумевает, что хочу, что б скрипт доработали за меня? просто есть разница в терменологи програмиста и человека интересующегося этим... к примеру...

виз у тебя что мания величия? или ты тока язвить умеешь? прошу объяснить что да как в место этого получаю стеб... что изменилась? ответ - ...

это вариант когда прописанно: procedure First ('G''Unit'); - выдает ошибку 8:17: Identifier expected... это вариант второй procedure First (); - выдает ошибку 96:30: Invalid number of parameters скрипт такого типа... program taming; var Char : Array[1..2] of string; Zver : Array[1..4] of Cardinal; {...

program taming; var Char : Array[1..2] of string; Zver : Array[1..4] of Cardinal; procedure IsCurMessages; var D : TDateTime; begin {5 minutes in DateTime = 5 / 1440 = 0.00347} D := Now - (0.00697); InJournalBetweenTimes(CharName + ': I am already performing another action.',D,Now); if LineCount > ...