INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Clipboard class"
project: "Visual Eiffel"
revision: "$Revision: 1.1 $"
copyright: "Copyright (C) 1996-2005 Object Tools Group"
license: "http://visual-eiffel.com/license"
cluster: grape
class CLIPBOARD
feature

is_open: BOOLEAN
-- is clipboard open

open (the_tile: TILE): BOOLEAN
-- Open clipboard
require
not_void: the_tile /= void
not_open: not is_open

close
-- Close clipboard
require
is_open: is_open

empty
-- Empty clipboard buffer
require
is_open: is_open

put (the_object: CLIPBOARD_OBJECT): BOOLEAN
-- Put object in the clipboard
require
not_void: the_object /= void
is_open: is_open

get (the_object: CLIPBOARD_OBJECT): BOOLEAN
-- Take object from the clipboard
require
not_void: the_object /= void
is_open: is_open

is_object (the_object: CLIPBOARD_OBJECT): BOOLEAN
-- Is a data compatible with the_object in the clipboard?
-- (Can be object be taken from the clipboard?)
require
not_void: the_object /= void
is_open: is_open

register_format (format_name: STRING): INTEGER
require
format_name_not_void: format_name /= void
end -- class CLIPBOARD

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES