TweetFollow Us on Twitter

Clipboard 2
Volume Number:1
Issue Number:6
Column Tag:BASIC

The Clipboard

By Dave Kelly

One of the features that makes the Macintosh unique from other computers is the use of the clipboard. The clipboard adds flexibility to the Mac user interface. With it you can exchange data from one application to another. Anyone who has worked with MacPaint or MacWrite is familar with the operation of the clipboard. What you cut or copy is saved in the clipboard allowing you to paste it somewhere else! But how do you deal with the clipboard from your own programs? That is the subject we want to explore this month.

Support of the clipboard is another feature of the Macintosh user interface that was left out of MSBASIC version 1.0 but fortunately is easily used in version 2.0. Most of the features that we will use here will only work for version 2.0. There are a few things you should keep in mind when writing programs to use the clipboard.

First, there are three different ways which BASIC can address the clipboard file. Use the OPEN statement with one of the following statements for the filename:

“CLIP:” for transferring data from programs that have tabular data, like Multiplan or Chart.

“CLIP:TEXT” for transfering text to and from word processors and other programs.

“CLIP:PICTURE” for transferring picture data to and from MacPaint or other programs.

Files that are OPENed to this device, using the mode indicated above, will read/write data directly from/to the Clipboard File stored on the system disk.

The sample program ‘Show Clip’ shows how the clipboard could be read within an application and displayed. You have probably seen many applications that give the user the option to “Show Clipboard”. The program will check to see if the clipboard contains picture data or text and will read the data accordingly and display it in the window. This routine is an example to show how to read from the clipboard, but could be used in your own application to produce the “Show Clipboard” option.

When you make use of EDIT FIELDs in your programs you should keep the Edit menu active so that your EDIT FIELD can be fully edited using the cut, copy and paste feature of the Edit menu. This way the clipboard is being used without having to do a whole lot of programing; however the operation is still manual. The user must decide what to select and copy or cut it into the EDIT FIELD. The same is true for inserting text with the paste option.

If the file is opened to “CLIP:” or “CLIP:TEXT”, the data is read sequentially from the clipboard file. There are actually two clipboard areas. One is the clipboard file and the other is a temporary area in memory. That’s why sometimes the disk turns on when you cut or copy something and other times it doesn’t.

To write text to the clipboard:

• Open the clipboard with OPEN “CLIP:” FOR OUTPUT AS #1 or equivalent.

• Use Write #1 or Print #1 to write your variable to the clipboard file.

• CLOSE #1 to close the file.

To read from the clipboard:

• Open the clipboard with OPEN “CLIP:” FOR OUTPUT AS #1 or equivalent.

• Use INPUT #1 to read variables from the clipboard file.

• CLOSE #1 to close the file.

See the program for an example of this.

You should remember to use the proper format when storing data in the clipboard so that other applications may use the data. For example, the text that a word processor uses would contain format control characters imbedded in the text. These kind of characters should only be left in the text stored in the clipboard if you know that the program that will be reading it will use them. Some things might not matter what format they are stored in and the data can be formatted once it has been read into the new application. Most of the applications available will tell you how the data is formatted, so if you know what the data will be used in, there won’t be any problem. Some help on transfering files to and from the clipboard and other applications can be found on page 55 of the BASIC manual.

Copying pictures is just about as easy as text. To transfer something to MacPaint:

• Use the PICTURE ON statement to record the graphics statements.

• Issue all the graphics statements you need to produce the picture. You don’t have to draw it to record it as a picture.

• Use PICTURE OFF to stop recording graphics.

A good example of this is found in the BASIC manual page 205.

• Next open the clipboard file with OPEN “CLIP:PICTURE” FOR OUTPUT AS #1 (or equavalent statement)

• Send the picture to the clipboard with PRINT #1,PICTURE$

• Close the file: CLOSE #1

Next you can either exit BASIC and paste the picture into MacPaint or save the picture in the Scrapbook to use later.

To transfer MacPaint pictures to BASIC:

• Put the MacPaint picture in the Clipboard

• Open the clipboard file with OPEN “CLIP:PICTURE” FOR INPUT AS #1 (or equavalent statement)

• Transfer the picture to a string variable (called image$ in this case): image$=INPUT$(LOF(1),1)

• Close the file: CLOSE #1

• Draw the Picture to the screen exactly the way it was recored: PICTURE,image$

See the program for an example of reading a picture from the clipboard.

To determine if the data in the clipboard is picture or text we can use the BASIC statement LOF. LOF(1) will return the length of the specified file (in this case our file is “CLIP:”. If the result turns out to be zero, it means that either the data is a picture or the clipboard is empty. So next just read whatever picture Is stored, if any. If the clipboard is empty, the resulting string variable will also be empty.

There is one more way to store text or graphics in the clipboard. I’m not sure that there is a good reason to want to do this though. Using a screen GET, a portion of the screen can be copied into a non-string variable array. This variable can be written to the clipboard for later use. You can then read the clipboard and use a screen PUT, to place the data back on the screen. The screen GET and PUT commands are much more useful in moving sections of the screen image. Since the array used is not a string, it is not in the proper format for MacPaint or for PICTURE statements. I tried to use screen GET and PUT to read the picture of Professor Mac found in last month’s Screen Poke article. The problem is that when the image is directly poked on the screen, BASIC doesn’t recognize it as being anything useful. You can’t record pokes with the PICTURE ON/OFF feature of BASIC. Perhaps one of our readers knows how to change the data from a screen GET format to MacPaint picture format. For most programs you will want to use the other methods mentioned anyway.

In conclusion, figure 1 shows the different ways that data can be stored in the clipboard. Most of these methods are explained fairly well in the BASIC 2.0 manual. (ref. pg. 55-58 for more information on tranfering data between BASIC and other programs. Note there is an error on page 58 where it says PICTURE$,IMAGE$ should be PICTURE, IMAGE$. Also see pg. 205 for PICTURE statement.)

‘     Show Clip
‘     By Dave Kelly
‘     ©MACTUTOR 1985

‘Set up windows
WINDOW 1,”Output Window”, (2,40)-(510,200),1
WINDOW 2,”Clipboard File”,  (2,220)-(510,340),1
WINDOW CLOSE 2
‘Set up menus
MENU 4,0,0,””
MENU 5,0,1,”Windows”
MENU 5,1,1,”Output Window”
MENU 5,2,1,”Show Clipboard”
MENU 5,3,1,”Quit”
ON MENU GOSUB handlemenu
MENU ON
ON DIALOG GOSUB handlewindow
DIALOG ON
EDIT FIELD 1,””,(150,42)-(365,120),1
show:GOTO show:GOSUB showclipboard
handlemenu:  ‘Menu handler
number=MENU(0)
IF number<>5 THEN RETURN
item=MENU(1):MENU
IF item=1 THEN WINDOW 1
IF item=2 THEN GOSUB showclipboard
IF item=3 THEN WINDOW CLOSE 2:WINDOW CLOSE 1:MENU RESET: END
RETURN
handlewindow:  ‘Menu handler
stat=DIALOG(0)
IF stat=3 THEN WINDOW DIALOG(3)
IF stat=4 THEN WINDOW CLOSE DIALOG(4)
RETURN
showclipboard:
WINDOW 2:CLS
DIALOG STOP:MENU STOP
‘Read text from clipboard
OPEN “CLIP:TEXT” FOR INPUT AS #1
IF LOF(1)=0 THEN CLOSE #1:GOTO   do.picture
LOCATE 1,1
WHILE NOT EOF(1)
        INPUT #1,a$:PRINT a$
WEND
CLOSE #1:DIALOG ON:MENU ON
RETURN
do.picture:  ‘Read picture from Clipboard
DIALOG STOP:MENU STOP
OPEN “CLIP:PICTURE” FOR INPUT AS #1
        image$=INPUT$(LOF(1),1)
        PICTURE,image$
CLOSE #1:DIALOG ON:MENU ON:RETURN

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

VirtualBox 5.1.10 - x86 virtualization s...
VirtualBox is a family of powerful x86 virtualization products for enterprise as well as home use. Not only is VirtualBox an extremely feature rich, high performance product for enterprise customers... Read more
Pixa 1.1.9 - Quickly and easily organize...
Pixa is an image-organizing application. The new app functions well, is easy to use, and helps people organize their images quickly and easily on their computers. For those who prefer not to use the... Read more
Civilization VI 1.0.1 - Next iteration o...
Sid Meier’s Civilization VI is the next entry in the popular Civilization franchise. Originally created by legendary game designer Sid Meier, Civilization is a strategy game in which you attempt to... Read more
Google Chrome 55.0.2883.75 - Modern and...
Google Chrome is a Web browser by Google, created to be a modern platform for Web pages and applications. It utilizes very fast loading of Web pages and has a V8 engine, which is a custom built... Read more
Chromium 55.0.2883.75 - Fast and stable...
Chromium is an open-source browser project that aims to build a safer, faster, and more stable way for all Internet users to experience the web. Version 55.0.2883.75: Security fixes: High CVE-2016... Read more
Luminar 1.0.2 - Powerful, adaptive, conf...
Luminar is the new full-featured image editor that adapts to the way you edit photos. Over 300 essential tools to fix, edit, and enhance your photos with comfort. The future of photo editing is here... Read more
Slack 2.3.3 - Collaborative communicatio...
Slack is a collaborative communication app that simplifies real-time messaging, archiving, and search for modern working teams. Version 2.3.3: Fixed window zoom jumping back-and-forth OS X 10.9... Read more
WhatRoute 2.0.10 - Geographically trace...
WhatRoute is designed to find the names of all the routers an IP packet passes through on its way from your Mac to a destination host. It also measures the round-trip time from your Mac to the router... Read more
Luminar 1.0.2 - Powerful, adaptive, conf...
Luminar is the new full-featured image editor that adapts to the way you edit photos. Over 300 essential tools to fix, edit, and enhance your photos with comfort. The future of photo editing is here... Read more
WhatRoute 2.0.10 - Geographically trace...
WhatRoute is designed to find the names of all the routers an IP packet passes through on its way from your Mac to a destination host. It also measures the round-trip time from your Mac to the router... Read more

Latest Forum Discussions

See All

Amateur Surgeon 4 Guide: Become the worl...
It's time to wield your trusty pizza cutter again, as Amateur Surgeon has returned with a whole fresh set of challenges (and some old, familiar ones, too). Starting anew isn't easy, especially when all you have at your disposal is a lighter, the... | Read more »
Le Parker: Sous Chef Extraordinaire (Ga...
Le Parker: Sous Chef Extraordinaire 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: | Read more »
Telltale Games really is working on a Gu...
Telltale Games' next episodic adventure is indeed Guardians of the Galaxy. A document tied to the voice actors strike suggested that the project was in the work, but now we have direct confirmation following an announcement at the Game Awards that... | Read more »
Amateur Surgeon returns to iOS and Andro...
Amateur Surgeon and its two sequels disappeared from the App Store some time and it was sad days for all. But now, just in time for the holidays, the Adult Swim favorite makes its joyous return in the shape of Amateur Surgeon 4, a remake with... | Read more »
The best board games on mobile
Sometimes you need to ditch all of the high speed, high action games in favor of something a little more traditional. If you don't feel like parting ways from your mobile device, though, there are still plenty of ways to get that old-school fix.... | Read more »
The best Facebook Messenger Instant Game...
Facebook's new Instant Games is now here, meaning you can play games with your friends directly via Facebook. It's a fun new way to connect with friends, of course, but it's also proving to be a solid gaming experience in its own right, with a... | Read more »
You can now play game's on Facebook...
Facebook launched its new Instant Games platform in an exciting new attempt to engage its user base. As a result, you can now play a number of different games directly through Facebook Messenger. All of these games run with HTML5, meaning you play... | Read more »
Apollo Justice Ace Attorney (Games)
Apollo Justice Ace Attorney 1.00.00 Device: iOS Universal Category: Games Price: $.99, Version: 1.00.00 (iTunes) Description: Court Is Back In Session Star as rookie defense attorney, Apollo Justice, as he visits crime scenes,... | Read more »
KORG iWAVESTATION (Music)
KORG iWAVESTATION 1.0 Device: iOS Universal Category: Music Price: $19.99, Version: 1.0 (iTunes) Description: A revolutionary new world of sound.The Wave Sequence Synthesizer for iPad - KORG iWAVESTATION | Read more »
Don't Grind Guide: Tips for becomin...
Don’t Grind is a surprising, derpy little one touch game with fun hand-drawn graphics. The goal is simple -- get the high score without being chopped to bits. That can be tough when you’re not used to the game, and that’s compounded by the fact... | Read more »

Price Scanner via MacPrices.net

13-inch Silver Touch Bar MacBook Pro in stock...
Amazon has the new 2016 13″ 2.9GHz/256GB Silver Touch Bar MacBook Pro (MLVP2LL/A) in stock today and on sale for $1749 including free shipping. That’s $50 off MSRP, and it’s the lowest price... Read more
Parallels Toolbox 1.3 for Mac Offers 25 Singl...
Parallels has launched Parallels Toolbox 1.3 for Mac, an upgrade that adds five new utilities to the stand-alone application which was released in August and is available exclusively online at http... Read more
OWC Mercury Elite Pro Dual mini Ultra-Portabl...
OWC has introduced the new OWC Mercury Elite Pro Dual mini, a powerful yet ultra-portable dual-drive RAID solution. The new Mercury Elite Pro Dual mini packs phenomenal performance into a small... Read more
Clearance 13-inch Retina MacBook Pros availab...
B&H Photo has clearance 2015 13″ Retina Apple MacBook Pros available for up to $200 off original MSRP. Shipping is free, and B&H charges NY tax only: - 13″ 2.7GHz/128GB Retina MacBook Pro: $... Read more
Roundup of 2016 13-inch 2.0GHz MacBook Pro sa...
B&H has the non-Touch Bar 13″ MacBook Pros in stock today for $50-$100 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 13″ 2.0GHz MacBook Pro Space Gray (MLL42LL/A): $1449 $... Read more
New 13-inch 2.0GHz Space Gray MacBook Pro in...
Adorama has the new 13″ 2.0GHz Space Gray MacBook Pro (non-Touch Bar, MLL42LL/A) in stock for $1499 including a free 3-year AppleCare Protection Plan. Shipping is free, and Adorama charges sales tax... Read more
Finnair Adopts iOS Enterprise iPad Apps from...
Finnair and IBM have announced a first-of-its-kind agreement to utilize iOS enterprise apps from IBM to support the airline’s overall digital transformation. Finnair is focused on Asia-Europe traffic... Read more
Tech21 Launches Evo Go iPhone 7 Case Availabl...
Tech21 has announced the launch of the Evo Go case for Apple iPhone 7 and iPhone 7 Plus, exclusively at T-Mobile. Available online and at participating T-Mobile stores nationwide, Evo Go cases start... Read more
Apple Turns (RED) with More Ways to Join the...
In recognition of World AIDS Day, Apple is offering more ways than ever for customers to join (RED) in its mission to create an AIDS-free generation. Apple is the worlds largest corporate contributor... Read more
Deals on new 15-inch Touch Bar MacBook Pros,...
B&H Photo has new 2016 Apple 15″ Touch Bar MacBook Pro models in stock today with some available for $50 off MSRP, each including free shipping plus NY sales tax only: - 15″ 2.7GHz Touch Bar... Read more

Jobs Board

*Apple* Brand Ambassador (Macy's) - The...
…(T-ROC), is proud of its unprecedented relationship with our partner and client, APPLE ,in bringing amazing" APPLE ADVOCATES"to "non" Apple store locations. Read more
US- *Apple* Store Leader Program - Apple (Un...
…Summary Learn and grow as you explore the art of leadership at the Apple Store. You'll master our retail business inside and out through training, hands-on Read more
*Apple* Retail - Multiple Positions- White P...
Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, you're also the Read more
Automotive Detailer - *Apple* Used Autos -...
We are currently conductinginterviews and will be accepting applications for a part-time detailer. Apple Used Autos is a great place to work andstart a career. We Read more
*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.