[PhoeniX]

у тебя функция diagramma не является методом класса TForm1 и соответственно не может юзать внутренние объекты , коим является Image1
нужно либо функцию определить методом класса:
в Unit1.h там где "public: //User decloration" прописать прототип функции, а при описании функции указать void TForm1::diagramma(...),
либо передавать в функцию указатель на объект на ряду с остальными параметрами