Auf Feld der übergeordneten Klasse zugreifen

[mkinzler]

Über den Owner. Du hast ja beim Erzeugen das TBookShelf bzw. das -Objekt als diesen übergeben. Also:
completePath := bk.((Owner as TBook) as TBookShelf)).SavePath + bk.(Owner as TBookShelf).BookTitle + FChapterTitle;