Just as I expected, "Herr der Fliegen" <lordoftheflies666@gmx.net>
came up with this:
>but it won't work in turbo pascal 7.0
>function GetWindowsDirectory(lpBuffer : String; nSize : LongInt) : LongInt;
>far; external 'KERNEL32.DLL' name 'GetWindowsDirectoryA';
As far as I can see, this is the problem. TP7 is a 16 bit dos/win
compiler, but you are trying to call a function in a 32 bit dll, that
will never work. Try changing 'KERNEL32.DLL' to 'KERNEL.DLL', or maybe
'KERNEL386.EXE'. That _might_ work.
Niels (aka. niLLer)
--
e-mail: nmartin at iname dot com ICQ UIN: 50187323
http://xoasis.com/~niller/ - niLLer's pages (My programs, in English)
http://whitehat.dk/g4s/ - The G4S Page (Personlig side, på dansk)
-- I've been Windozed!