Just curious as to why not eating the CPU is important in this case ? Unless DOSBOX is very primitive in this regard the CPU that is "eaten" will presumably be the virtual CPU of the VM, not the physical CPU of the host. I haven't tested it but I would have thought that modern CPU's are unlikely to break a sweat when virtualising even a 100% utilised 8086. :)
On 26 February 2016 at 10:32, John Bird <[email protected]> wrote: > Already investigated that – the DOSBOX emulator has no Timeout, or ping > command, no networking at all. If there is no sleep command that does not > eat the CPU then I don’t need to look further.... > > > > *From:* Jolyon Direnko-Smith <[email protected]> > *Sent:* Thursday, February 25, 2016 7:19 PM > *To:* NZ Borland Developers Group - Delphi List > <[email protected]> > *Subject:* Re: [DUG] [computing] 16 bit compiler and Ancient Mariners > > 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 <[email protected]> wrote: > >> Or "timeout 10" in a batch file... >> >> -----Original Message----- >> From: [email protected] [mailto: >> [email protected]] On Behalf Of Peter Ingham >> Sent: Thursday, 25 February 2016 5:45 pm >> To: NZ Borland Developers Group - Delphi List < >> [email protected]> >> 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: [email protected] >> > Admin: http://delphi.org.nz/mailman/listinfo/delphi >> > Unsubscribe: send an email to [email protected] >> > 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: [email protected] >> Admin: http://delphi.org.nz/mailman/listinfo/delphi >> Unsubscribe: send an email to [email protected] with >> Subject: unsubscribe >> >> _______________________________________________ >> NZ Borland Developers Group - Delphi mailing list >> Post: [email protected] >> Admin: http://delphi.org.nz/mailman/listinfo/delphi >> Unsubscribe: send an email to [email protected] with >> Subject: unsubscribe >> > > > ------------------------------ > _______________________________________________ > NZ Borland Developers Group - Delphi mailing list > Post: [email protected] > Admin: http://delphi.org.nz/mailman/listinfo/delphi > Unsubscribe: send an email to [email protected] with > Subject: unsubscribe > > > _______________________________________________ > NZ Borland Developers Group - Delphi mailing list > Post: [email protected] > Admin: http://delphi.org.nz/mailman/listinfo/delphi > Unsubscribe: send an email to [email protected] with > Subject: unsubscribe >
_______________________________________________ NZ Borland Developers Group - Delphi mailing list Post: [email protected] Admin: http://delphi.org.nz/mailman/listinfo/delphi Unsubscribe: send an email to [email protected] with Subject: unsubscribe
