🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sys.mac
Article #26088

Writing Fkeys

#26088
From: Neil Radisch
Date: Wed, 09 Mar 1988 06:10
39 lines
1611 bytes
Is there anything strange about writing Fkey code that one should know about.

Using turbo pascal the following code works

	Procedure myfkey;
	begin
	moveto(100,100);
	drawstring('hello');
	sysbeep(5);
	sysbeep(5);
	end;

It gives me the 'hello' and two beeps

HOWEVER:

	Procedure myfkey;
	var
	   dstring:str255;
	begin
	dstring:='hello';
	moveto(100,100);
	drawstring('dstring');
	sysbeep(5);
	sysbeep(5);
	end;

Only gives me two beeps, infact any procedure call I try to use that
needs variables (like SFGetfile) does not respond.
What's the deal (I pretty sure I'm doing the correct 'code massaging' since
 the first example works)


|----------------------------------------------------------------------------|
| "Better to remain quiet and be thought a fool than to speak out and remove |
|  all doubt" --- Abraham Lincoln                                            |
|                                                                            |
|  neil@dsl.cis.upenn.edu.UUCP                                               |
|----------------------------------------------------------------------------|
Technical Details
Message-ID: <3582@super.upenn.edu>
Path: arc1-ca.pugleaf.net!utzoo!utgpu!water!watmath!clyde!att-cb!att-ih!pacbell!ames!mailrus!umix!nancy!eecae!super.upenn.edu!dsl.cis.upenn.edu!neil

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!water!watmath!clyde!att-cb!att-ih!pacbell!ames!mailrus!umix!nancy!eecae!super.upenn.edu!dsl.cis.upenn.edu!neil
From: neil@dsl.cis.upenn.edu (Neil Radisch)
Newsgroups: comp.sys.mac
Subject: Writing Fkeys
Message-ID: <3582@super.upenn.edu>
Date: 9 Mar 88 06:10:43 GMT
Sender: news@super.upenn.edu
Reply-To: neil@dsl.cis.upenn.edu.UUCP (Neil Radisch)
Distribution: comp.sys.mac
Organization: University of Pennsylvania
Lines: 39