Вот пример сохранения и чтения без всяких хлопот
Код:
//Сохранить
var
FS: tfilestream;
begin
FS := TFileStream.Create( 'vkladki.opt', fmCreate );
FS.WriteComponent( PageControl1 );
FS.Free;
end;
//Загрузка
var
FS: tfilestream;
begin
FS := TFileStream.Create( 'vkladki.opt', fmOpenRead );
PageControl1 := FS.ReadComponent( PageControl1 ) as TPageControl;
FS.Free;
end;