Article View: comp.lang.pascal.borland
Article #135Re: TP for DOS-program not running on XP
From: Peter
Date: Thu, 11 Apr 2002 20:16
Date: Thu, 11 Apr 2002 20:16
36 lines
2160 bytes
2160 bytes
jims@vcn.bc.ca wrote in message news:<a7942f$5uf$1@luna.vcn.bc.ca>...
> In <539bd0de.0203190041.693c09bb@posting.google.com>, peterhva@hotmail.com (Peter) writes:
> >Hi,
> >A turbopascal7 for dos-program on a
> >Windows XP-home-edition machine.
> >The screen freezes, but the taskmanager says the program is active.
> >This happens now and then.
>
> Is the TP7 in full-screen or a window?
It runs in full-screen mode.
Is it better to run it in a window?
I also use a routine to get input from the keyboard:
FUNCTION RDENKEFN : word;
{From ts@uwasa.fi}
VAR regs : registers;
keyboard : byte absolute $40:$96;
BEGIN
rdenkefn := 0;
IF ((keyboard SHR 4) AND 1) = 0 THEN exit;
FillChar (regs, SizeOf(regs), 0);
regs.ah := $10;
Intr ($16, regs);
rdenkefn := regs.ax;
END; (* rdenkefn *)
And I use the {$I-} en {$I+} (the include file directive)
Could one of these two be a problem?
I also tried to run the program from a Windows 3.11-machine in a
little TCP/IP-network. On the 3.11-machine it works fine, but when I
start it from the XP-machine (shared drive) on the 3.11-machine the
program freezes again.
Peter
Technical Details
Message-ID:
<23f3bcde.0204111216.1106d8d9@posting.google.com>Path:
arc1-ca.pugleaf.net!archiver1.google.com!postnews1.google.com!not-for-mailReferences:
<539bd0de.0203190041.693c09bb@posting.google.com> <a7942f$5uf$1@luna.vcn.bc.ca>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 108ebd,60e57e2109685b21 X-Google-Attributes: gid108ebd,public X-Google-Thread: 111659,60e57e2109685b21 X-Google-Attributes: gid111659,public X-Google-ArrivalTime: 2002-04-11 13:16:48 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!postnews1.google.com!not-for-mail From: PeterHva@hotmail.com (Peter) Newsgroups: comp.lang.pascal.borland,borland.public.turbopascal Subject: Re: TP for DOS-program not running on XP Date: 11 Apr 2002 13:16:47 -0700 Organization: http://groups.google.com/ Lines: 36 Message-ID: <23f3bcde.0204111216.1106d8d9@posting.google.com> References: <539bd0de.0203190041.693c09bb@posting.google.com> <a7942f$5uf$1@luna.vcn.bc.ca> NNTP-Posting-Host: 145.92.18.5 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 8bit X-Trace: posting.google.com 1018556208 21103 127.0.0.1 (11 Apr 2002 20:16:48 GMT) X-Complaints-To: groups-abuse@google.com NNTP-Posting-Date: 11 Apr 2002 20:16:48 GMT