Рисование на PaintBox в другом окне

[Zaura]

Здравствуйте. у меня две формы: на Form1 - Button1, на другой PaintBox.
пишу событие на Button1, чтоб при нажатии рисунок рисовался на PaintBox в Form2.
Выдает ошибку. Подскажите пожалуйста

procedure TForm1.Button1Click(Sender:TObject) ;
begin
Form2.PaintBox1.Canvas.Ellipse(100, 100,200,200);
end;

[XE5]

Выдает ошибку

Текстом ошибки поделитесь?

[Arigato]

uses Unit2 присутствует?

[Zaura]

Project Project1.exe raised exception class EAccessViolation with message 'Access violation at adress ......'

да модули подключила

[Serge_Bliznykov]

когда Вы нажимаете на кнопку в форме Form1 вторая форма (Form2), скорее всего, ещё не создана.
Нужно эту форму предварительно СОЗДАТЬ.

[Zaura]

я в этом деле новичок, не подскажите как предварительно создать??

[FaTaL]

Или в опциях проекта сделать её автосоздаваемой при запуске приложения, или Application.CreateForm

[Zaura]

попробовала сделать через Application.CreateForm, не совсеи подходит мне. дело в том, что мне нужно, чтоб при нажатии на кнопку окрывалось второе окно уже с рисунком

[Arigato]

Так в любом случае не получится, надо открывать окно, а затем рисовать на нем. Даже если что-то и нарисовать на невидимом PaintBox, то он нигде картинку не сохраняет, то есть после визуализации там ничего не будет.

[superedward]

procedure TForm1.Button1Click(Sender:TObject) ;
begin
 Form2:=TForm2.Create(Self);
 Form2.PaintBox1.Canvas.Ellipse(100, 100,200,200);
 Form2.Show
end;