HDTenEightyP/NetNews huggingface dataset:
From: g92m3062@giraffe.ru.ac.za (MR BL MEIER)
Subject: Re: GIFs in TP
Organization: Rhodes University, Grahamstown, South Africa
Date: Fri, 4 Sep 1992 14:48:54 GMT

In article <1992Aug29.044620.11132@uxa.ecn.bgu.edu> mudrc@uxa.ecn.bgu.edu (Daniel R. Crowson) writes:
>Newsgroups: comp.lang.pascal
>Path: hippo!psgrain!uunet!cis.ohio-state.edu!pacific.mps.ohio-state.edu!linac!uwm.edu!psuvax1!uxa.ecn.bgu.edu!mudrc
>From: mudrc@uxa.ecn.bgu.edu (Daniel R. Crowson)
>Subject: Re: GIFs in TP
>Message-ID: <1992Aug29.044620.11132@uxa.ecn.bgu.edu>
>Organization: Educational Computing Network
>References: <67169@hydra.gatech.EDU>
>Date: Sat, 29 Aug 1992 04:46:20 GMT
>Lines: 17
>In article <67169@hydra.gatech.EDU> gt8834a@prism.gatech.EDU (William Lang) writes:
>>
>>Does anyone have any routines in Turbo Pascal that will read/display
>>(and maybe even write) 640x480x256 GIF files?  If so, please
>>respond here or email me, it would be much appreciated.
>>
>>Thanks,
>>William
>
>  I'm interested in the above info, too!!!!
>

Same goes for me!

KnightOrc
Newsgroups: comp.lang.pascal
From: chard@genghis.borland.com (Richard Nelson)
Subject: Re: Question about tWindow in TVision
Summary: Frames and frames....
Originator: chard@genghis.borland.com
Organization: Borland International
Date: Thu, 3 Sep 1992 03:25:51 GMT

>today, i've a question about Turbo Pascal 6.0 Turbo Vision. I tryed to
>open a window _without_ a frame.

Kind of a strange thing to do, but read on...

>First, i set the Options to _no_ Frame (Options := Options and not ofFramed;)
>within the init-constructor. Nothing happens (the Option ofFramed is never set
>in my opinion).

Read the doc on ofFramed again.  It doesn't apply to windows.  It applies
to views *in* windows.  That is, if you insert a view into a window or a
dialog box and set that view's ofFramed bit, the window (actually the
window's frame object) will draw a frame line around the view.

>Second, i defined a new object tMyWindow = object(tWindow) with the method
>InitFrame.
>
>procedure tMyWindow.InitFrame;
>begin
>  Frame := nil;
>end;
>
>but something happy was the result. I got a frame, but not a full one. The botton
>line was not there (only corrupted).

Window objects expect to have frames.  The frame draws all the background for
the window, so setting Frame to nil will have strange results, as you
noticed.

>Now, my question. How is the right way to open a Window _without_ a frame.

Ah, now we get to the heart of the matter.  The answer is probably "you
don't."  If you want a "window" without a frame, what you're really
talking about is just a group.  After all, a window without a frame
isn't really a window, since it's the frame that allows you to move,
resize, etc. the window.  If you just want to create a frameless view
on the desktop, you should probably derive your object from TGroup
instead of TView.

Another approach would be to cover the frame of the window.  I actually
did that once, although I can't remember why at the moment.  There's
no reason you can't put an "interior" view into the window that eclipses
the frame view. That way you still have all the functions built into the
frame available, without it being visible.

A third approach that might work (I haven't thought about this very hard
yet) is to create the default frame, then Grow it so it's larger than the
window view.  The window should clip the frame, so you wouldn't have to see
the outline part of the frame.  Again, this gives you the benefits of
having the frame as a background to any other views in the window, without
having to look at the view.

I hope one of these ideas is helpful.
-- 
=========================================================================
 Richard Nelson, Borland Int'l | chard@borland.com | Go Bears! Grrr-rah!
  Had this been Borland's opinion, I would have written it in a manual.
             "Be good and you will be lonesome." -- Mark Twain
From: exuptr@exu.ericsson.se (Patrick I Taylor)
Newsgroups: comp.lang.pascal
Subject: Re: $L directive
Date: 25 Aug 92 14:23:25 GMT
Organization: Ericsson Network Systems, Inc.

In article <9208211000.aa02248@Bonnie.ics.uci.edu> jko@Bonnie.ICS.UCI.EDU writes:
>From: jko@Bonnie.ICS.UCI.EDU
>Subject: $L directive
>Date: 21 Aug 92 17:00:33 GMT


>Who knows what the '{$L rotate}' line would mean at the
>beginning of a pascal program (TURBO PASCAL) during the
>declaration.

>Is rotate a library function or possibly a assembly language
>program??

>jko@bonnie.ics.uci.edu

If I remember correctly, $L is the LINK .obj directive.  Look for ROTATE.OBJ.
 ----------------------------------------------------------------------------
    "This must be Thursday.  I never could get the hang of Thursdays"
                                                       - D Adams
  - Patrick Taylor
    Ericsson Network Systems
    exuptr@exu.ericsson.se                       "Don't let the .se fool you"
    alternately, exuptr@ZGNews.Lonestar.Org
From: holland@matt.ksu.ksu.edu (Rich Holland)
Newsgroups: comp.lang.pascal
Subject: Re: Prevent the screen from scrolling?
Date: 26 Aug 1992 20:00:55 -0500
Organization: Kansas State University
NNTP-Posting-Host: matt.ksu.ksu.edu

89612048s@csghsg5a.bitnet writes:

>If I am going to write anything into the last position of the screen
>(80,25) or of a window, the screen is scrolling on line forward. Is there any 
>possibility to prevent the screen from scrolling? Otherwise you
>always have to take care that you never write into the last screen-
>positio.

I've thought about this in the past, and here's what I came up with (but
haven't coded yet):

Instead of calling Write(), call DirectWrite, a procedure that will copy 
the ASCII value to the screen but not update the cursor position....

That, or there's probably a BIOS interrupt to do somethign similar...

-- 
Rich Holland              | INTERNET: holland@matt.ksu.ksu.edu
100 Jardine Terr, Apt A7  | BITNET  : holland@ksuvm
Manhattan, KS  66502-3357 | UUCP    : ...!rutgers!matt.ksu.ksu.edu!holland
"Jesus saves...but Gretzky gets the rebound!  He shoots!  He scores!!"
From: ddxxdd@mixcom.com (Jeff Ding)
Newsgroups: comp.lang.pascal
Subject: Re: want to help me make my 'value' routine crash-proof?
Date: 25 Aug 92 21:41:51 GMT
Article-I.D.: mixcom.1992Aug25.214151.3208
Organization: Milwaukee Internet Xchange BBS, Milwaukee, WI U.S.A.

In article <1992Aug25.150516.17385@javelin.sim.es.com> tpehrson@javelin.sim.es.com writes:
>
>function value(I:string):word;
>var n:real; n1:integer;
> begin
> val(i,n,n1);
> if n1<>0 then begin
>  i:=copy(i,1,n1-1);
>  val(i,n,n1);
> end;
> value:=n;
> if i='' then value:=0;
> end;
>
>of course, when i pass a loaded string such as '99999' the routine crashes.
>maxing out at 65535 is desired.
>
>so what's the quick and dirty?
>

Here is my example String-To-Word conversion program.  It is quick, simple
and even converts negative numbers appropriately.  Any error will result
in the word equal to 0.  You can add an error flag very easily.


program TestValue;


var  S : string;
     V : word;


function StrToWord(S: string): word;

  var  N   : word;
       Err : integer;

  begin
    Val(S, N, Err);
    if Err > 0 then S:= Copy(S, 1, Err - 1);
    Val(S, N, Err);
    if (Length(S) < 7) and (S < '65536') then
      StrToWord:= N else StrToWord:= 0
  end;  {StrToWord}


begin
  write('Enter a number: ');
  readln(S);
  V:= StrToWord(S);
  writeln('The ''WORD'' value is: ',V);
end.


>-- 
>\clinkenpeel: aberrant analytical cynical agnostic idealist.  i exclusively /
>/represent myself.  i do not offend anyone; however, some morons choose to  \
>\offend themselves.  judge only those who you would have judge yourself.  i /
>/don't practice what i preach - i'm not the type of person i'm preaching to.\

jeff.ding@mixcom.com
Newsgroups: comp.lang.pascal
From: dmurdoch@mast.queensu.ca (Duncan Murdoch)
Subject: Re: LENGTH and POS in TP 5.5
Organization: Queen's University
Date: Fri, 4 Sep 1992 13:41:33 GMT

In article <7351@ds5000.DAC.Northeastern.edu> cschmidt@ds5000.DAC.Northeastern.edu (Christopher Schmidt) writes:
>Here is a problem with the LENGTH function in TP 5.5 that cost me
>several hours of debugging.  After discovering the source of the
>problem, I investigated the POS function as well.
>
>The TP 5.5 documentation says the LENGTH function returns a value
>of type integer.  Apparently, it actually returns a value of type
>byte.  
...
>The TP 5.5 documentation says the POS function returns a value of
>type byte.  Apparently, it actually returns a value of type
>integer.  

Both of these are also true of TP 6.0.  You seem to regard these as bugs in 
the compiler or libraries, rather than errors in the documentation.  
Clearly the easiest fix would be to change the manuals so that Length and 
Pos are properly documented; what would be the problem in that?

Duncan Murdoch
Newsgroups: comp.lang.pascal
From: samodena@csemail.cropsci.ncsu.edu (S. A. Modena)
Subject: Re: TPW 1.5 Manuals
Organization: Crop Science Dept., NCSU, Raleigh, NC 27695-7620
Date: Fri, 28 Aug 1992 00:33:24 GMT

In article <27AUG199215361076@gergi.tamu.edu> chris@gergi.tamu.edu (Chris King) writes:
>Hey can anyone tell me what manuals where included in tpw 1.5.
>
>All I got from Borland was a manual on the Debugger, and one on the
>resource Workshop.  I expected more.  Did anyone get more?
>
>I called customer support and they said that that was all, but the
>person I talked to didn't seem to know what was suppose to be included,
>and had a hard time answering my questions.
>
>Chris King
>Chris@gerga.tamu.edu
>[72030,1304] via Compuserve

Chris:  I think that TPW 1.5 largely represented inclusion of *new*
features offered by Windows 3.1, plus "redesigning" those parts of
the underlying TPW 1.0 code that "got broke" by changes in Windows
3.1........YES, I received the same two books that you did, felt
momentarily incredulous, but then remembered what a person at Borland
had told me about their hell-bent effort to update all of their
Windows products for Windows 3.1.
Steve
---
+------------------------------------------------------------------+
|     In person:  Steve Modena     AB4EL                           |
|     On phone:   (919) 515-5328                                   |
|     At e-mail:  nmodena@unity.ncsu.edu                           | 
|                 samodena@csemail.cropsci.ncsu.edu                |
|                 [ either email address is read each day ]        |
|     By snail:   Crop Sci Dept, Box 7620, NCSU, Raleigh, NC 27695 |
+------------------------------------------------------------------+
         Lighten UP!  It's just a computer doing that to you.
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO
         


Newsgroups: comp.lang.pascal
From: dmurdoch@mast.queensu.ca (Duncan Murdoch)
Subject: Re: Variables as names for functions/procedures
Organization: Queen's University
Date: Tue, 25 Aug 1992 19:50:43 GMT

In article <1992Aug25.161359.11795@kth.se> kjell@elixir.e.kth.se (Kjell Rilbe) writes:
>
>Perhaps you can use procedural variables, try this:

>  Proc:=ClrScr;
>  Proc;
>  WriteLn('This is normal video');
>  Proc:=HighVideo;
..

>There is one limitation, all procedures assigned to the Proc variable
>must have the same header as the one in the VAR declaration.

There's another irritating limitation:  the procedures can't be ones from 
the System unit.  Your example works because both ClrScr and HighVideo are 
in CRT, but you can't assign "Sin" or "Cos" or lots of others to procedure 
variables.  You need to write your own function which calls the System unit 
function.  This is because of the implementation of the System unit:  many 
of the procedures aren't true procedures at all, but are compiled into 
inline code.

Duncan Murdoch
From: foster@nzkites.UUCP (Foster Schucker)
Newsgroups: comp.lang.pascal
Subject: Re: Executable
Date: 2 Sep 92 01:14:06 GMT
Organization: Kiteflyers Roost

leonard@qiclab.scn.rain.com (Leonard Erickson) writes:

> Why should I have to put up with 640x200x2 (or 320x200x4) when my hardware
> can do 640x200x16 *and* I have the BGI to do it? Folks with superVGA
> probably feel the same.
> 
> And we'd *all* like to be able to eliminate the space used by the unused
> BGI drivers. 
> 
> Oh yeah, Borland should have "suggested" an environment variable to point
> to the directory with all your BGI files. <sigh>

I love it, what a great idea!!  I'm going to write to all the authors 
of the programs and suggest that they look at the "BGI" environment
var and use that.  

Maybe if enough users say something then after awhile it will become
a common practice.

Thanks for the good idea!!



Foster Schucker  (foster@nzkites.uucp)  (1-215-458-8354 (voice))
From: exuptr@exu.ericsson.se (Patrick I Taylor)
Newsgroups: comp.lang.pascal
Subject: Re: Why the TPW real arithmetic much slower than TP 6.0 s?
Date: 25 Aug 92 14:12:08 GMT
Organization: Ericsson Network Systems, Inc.

In article <1992Aug21.031123.23828@lugb.latrobe.edu.au> CHEJH@LURE.LATROBE.EDU.AU (HAZI,Jeno) writes:
>Does anybody compared the speed of the same numerical algorithm written in 
>Pascal and in another language?

I have an optimized prime number seive that Turbo C cannot compare with in
speed (don't ask me why, I don't really know).

 ----------------------------------------------------------------------------
    "This must be Thursday.  I never could get the hang of Thursdays"
                                                       - D Adams
  - Patrick Taylor
    Ericsson Network Systems
    exuptr@exu.ericsson.se                       "Don't let the .se fool you"
    alternately, exuptr@ZGNews.Lonestar.Org
From: bobb@vice.ICO.TEK.COM (Robert Beauchaine)
Newsgroups: comp.lang.pascal
Subject: Re: TP units question
Date: 4 Sep 92 20:02:27 GMT
Organization: Tektronix, Inc., Beaverton,  OR.

In article <dmurdoch.123.715622406@mast.queensu.ca| dmurdoch@mast.queensu.ca (Duncan Murdoch) writes:
|From the point of view of a user, interfacing it can have both positive and 
|negative points.  It makes the unit easier to understand if it only 
|interfaces a few routines.  I've got a few units that work perfectly with 
|*nothing* interfaced; they're a joy to use, because they're so simple. (They 
|do things like initialization and exit handling.)  On the other hand, a 
|simple interface can't be flexible.  You may not like the particular high 
|level interface to a library unit; if the low-level interface isn't hidden 
|from you, you can construct your own high level interface in a new unit, 
|without messing up the implementation of the old unit.
|

  This is actually a pretty good argument for encapsulation and
  polymorphism.  Create your objects with as simple an interface as
  possible to finish the task.  If you find instances where you need
  more power, derive a new object and only change those parts that
  require updating.  If done properly, you don't even need to go
  through your code and update all those function calls that in a
  tradition programming paradigm would now be obsolete.

  In a neanderthal way, Borland's .TPU files are a primitive stab at
  object oriented programming.  A good lesson in OOP design will
  probably make you a better unit writer as well.

/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\ 

Bob Beauchaine bobb@vice.ICO.TEK.COM 

C: The language that combines the power of assembly language with the 
   flexibility of assembly language.

Real friends don't let friends use UNIX.
From: ts@uwasa.fi (Timo Salmi)
Newsgroups: comp.lang.pascal
Subject: Re: Executable
Date: 30 Aug 92 05:13:48 GMT
Organization: University of Vaasa, Finland

In article <1992Aug30.015843.6035@nmsu.edu> death@acca.nmsu.edu (The Grimm Reaper) writes:
>However, if you are using the BGI (Borland Graphics Interface?) files, the
>CHR and .BGI files, then those are required as well (they are screen
>drivers and font files)

That is quite true.  On the other hand, the needed .bgi and /or .chr
files can, be linked to the executable to make distributing them
separately unnecessary.  For example I have linked egavga.bgi to
most of my graphics programs.  Usually only that .bgi lest that the
executable becomes unnecessarily bloated. 

P.S. How to do that is explained in the familiar reference below.
The information given in the original manuals is not very easy to
figure out, so I have tried to make it a bit clearer.
112730 Jun 13 12:23 garbo.uwasa.fi:/pc/ts/tsfaq29.zip

..................................................................
Prof. Timo Salmi
Moderating at garbo.uwasa.fi anonymous FTP archives 128.214.87.1
Faculty of Accounting & Industrial Management; University of Vaasa
Internet: ts@uwasa.fi Bitnet: salmi@finfun   ; SF-65101, Finland
From: S105728@umrvma.umr.edu ( Steve Poulsen)
Newsgroups: comp.lang.pascal
Subject: 'value' routine [REPLY]
Date: 29 Aug 92 14:29:00 GMT

Judging by his procedure, I think he wants to salvage any integer from the
string starting from the left.  If it's too big then return the MAX.


'123.456' returns 123
'123456'  returns 65536 [or whatever]
'12STP'   returns 12
'STPFL'   probably zero.

========================================      ,--,
  Steven P. Poulsen <S105728@UMRVMA>       ,'  '--,
  Student of Electrical Engineering        ---, ,'
  University of Missouri - Rolla            ,','
=======================================    , '
Newsgroups: comp.lang.pascal
From: IQTI400@INDYCMS.IUPUI.EDU (macphil)
Subject: Re: Executable
Organization: IUPUI
Date: Sun, 30 Aug 1992 02:39:34 GMT

In article <1992Aug30.015843.6035@nmsu.edu>
death@acca.nmsu.edu (The Grimm Reaper) writes:
 
>However, if you are using the BGI (Borland Graphics Interface?) files, the
>CHR and .BGI files, then those are required as well (they are screen
>drivers and font files)
 
not totally true.  the .bgi files can be linked into the module making
it independent of the presence of those files.  (check out the tp docs)
Newsgroups: comp.lang.pascal
From: chris@gergi.tamu.edu (Chris King)
Subject: TPW 1.5 Manuals
News-Software: VAX/VMS VNEWS 1.41    
Organization: Geochemical and Environmental Research Group - TAMU
Date: Thu, 27 Aug 1992 21:36:00 GMT

Hey can anyone tell me what manuals where included in tpw 1.5.

All I got from Borland was a manual on the Debugger, and one on the
resource Workshop.  I expected more.  Did anyone get more?

I called customer support and they said that that was all, but the
person I talked to didn't seem to know what was suppose to be included,
and had a hard time answering my questions.

Chris King
Chris@gerga.tamu.edu
[72030,1304] via Compuserve
Newsgroups: comp.lang.pascal
From: @gemstone.inel.gov ()
Subject: TotConventional memory
Organization: Idaho National Engineering Laboratory, Idaho Falls, Idaho
Date: Thu, 3 Sep 92 15:22:42 GMT

How do I determine total bytes conventional memory?  I'm looking for the
value returned by MEM and CHKDSK for Total bytes memory.  Am I looking
for the Free pointer?  Some general direction on this subject would be
very helpful!  Thanks.


-------------------------------------------------------------------------------
 Kevin Hemsley                             |
 Information & Technical Security          | If you think that you have someone
 Idaho National Engineering Laboratory     | eating out of your hand, it's a
 (208) 526-9322                            | good idea to count your fingers!
 kev@inel.gov                              |
-------------------------------------------------------------------------------
========== long legal disclaimer follows, press n to skip ===========

Neither the United States Government or the Idaho National Engineering
Laboratory or any of their employees, makes any warranty, whatsoever,
implied, or assumes any legal liability or responsibility regarding any
information, disclosed, or represents that its use would not infringe
privately owned rights.  No specific reference constitutes or implies
endorsement, recommendation, or favoring by the United States
Government or the Idaho National Engineering Laboratory.  The views and
opinions expressed herein do not necessarily reflect those of the
United States Government or the Idaho National Engineering Laboratory,
and shall not be used for advertising or product endorsement purposes.
From: exuptr@exu.ericsson.se (Patrick I Taylor)
Newsgroups: comp.lang.pascal
Subject: Re: Help with TSR programs
Date: 25 Aug 92 14:13:33 GMT
Organization: Ericsson Network Systems, Inc.

In article <1992Aug21.121031.16939@uwasa.fi> ts@uwasa.fi (Timo Salmi) writes:
>From: ts@uwasa.fi (Timo Salmi)
>Subject: Re: Help with TSR programs
>Date: 21 Aug 92 12:10:31 GMT

>In article <1992Aug20.220514.7038@crash> tech@crash.cts.com (Don Bontemps) writes:
>>currently running so as not to execute it twice?  Also, once your
>>TSR is installed, how do you get it to unload itself from memory?

>This is somewhat of an non-reply, but there is a good alternative. 
>That is using Turbo Power's mark-release from
> 75542 Feb 14  1992 garbo.uwasa.fi:/pc/memutil/tsrcom34.zip

>I've tried the an unistall of my own and run into all sorts of
>problems.  Of course there must be a working solution to be found,
>nevertheless.

Turbo Power now has a TSR toolkit, which gives you all you need to do these
things "professionally".
 ----------------------------------------------------------------------------
    "This must be Thursday.  I never could get the hang of Thursdays"
                                                       - D Adams
  - Patrick Taylor
    Ericsson Network Systems
    exuptr@exu.ericsson.se                       "Don't let the .se fool you"
    alternately, exuptr@ZGNews.Lonestar.Org
Newsgroups: comp.lang.pascal
From: u895027@tasman.cc.utas.edu.au (Mark Mackey)
Subject: FTP sites for .CHR files
Organization: University of Tasmania, Australia.
Date: Fri, 28 Aug 1992 01:53:45 GMT


Does anybody out there know of any ftp sites that have .CHR font files for use
with Borland's BGI? I'm getting somewhat sick of the 4 that came with TP6.0 :)


-------------------------------------------------------------------------------
Mark Mackey                       | "I think therefore I am" - Descartes.
u895027@tasman.cc.utas.edu.au     | "I think I think therefore perhaps I am"
E-mail should be accompanied by   |   - a more cautious philosophical outlook.
$1000 in unmarked $5 notes,       | "I drink to unthink, which proves that I
preferably in a brown paper bag.  |   think" - not the famous Ly Tin Wheedle.
-------------------------------------------------------------------------------
From: S105728@umrvma.umr.edu ( Steve Poulsen)
Newsgroups: comp.lang.pascal
Subject: Keyboard Unit
Date: 3 Sep 92 23:55:20 GMT

To DON GRAVES,

Great unit.  Some of us could probably write something like it but you
took the time to put it all into one unit.  I personally am  going to
use it and quit using all those @$#%@ case statements and readkeys.  Thanks
for the post. :)

========================================      ,--,
  Steven P. Poulsen <S105728@UMRVMA>       ,'  '--,
  Student of Electrical Engineering        ---, ,'
  University of Missouri - Rolla            ,','
=======================================    , '
Newsgroups: comp.lang.pascal