🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.pascal.borland
Article #163

Image loading/Capturing

#163
From: Electronic_Fart
Date: Fri, 13 Apr 2001 12:49
21 lines
1801 bytes
Sorry about the cross-posting, but I need a result A.S.A.P

I'm writing a program in Turbo Pascal 6, for a school assignment.
All was flowing well, until I stumpled across a ANYPCX.PAS file.
I was amazed. Loading an image file into Pascal hadn't occured to me.

What I want to do is, load some sort of image (any common type) into
pascal, but then want to capture it with GetImage, then place it with
PutImage

Currently I'm only using the units Graph and Crt.
I don't really want to completly overhaul my project (I'm lazy and
sick, bad combo) so I'd appreciate the simplest method

TIA

-- 
This must be Thursday. I never could get the hang of Thursdays.
Electronic_Fart
Battle.net 37470406
ICQ:       67726719
Technical Details
Message-ID: <23tddt0c7o09b8mv2mqpcs2qja11lu3dup@4ax.com>
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-03!supernews.com!nntp.cs.ubc.ca!nntp-relay.ihug.net!ihug.co.nz!news.tig.com.au!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 111659,6da7538787404777,start
X-Google-Attributes: gid111659,public
X-Google-Thread: 10c950,6da7538787404777,start
X-Google-Attributes: gid10c950,public
X-Google-Thread: 108ebd,6da7538787404777,start
X-Google-Attributes: gid108ebd,public
X-Google-ArrivalTime: 2001-04-13 05:54:04 PST
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-03!supernews.com!nntp.cs.ubc.ca!nntp-relay.ihug.net!ihug.co.nz!news.tig.com.au!not-for-mail
From: Electronic_Fart <jenko@ihug.com.au>
Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.ansi-iso,borland.public.turbopascal
Subject: Image loading/Capturing
Date: Fri, 13 Apr 2001 22:49:42 +1000
Organization: The Internet Group (Sydney)
Lines: 21
Message-ID: <23tddt0c7o09b8mv2mqpcs2qja11lu3dup@4ax.com>
NNTP-Posting-Host: p244-tnt2.mel.ihug.com.au
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Trace: bugstomper.ihug.com.au 987166405 7548 203.173.164.244 (13 Apr 2001 12:53:25 GMT)
X-Newsreader: Forte Agent 1.8/32.548