InfoViewPerspective example for Delphi
LEADImage1.GetFileInfo ( 'v:\images\image1.cmp', 1 ) ; ShowMessage (IntToStr(LEADImage1.InfoViewPerspective));