Pen. Color := readinteger(color,_data_color) ругается error tipes of actual and formal var parameters must be indentical.
Проблема я так понял в _dara_colo . И в том что она не integer а как заделать?
Выше
_data_color:thi_event
Пробывал
_datacolor:integer не помогло