aboutsummaryrefslogtreecommitdiff
path: root/clipboardCrossCall_12.dcl
blob: 16b0fab392f36f42b8efc32771c42ff1ce8cc66c (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
definition module clipboardCrossCall_12

import	clCrossCall_12

//	Predefined Clipboard Formats.
CF_TEXT             :==	1
CF_BITMAP           :==	2
CF_METAFILEPICT     :==	3
CF_SYLK             :==	4
CF_DIF              :==	5
CF_TIFF             :==	6
CF_OEMTEXT          :==	7
CF_DIB              :==	8
CF_PALETTE          :==	9
CF_PENDATA          :==	10
CF_RIFF             :==	11
CF_WAVE             :==	12
CF_UNICODETEXT      :==	13
CF_ENHMETAFILE      :==	14


winInitialiseClipboard	::         !*OSToolbox ->           *OSToolbox
winGetClipboardText		::         !*OSToolbox -> (!String,!*OSToolbox)
winSetClipboardText		:: !String !*OSToolbox ->           *OSToolbox
winHasClipboardText		::         !*OSToolbox -> (!Bool,  !*OSToolbox)
winGetClipboardCount	::         !*OSToolbox -> (!Int,   !*OSToolbox)