VC32 folder is for 32 bit. use VC folder in D1 path.

--
[EMAIL PROTECTED]
The author of the freeware multi-tier middleware MidWare
The author of the freeware Internet Component Suite (ICS)
http://www.overbyte.be


----- Original Message ----- 
From: "Dave Baxter" <[EMAIL PROTECTED]>
To: "ICS support mailing" <twsocket@elists.org>
Sent: Thursday, November 29, 2007 6:31 PM
Subject: [twsocket] Trying to do some old stuff


> Hi All...
>
> This in regards to ICS V5. I think...
>
> I wish to do some legacy stuff, involving Delphi1 (!!)
>
> I'd like to implement a simple UDP conversation, to link an old Win16
> app, to a new Win32 only driver via the "LocalHost".  (I sort of
> understand this way of doing things, I most defiantely do not understand
> "Thunking", and my C is "worse than not good".)
>
> Oh yes, this is for my own personal use, an old Win3.11 program I made
> many years ago, that uses DLLs to interface to hardware.   Trouble is,
> WinNT (2000) does not allow that sort of thing, direct port access, and
> as it'd be good to have the app running on one machine, talking to ports
> etc on another one on my LAN, like I have later Win32 stuff, I thought
> of doing a UDP peer-2-peer thing.   I already have UDP stuff working
> that way between other app's and PC's in the Win32 world.  Trouble is, I
> no longer have readable sources, they are all on 5 1/4 360k floppies!
> And the only person I know who has old hardware like that, says that the
> disks are unreadable,  Otherwise I'd rework it in D7.
>
> However I seem to be having a little trouble getting ICS installed into
> the D1 IDE.
>
> I edited the IcsDel1.bat file in \ICS\Delphi1 to represent the actual
> paths used on this system.  But when I run it, it does this....
>
> C:\D_32\ICS\Delphi1>IcsDel1
> The device is not ready.    [ Huh ? ]
> Delphi Compiler  Version 8.0  Copyright (c) 1983,95 Borland
> International
> C:\D_32\ICS\DELPHI\VC32\ICSDEFS.INC(443)
> C:\D_32\ICS\DELPHI\VC32\ICSDEFS.INC(443)
> C:\D_32\ICS\DELPHI\VC32\WSOCKBUF.PAS(255)
> C:\D_32\ICS\DELPHI\VC\WINSOCK.PAS(640)
> C:\D_32\ICS\DELPHI\VC32\WSOCKET.PAS(7378)
> CliDemo1.pas(279)
> CLIDEMO.DPR(12)
> Error 164: Duplicate resource identifier (CLIDEMO.RES).
> Compile error
> C:\D_32\ICS\Delphi1>
>
> I also have D7 installed on this PC, is that conflicting?  Looking at
> the "Version 8.0" announcement...
>
> So what have I done wrong?   I did get it installed and working in D7
> with no problem.
>
> D1 is fully functional on here too, there don't seem to be any clashes
> that I know of.
>
> Oh yes, the PC, Win XP Pro, all updates etc...  The target machine run's
> Win2k.
>
>
> The IcsDel1.bat file is like this.......
>
> @echo off
> REM * * * * * * * * * * * * * * * * * * * * * * * * * * *
> REM *                                                   *
> REM * ICS - Internet Component Suite                    *
> REM *                                                   *
> REM * Delphi 1 automated construction V1.00             *
> REM * (c) 1997-2000 by Francois PIETTE                  *
> REM * http://www.rtfm.be/fpiette/indexuk.htm            *
> REM * [EMAIL PROTECTED]  [EMAIL PROTECTED] *
> REM *                                                   *
> REM * You must change PATH, DELPHI_PATH and ICS_PATH    *
> REM * below to fit your system.                         *
> REM *                                                   *
> REM * Remember to install all components in Delphi 1 !  *
> REM * Remember to use Delphi 1 to open all forms and    *
> REM * ignore Font.CharSet and OldCreateOrder properties *
> REM *                                                   *
> REM * * * * * * * * * * * * * * * * * * * * * * * * * * *
>
> SET DELPHI_PATH=C:\D1\DELPHI
> SET ICS_PATH=C:\D_32\ICS
>
> PATH=C:\WINDOWS;C:\WINDOWS\COMMAND;%DELPHI_PATH%\BIN
>
> echo /cw                            >dcc.cfg
> echo /m                            >>dcc.cfg
> echo /r%DELPHI_PATH%\LIB           >>dcc.cfg
> echo /u%DELPHI_PATH%\LIB           >>dcc.cfg
> echo /i%DELPHI_PATH%\LIB           >>dcc.cfg
> echo /E%ICS_PATH%\DELPHI1          >>dcc.cfg
> echo /O%ICS_PATH%\DELPHI1          >>dcc.cfg
> echo /I%ICS_PATH%\DELPHI\VC        >>dcc.cfg
> echo /I%ICS_PATH%\DELPHI\VC32      >>dcc.cfg
> echo /I%ICS_PATH%\DELPHI\INTERNET  >>dcc.cfg
> echo /R%ICS_PATH%\DELPHI\VC        >>dcc.cfg
> echo /R%ICS_PATH%\DELPHI\VC32      >>dcc.cfg
> echo /R%ICS_PATH%\DELPHI\INTERNET  >>dcc.cfg
> echo /U%ICS_PATH%\DELPHI\VC        >>dcc.cfg
> echo /U%ICS_PATH%\DELPHI\VC32      >>dcc.cfg
> echo /U%ICS_PATH%\DELPHI\INTERNET  >>dcc.cfg
>
> d:
> cd %ICS_PATH%\delphi\internet
> call ..\..\delphi1\dcc1 clidemo
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 client5
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 client7
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 dnslook
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 dynCli
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 finger
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 ftpserv
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 ftptst
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 httpasp
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 httpasy
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 httpchk
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 httpdmo
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 httpget
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 httppg
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 httptst
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 mailrcv
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 mailrob
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 mailsnd
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 md5test
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 mimedemo
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 mimetst
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 newsrdr
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 nslookup
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 pop3mime
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 recv
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 sender
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 server5
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 sockstst
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 srvdemo
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 srvtcp
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 tcpsrv
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 tnclient
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 tndemo
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 tnsrv
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 twschat
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 udplstn
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 udpsend
> if errorlevel 1 goto error
> call ..\..\delphi1\dcc1 webserv
> if errorlevel 1 goto error
> goto done
>
> :error
> @echo Compile error
> goto done
>
> :done
> @cd %ICS_PATH%\delphi1
>
> :end
>
>
> Any advice welcome.
>
> Cheers.
>
> Dave B.
> This mail has been scanned by Palmer Cook Computer Services Limited. 
> www.palmercook.co.uk
> -- 
> To unsubscribe or change your settings for TWSocket mailing list
> please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
> Visit our website at http://www.overbyte.be 

-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be

Reply via email to