Как заставить собственный класс работать с канвой формы

[restarterx]

Здравствуйте!

Есть форма, скажем описаная в Unit1.pas.
Также есть написаный вручную клас, который лежит в Class.pas.

Так вот, этот клас, который сидит в Class.pas должен работать с канвой формы из Unit1.pas, тоетсь рисовать на ней. Как это сделать?

[Prisioner]

возможно решение корявое. А если в public класса засунуть переменную типа TCanvas и при вызове класса из Unit1.pas передавать ей Form1.Canvas ? а в самом классе все действия относящиеся к канве формы совершать с этой переменной.

[restarterx]

Делал так, вылетает в Access Violation

[Utkin]

Во-первых неудачное название юнита. Во-вторых, можно описать процедуру как

Bla_bla (Form: TForm);

А уже потом обращаться внутри процедуры к канвасу данной формы.

[evg_m]

Также есть написаный вручную клас, который лежит в Class.pas.

Так вот, этот клас, который сидит в Class.pas должен работать с канвой формы из Unit1.pas,

Класс может (если есть class procedure), но не обязан работать. Работать должен объект данного класса.
Телепатор подсказывает что такой объект НЕ БЫЛ создан. Работать некому. получаем Access Violatation.
код работы с данным классом в студию.