TrvActionSave.FindDoc

Returns the index of item in Documents for the given editor rve. Returns -1 if not found.

function FindDoc(rve: TCustomRichViewEdit): Integer;