[elviss77]

еще вопрос:создал кнопку,как ей задать процедуру вывести мой рисунок?т.е кликнул по ней и то чио я рисовал выведется в отдельном поле или форме?
procedure TForm1.Button1Click(Sender: TObject);
begin

end;