Source position: fpcddb.pp line 100
published property TCDDisk.Genre : string read FGenre write FGenre;