--***************************************************************************** -- Copyright (C) 2003 James E. Hopper. -- -- This is free software; you can redistribute it and/or -- modify it under the terms of the GNU General Public License -- as published by the Free Software Foundation. -- -- This software is distributed in the hope that it will be useful, -- but WITHOUT ANY WARRANTY; without even the implied warranty of -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. -- -- You should have received a copy of the GNU General Public License -- along with this software. If not, write to the Free Software -- Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111- -- 1307, USA. -- -- See the GPL in the COPYING.GPL file for more details. -- -- AUTHOR: James E. Hopper (hopperj@macconnect.com) -- --***************************************************************************** with Ossim.Connectable.Source.Image.Handler; package Ossim.Connectable.Source.Image.Handler.TiffTileSource is type Object is new Ossim.Connectable.Source.Image.Object with private; function Create(C_Object : Void_Ptr) return Object; procedure setApplyColorPaletteFlag( Instance : Object; Flag : Boolean); procedure setApplyColorPaletteFlag( Instance : Ossim.Connectable.Source.Image.Handler.Object; Flag : Boolean); function getApplyColorPaletteFlag(Instance : Object) return Boolean; private type Object is new Ossim.Connectable.Source.Image.Object with record null; end record; end Ossim.Connectable.Source.Image.Handler.TiffTileSource;