Подскажите, пожалуйста!!!
Написала многостраничный графический редактор. Но в нем проблема такова:
при создании изображения в новой вкладке и при открытии картинки в новой вкладке эта картинка создается/открывается во всех вкладках. Знаю, что проблема в том, что Image один. Помогите исправить этот недочет...
Вот код:
Код:
procedure создать_в_новой_вкладке;
var
page: TTabSheet;
f: TImage;
begin
try
page := TTabSheet.Create(pagecontrol1);
page.PageControl := pagecontrol1;
page.Caption := format('Без имени - '+'%d', [pagecontrol1.PageCount]);
pagecontrol1.ActivePage := page;
f := TImage.Create(page);
f.parent:=Page;
except
on e: exception do ShowMessage(e.Message);
end;
end;