As I surf the net, I come across various things that I wish someone had told me about. In theory, one day it will all be available in the polished sections of my website. In the meantime, if you're willing to 'dig' through some disorganised material, you may be rewarded with 'gems'!
Click here to visit editor's freeware, shareware page.
tsfaqp.zip Common Turbo Pascal Questions and Timo's answers This file TSFAQP.IDX lists the contents of ftp://garbo.uwasa.fi/pc/ts/tsfaqp36.zip also available as ftp://garbo.uwasa.fi/pc/link/tsfaqp.zip
Printer.BeginDoc; Printer.Canvas.CopyRect( Rect(0,0,Bitmap.Width,Bitmap.Height), Bitmap.Canvas, Rect(0,0,Bitmap.Width,Bitmap.Height)); Printer.EndDoc;Normally the printout is too small. If so, just scale the Dest (see CopyRect help) rectangle by a value (ie: Bitmap.Width*4,BitmapHeight*4)
=== I saw a post about this site saying it offered Turbo Pascal Shareware Programs, for Windows 3.x Said to download new programs DAILY (10 a.m. EST) from more than 300 sites all over the world. Check out the new programs every day in the "TODAY'S FREE COMPUTER PROGRAMS" section on the all new JUMBO! --- over 200,000 files and programs --- over 1.8 million links --- including a HUGE multimedia section with sounds, graphics, videos, streaming music, VRML, animations, clip art, icons, schockwave, screen savers ---- http://www.jumbo.com. At: http://www.jumbo.com/pages/programming/windows/turbopas1/ http://www.jumbo.com/pages/programming/windows/bcpp/ === A newsgroup posting extolled the virtues of an editor called FTE. Said to run on Linux console, Linux X, OS/2, DOS etc, and have Borland Pascal-like keybindings by default (syntax highlights about 15 languages, has smart indent function and it's own macro language) Said to be available from... http://www.xnet.com/~blatura/linapp6.html#text This lists a lot of nice editors. Some of above was from Balazs Scheidler, Author of Turbo Vision Resource WorkShop, resource toolkit for Turbo Vision for Pascal and C++. You can get the latest version at http://www.bitsoft.com/tvrw === DERIVED FROM a post by.... Mike Copeland mrcope@primenet.com> Newsgroups: comp.lang.pascal.borland Subject: Re: Tab and F keys in Tur Date: 16 Mar 1997 18:16:04 -0700 Here's a little program that should answer most questions about reading characters the keyboard can generate. While ReadKey cannot distinguish between the right and left shift keys it will detect alt, function and arrow keys. It shows how the special/extended keys work, since certain special keys will return the same value if you don't show the #00/xx relationship: Uses CRT; Var C1,C2 : char; begin repeat C1 := ReadKey; C2 := #00; if C1 = #00 then C2 := ReadKey; writeln (Ord(C1),'/',Ord(C2)) until C1 = #27 { Escape } end. BTW, the KeyPressed processing has virtually no pertinence in a program which does this sort of processing - it's strictly for application logic which must test for keyboard input. Your code flushes the keyboard buffer before processing a single keystroke - is that what you want to happen in a complete program like this?
=== Claim to be 'Leading the shareware revolution' There is also good stuff for for programmers here... http://www.cyber-distributors.com === Lots of good, bite sized pieces for beginners, etc... worth a look! tkb) Turbo Pascal and C learning club web site. Pascal and C guide, Get the TP / C magazine (free) http://www.hkstar.com/~autokim === Index of lots of good 'How to program' stuff... Calls itself 'The PC Games Programmer's Encyclopaedia'... but useful to many programmers. Some is advanced. AND.. HURRAH!!! They aren't afraid to concentrate on CONTENT without wasting my time with fancy (bandwidth consuming!!) graphics, etc. http://www.qzx.com/pc-gpe/readme.txt === Delphi links.. look at the DELPHI-BOX of: Link lists, separated into topics like "FTP servers", "Borland patches", "Tips and Tricks", News, etc. You can also subscribe to the mailing lists about Delphi and to check out Borland's new Newsgroups! (for both see area "Delphi Information resources"). (Originates in Austria) http://www.user.xpoint.at/r.fellner/ === Icons (for Windows) which you can freely... For starters go to URL ftp://ftp.adam.anet.cz/pub/cdrom5/WIN3/ICONS ftp://ftp.adam.anet.cz/pub/cdrom5/WIN3/ICONS/ICONS ftp://ftp.adam.anet.cz/pub/cdrom5/ZIPPED/ICONS When you get tired of those, go to http://ftpsearch.ntnu.no/ftpsearch and do a search for ICONS - you'll get more subdirectories that you'll ever want. (The ftpsearch engine might be valuable for lots of things!!) === Someone looking for Turbo Pascal games was referred to the following: http://www.geocities.com/SiliconValley/Vista/1595 And, for games made with Pascal... following has material for those wanting to learn prgmming http://www.xs4all.nl/~remcodek/ and further -> all "pascal games". === http://swiss.net/group42 hacker info === Someone looking to buy a copy of Turbo Pascal 6 was referred to.. www.surplusdirect.com Which, he was told, seems to buy distressed inventory, and their prices often reflect that fact. === The source code for copying files is given and explained in... 113827 Feb 5 1997 ftp://garbo.uwasa.fi/pc/link/tsfaqp.zip tsfaqp.zip Common Turbo Pascal Questions and Timo's answers All the best, Timo .................................................................... Prof. Timo Salmi Co-moderator of news:comp.archives.msdos.announce Moderating at ftp:// & http://garbo.uwasa.fi archives 193.166.120.5 Department of Accounting and Business Finance ; University of Vaasa ts@uwasa.fi http://uwasa.fi/~ts ; FIN-65101, Finland
=== On Tue, 25 Mar 1997 03:25:36 GMT, yexin@worldnet.att.net (David Chen) wrote: >I desperately need a decent pascal graphic unit in 640x480 mode. >It seems that 320x200 units are all I can find. >Is it because 640x480 units are too slow? It's because 640x480x256 requires bank-switching which is somewhat more difficult to program. It's possible however in protected mode and with the VESA 2.0 video standard to address one 640x480x256 page, or bigger ones, without bank switching. I haven't tried that however. What I do have is a real-mode unit for VESA 1.2 or higher. It can do decent 640x480x256 graphics and it also supports a multicolored mouse pointer. Many routines are written in assembler (Borland Pascal 7.0 required!) so it should be resonable fast. You can find this unit at: http://home.worldonline.nl/~wpdejong/vesa.html You get the source code too, so you can play a bit with that... :-) Peter de Jong wpdejong@worldonline.nl === Graphics unit for Borland Pascal.For 320x200, 640x400 and 640x480 in 256 Colors and 320x200 and 640x480 in 65,536 Colours. at... tHE -=# vIRTUAL tECHNOLOGIES GbR #=- Homepage : Pascal, Asm, Games, Sources, Toolkits, Demos, Utilities, Java .. http://www.informatik.uni-oldenburg.de/~virtech/index_toolkits.html
=== Hi, I have made a site for developers. I have a download area and a register for developers all around the world. It's of course free!! The URL is: http://www.algonet.se/~sonic /Marcus (sonic@algonet.se) check it out today!
If you rewrote your routine as: PROCEDURE Tform1.Button1click; CONST c = 1; {type is implicitly integer} BEGIN c := c + 1; {this is now illegal} edit1.text := inttostr (c) END; You'd find that it wouldn't compile, because you had a normal constant instead of a typed one. Who was it said that thing about "variables that don't and constants that aren't"? ----------------------------------- Matt Francomb, Setanta Software Ltd http://www.demon.co.uk/setanta (no use to tkb website) -----------------------------------
=== DERIVED FROM POST BY.. m.a.vaughan@larc.nasa.gov (Mark Vaughan) Newsgroups: comp.lang.pascal.delphi.misc Date: 26 Mar 1997 12:39:48 GMT Organization: NASA Langley Research Center, Hampton, VA, USA Turning keyboard caps/ num lock leds on.... procedure TMyForm.Button1Click(Sender: TObject); Var KeyState : TKeyboardState; begin GetKeyboardState(KeyState); if (KeyState[VK_NUMLOCK] = 0) then KeyState[VK_NUMLOCK] := 1 else KeyState[VK_NUMLOCK] := 0; SetKeyboardState(KeyState); end; for caps lock substitute VK_CAPITAL for VK_NUMLOCK. Mark Vaughan
=== Try out Daniel's TPascal Page & Delphi 2.0 bits at http://www.farstar.demon.co.uk/Pascal/index.htm Mail me & give comments (I know it's sparse ;) mailto:WebMaster@farstar.demon.co.uk (includes ref to RS232 chat simulator)
[tkb: Lots of cookies, but will behave even if you reject them...] > >On some newsgroups there are arrogant comments that with new debugging > >tools it is kids play to find the critical "if then" clauses from > >the limiting part of any program code. Replace them with adequate > >NOP or JUMP commands, and have a good laugh. If this is true, it does > >not make me laugh. > > > >Markku Nevalainen > > Turbo Power software just released Ongaurd, a set of native VCL's for D1 and D2 for exactly this. Very powerfull and easy to use. You can limit users to days to run, serial number validation, number of users on network copy, etc. You can mix or match, or make up your own scheme. check it out at http://www.turbopower.com > >For D1 users there is a hacker protection component called Grudge > >on Super Page, registering cost only 1 USD. It claims being a very > >hard piece for crackers. I have only tested that it works, but I have