[DUG] [computing] 16 bit compiler and Ancient Mariners

[Jolyon Direnko-Smith]

As a matter of historical curiosity, Delphi 1 was the first AND last
version to support 16-bit targets.

Delphi 2 included Delphi 1 in the box for people that still needed 16-bit
support but otherwise it was 32-bit all the way from Delphi 2 onward.

There is no direct Sleep() equivalent in 16-bit and some of the other
techniques may help in the absence of that.  NB. If you have a TCP/IP stack
and can use PING then you can use that trick and when considering an IP
address to [ab]use, there is (as they say) no place like home:

    ping 127.0.0.1 -n 2 -w 10000 > NUL

Also note that the -w delay is BETWEEN pings.  The first ping is instant,
so to wait for that specified delay you need to ping TWICE (-n 2).

Redirecting to NUL also ensures that the PING output doesn't clutter up
your screen (if that's important).



Incidentally, I still have an XP VM hosting my "Delphi Museum".  That is,
functional installations of Delphi 1 thru 6 so if you ever reach a point
where you simply need to compile some Delphi 1 code feel free to get in
touch.  I may be able to act as a compiler proxy for you.   :)

On 25 February 2016 at 17:51, David O'Brien <Dave at iccs.co.nz> wrote:

> Or "timeout 10" in a batch file...
>
> -----Original Message-----
> From: delphi-bounces at listserver.123.net.nz [mailto:
> delphi-bounces at listserver.123.net.nz] On Behalf Of Peter Ingham
> Sent: Thursday, 25 February 2016 5:45 pm
> To: NZ Borland Developers Group - Delphi List <
> delphi at listserver.123.net.nz>
> Subject: Re: [DUG] [computing] 16 bit compiler and Ancient Mariners
>
> On 25/02/2016 4:47 p.m., John Bird wrote:
> > I have some legacy software that requires DOSBOX (DOS emulator to run
> > 16 bit
> > software) when running on 64 bit Windows.
> >
> > I would like to add some Delphi addons already written, mainly
> > console/command line apps, but all the versions of these I currently
> > have, (built with Delphi 5/6/2007) say simply This program requires
> > Win32 to run, ie they are 32 bit compiled even as console apps.
> >
> > Is there any option in Delphi to compile for 16 bit OS or do I have to
> > find Delphi 1 or 2 or whichever was the last 16 bit version?  (have
> > D2007 and versions up to Seattle)
> >
> > One of the main things I want is to have a command to sleep for 10
> > seconds without Clobbering the CPU - exactly what sleep(10000) would do
> - on Win32
> > it uses a WIn32 API.   If there is no 16 bit equivalent, ie no
> > implementation of sleep() in 16 bit Delphi, then I would like to know.
> >
> > This question is mainly for other ancient mariners out there who like
> > me lived through a lot more of IT history than they like to admit.
> >
> > _______________________________________________
> > NZ Borland Developers Group - Delphi mailing list
> > Post: delphi at listserver.123.net.nz
> > Admin: http://delphi.org.nz/mailman/listinfo/delphi
> > Unsubscribe: send an email to delphi-request at listserver.123.net.nz
> > with Subject: unsubscribe
> >
> I'm presuming you want a command-line command you can call from a batch
> script.
>
> On systems with TCP/IP networking, you can use a ping to an address you
> know does not exist to simulate a Sleep (the subnet must exist).
>
> e.g: "ping 192.168.253 -n 1 -w 2000"  for a 2 second delay or "ping
> 192.168.253 -n 1 -w 10000" for 10 seconds.
>
>
> Regards
> _______________________________________________
> NZ Borland Developers Group - Delphi mailing list
> Post: delphi at listserver.123.net.nz
> Admin: http://delphi.org.nz/mailman/listinfo/delphi
> Unsubscribe: send an email to delphi-request at listserver.123.net.nz with
> Subject: unsubscribe
>
> _______________________________________________
> NZ Borland Developers Group - Delphi mailing list
> Post: delphi at listserver.123.net.nz
> Admin: http://delphi.org.nz/mailman/listinfo/delphi
> Unsubscribe: send an email to delphi-request at listserver.123.net.nz with
> Subject: unsubscribe
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://listserver.123.net.nz/pipermail/delphi/attachments/20160225/b6158d31/attachment-0001.html