<div dir="ltr">You said you would like to add some Delphi add-ons. Since you're still adding features to this application, may be it's time to compile it to 32bit.<div><br></div><div>Robo</div></div><div class="gmail_extra"><br><div class="gmail_quote">On Fri, Feb 26, 2016 at 12:33 AM, John Bird <span dir="ltr"><<a href="mailto:johnkbird@paradise.net.nz" target="_blank">johnkbird@paradise.net.nz</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr">
<div dir="ltr">
<div style="FONT-SIZE:12pt;FONT-FAMILY:'Calibri';COLOR:#000000">
<div>To get best performance out of DOSBOX, have to set its cpu utilisation to
either high or max, and it tends to put about 10-15% load on the CPU a lot of
the time. Less if set to a lower cpu usage, but also slower.</div>
<div> </div>
<div>When I say no networking, it can mount drives so all networked drives are
fine, but no NET USE and PING and related commands. No
Timeout, or the other commands mentioned either. Apart from that its
very stable, in fact more stable than the Windows 7 CMD processor running the
same software on a 32 bit Windows.</div>
<div> </div>
<div>Unrelated, but fun – I was swapping addresses with a german friend, and he
was entering my details on his phone into something looking very ancient so I
had to ask what it was – turns out was his legacy DOS address book app and he
has it running on Android via DOSBOX Turbo – the android version of the same
software.</div>
<div style="FONT-SIZE:small;TEXT-DECORATION:none;FONT-FAMILY:"Calibri";FONT-WEIGHT:normal;COLOR:#000000;FONT-STYLE:normal;DISPLAY:inline">
<div style="FONT:10pt tahoma">
<div> </div>
<div style="BACKGROUND:#f5f5f5">
<div><b>From:</b> <a title="jsmith@deltics.co.nz" href="mailto:jsmith@deltics.co.nz" target="_blank">Jolyon Direnko-Smith</a> </div>
<div><b>Sent:</b> Friday, February 26, 2016 11:31 AM</div><div><div class="h5">
<div><b>To:</b> <a title="delphi@listserver.123.net.nz" href="mailto:delphi@listserver.123.net.nz" target="_blank">NZ Borland Developers Group - Delphi
List</a> </div>
<div><b>Subject:</b> Re: [DUG] [computing] 16 bit compiler and Ancient
Mariners</div></div></div></div></div>
<div> </div></div><div><div class="h5">
<div style="FONT-SIZE:small;TEXT-DECORATION:none;FONT-FAMILY:"Calibri";FONT-WEIGHT:normal;COLOR:#000000;FONT-STYLE:normal;DISPLAY:inline">
<div dir="ltr">Just curious as to why not eating the CPU is important in this case
?<br><br>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.
:)</div>
<div class="gmail_extra">
<div> </div>
<div class="gmail_quote">On 26 February 2016 at 10:32, John Bird <span dir="ltr"><<a href="mailto:johnkbird@paradise.net.nz" target="_blank">johnkbird@paradise.net.nz</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="PADDING-LEFT:1ex;BORDER-LEFT:#ccc 1px solid;MARGIN:0px 0px 0px 0.8ex">
<div dir="ltr">
<div dir="ltr">
<div style="FONT-SIZE:12pt;FONT-FAMILY:'Calibri';COLOR:#000000">
<div>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....</div>
<div> </div>
<div> </div>
<div style="FONT-SIZE:small;TEXT-DECORATION:none;FONT-FAMILY:"Calibri";FONT-WEIGHT:normal;COLOR:#000000;FONT-STYLE:normal;DISPLAY:inline">
<div style="FONT:10pt tahoma">
<div> </div>
<div style="BACKGROUND:#f5f5f5">
<div><b>From:</b> <a title="jsmith@deltics.co.nz" href="mailto:jsmith@deltics.co.nz" target="_blank">Jolyon Direnko-Smith</a>
</div>
<div><b>Sent:</b> Thursday, February 25, 2016 7:19 PM</div><span>
<div><b>To:</b> <a title="delphi@listserver.123.net.nz" href="mailto:delphi@listserver.123.net.nz" target="_blank">NZ Borland Developers
Group - Delphi List</a> </div></span>
<div>
<div>
<div><b>Subject:</b> Re: [DUG] [computing] 16 bit compiler and Ancient
Mariners</div></div></div></div></div>
<div> </div></div>
<div style="FONT-SIZE:small;TEXT-DECORATION:none;FONT-FAMILY:"Calibri";FONT-WEIGHT:normal;COLOR:#000000;FONT-STYLE:normal;DISPLAY:inline">
<div>
<div>
<div dir="ltr">As a matter of historical curiosity, Delphi 1 was the first AND
last version to support 16-bit targets.<br><br>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.<br><br>
<div>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:<br><br><span style="FONT-SIZE:12px"> ping 127.0.0.1</span><span style="FONT-SIZE:12px"> -n 2 -w 10000 > NUL<br></span><br>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).<br><br>Redirecting to NUL
also ensures that the PING output doesn't clutter up your screen (if that's
important).<br><br><br><br>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. :)</div></div>
<div class="gmail_extra">
<div> </div>
<div class="gmail_quote">On 25 February 2016 at 17:51, David O'Brien <span dir="ltr"><<a href="mailto:Dave@iccs.co.nz" target="_blank">Dave@iccs.co.nz</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="PADDING-LEFT:1ex;BORDER-LEFT:#ccc 1px solid;MARGIN:0px 0px 0px 0.8ex">Or
"timeout 10" in a batch file...<br>
<div>
<div><br>-----Original Message-----<br>From: <a href="mailto:delphi-bounces@listserver.123.net.nz" target="_blank">delphi-bounces@listserver.123.net.nz</a> [mailto:<a href="mailto:delphi-bounces@listserver.123.net.nz" target="_blank">delphi-bounces@listserver.123.net.nz</a>] On Behalf Of Peter
Ingham<br>Sent: Thursday, 25 February 2016 5:45 pm<br>To: NZ Borland
Developers Group - Delphi List <<a href="mailto:delphi@listserver.123.net.nz" target="_blank">delphi@listserver.123.net.nz</a>><br>Subject: Re: [DUG]
[computing] 16 bit compiler and Ancient Mariners<br><br>On 25/02/2016 4:47
p.m., John Bird wrote:<br>> I have some legacy software that requires
DOSBOX (DOS emulator to run<br>> 16 bit<br>> software) when running on
64 bit Windows.<br>><br>> I would like to add some Delphi addons
already written, mainly<br>> console/command line apps, but all the
versions of these I currently<br>> have, (built with Delphi 5/6/2007) say
simply This program requires<br>> Win32 to run, ie they are 32 bit
compiled even as console apps.<br>><br>> Is there any option in Delphi
to compile for 16 bit OS or do I have to<br>> find Delphi 1 or 2 or
whichever was the last 16 bit version? (have<br>> D2007 and
versions up to Seattle)<br>><br>> One of the main things I want is to
have a command to sleep for 10<br>> seconds without Clobbering the CPU -
exactly what sleep(10000) would do - on Win32<br>> it uses a WIn32
API. If there is no 16 bit equivalent, ie no<br>>
implementation of sleep() in 16 bit Delphi, then I would like to
know.<br>><br>> This question is mainly for other ancient mariners out
there who like<br>> me lived through a lot more of IT history than they
like to admit.<br>><br>>
_______________________________________________<br>> NZ Borland
Developers Group - Delphi mailing list<br>> Post: <a href="mailto:delphi@listserver.123.net.nz" target="_blank">delphi@listserver.123.net.nz</a><br>> Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" rel="noreferrer" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>>
Unsubscribe: send an email to <a href="mailto:delphi-request@listserver.123.net.nz" target="_blank">delphi-request@listserver.123.net.nz</a><br>> with Subject:
unsubscribe<br>><br>I'm presuming you want a command-line command you can
call from a batch script.<br><br>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).<br><br>e.g: "ping 192.168.253 -n 1 -w 2000" for a
2 second delay or "ping<br>192.168.253 -n 1 -w 10000" for 10
seconds.<br><br><br>Regards<br>_______________________________________________<br>NZ
Borland Developers Group - Delphi mailing list<br>Post: <a href="mailto:delphi@listserver.123.net.nz" target="_blank">delphi@listserver.123.net.nz</a><br>Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" rel="noreferrer" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>Unsubscribe:
send an email to <a href="mailto:delphi-request@listserver.123.net.nz" target="_blank">delphi-request@listserver.123.net.nz</a> with Subject:
unsubscribe<br><br>_______________________________________________<br>NZ
Borland Developers Group - Delphi mailing list<br>Post: <a href="mailto:delphi@listserver.123.net.nz" target="_blank">delphi@listserver.123.net.nz</a><br>Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" rel="noreferrer" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>Unsubscribe:
send an email to <a href="mailto:delphi-request@listserver.123.net.nz" target="_blank">delphi-request@listserver.123.net.nz</a> with Subject:
unsubscribe<br></div></div></blockquote></div>
<div> </div></div></div></div>
<hr>
<span>_______________________________________________<br>NZ Borland Developers
Group - Delphi mailing list<br>Post: <a href="mailto:delphi@listserver.123.net.nz" target="_blank">delphi@listserver.123.net.nz</a><br>Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>Unsubscribe:
send an email to <a href="mailto:delphi-request@listserver.123.net.nz" target="_blank">delphi-request@listserver.123.net.nz</a> with Subject:
unsubscribe</span>
</div></div></div></div><br>_______________________________________________<br>NZ
Borland Developers Group - Delphi mailing list<br>Post: <a href="mailto:delphi@listserver.123.net.nz" target="_blank">delphi@listserver.123.net.nz</a><br>Admin:
<a href="http://delphi.org.nz/mailman/listinfo/delphi" rel="noreferrer" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>Unsubscribe:
send an email to <a href="mailto:delphi-request@listserver.123.net.nz" target="_blank">delphi-request@listserver.123.net.nz</a>
with Subject: unsubscribe<br></blockquote></div>
<div> </div></div>
<p>
</p><hr>
_______________________________________________<br>NZ Borland Developers Group -
Delphi mailing list<br>Post: <a href="mailto:delphi@listserver.123.net.nz" target="_blank">delphi@listserver.123.net.nz</a><br>Admin:
<a href="http://delphi.org.nz/mailman/listinfo/delphi" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>Unsubscribe: send an email to
<a href="mailto:delphi-request@listserver.123.net.nz" target="_blank">delphi-request@listserver.123.net.nz</a> with Subject:
unsubscribe<p></p></div></div></div></div></div></div>
<br>_______________________________________________<br>
NZ Borland Developers Group - Delphi mailing list<br>
Post: <a href="mailto:delphi@listserver.123.net.nz">delphi@listserver.123.net.nz</a><br>
Admin: <a href="http://delphi.org.nz/mailman/listinfo/delphi" rel="noreferrer" target="_blank">http://delphi.org.nz/mailman/listinfo/delphi</a><br>
Unsubscribe: send an email to <a href="mailto:delphi-request@listserver.123.net.nz">delphi-request@listserver.123.net.nz</a> with Subject: unsubscribe<br></blockquote></div><br></div>