forum.clarionlife.net

Всем привет, уважаемые форумчане!
CLARION использую очень давно, но редко, в практических целях на работе. В 2018 году написал программу где использовал ряд внешних библиотек. zint, freeimage и т.д. Потом немного дорабатывал изредка а последние 2 года в силу ряда причин вообще не касался. И сейчас с ужасом обнаружил что винт с Кларионом умер, а из разрозненных архивов кое как удалось восстановить среду и проект. И сразу при компиляции получил ряд ошибок. Одну из них не могу никак побороть. Нет найден файл winapi.lib
Сразу оговорюсь - я как то не силен в использовании библиотек. Максимум знаю как сделать lib файл из dll при пjмощи LibMaker.
В проекте что то похожее объявляется в точке "В глобальной MAP структуре"

Код: Выделить всё

 Module('Win API')
!        GetLastError(),Long,Pascal
        CreateProcess(ULong  lpApplicationName,   |
                     *CString  lpCommandLine,       |
                     ULONG  lpProcessAttributes, |
                     ULONG  lpThreadAttributes,  |
                     BOOL   bInheritHandles,     |
                     Long  dwCreationFlags,     |
                     ULong lpEnvironment,       |
                     ULONG  lpCurrentDirectory,  |
                     ULONG  lpStartupInfo,       |
                     ULONG  lpProcessInformation |
                    ),BOOL,RAW,PASCAL,NAME('CreateProcessA')
        GetSystemMetrics(SIGNED),SIGNED,PASCAL,NAME('GetSystemMetrics')
 End
  Module('Windows API Functions')
     CloseHandle(HANDLE),BOOL,PASCAL,PROC
     CreateFile(*CSTRING,DWORD,DWORD,<*?>,DWORD,DWORD,HANDLE),HANDLE,PASCAL,RAW,NAME('CreateFileA')
     InternetAttemptConnect(DWORD),DWORD,PASCAL
     InternetCloseHandle(HINTERNET), BOOL, PASCAL, PROC
     InternetOpen(*CSTRING,DWORD,<*CSTRING>,<*CSTRING>,DWORD),HINTERNET, RAW, PASCAL, NAME('InternetOpenA')
     InternetOpenURL(HINTERNET, *CSTRING Url, <*CSTRING Headers>, DWORD, DWORD, DWORD), HINTERNET, RAW, PASCAL, PROC, NAME('InternetOpenUrlA')
     InternetReadFile(HINTERNET, *?, DWORD, *DWORD),BOOL, RAW, PASCAL, PROC
     WriteFile(HANDLE,<*?>,DWORD,*DWORD,<*?>),BOOL,PASCAL,RAW,PROC
   END

А также присутствует в модуле WinApi.clw:

Код: Выделить всё

  OMIT('***', _C100_)
  !- GetWindowSubclass, SetWindowSubclass, RemoveWindowSubclass, DefSubclassProc, InitCommonControlsEx 
  !- in Win32.lib since C10
  PRAGMA('link(winapi.lib)')
!***
  INCLUDE('winapi.inc'), ONCE

В-общем, подскажите, пожалуйста, как мне все таки скомпилировать проект??
Clarion 6.3 ШВС

Походу вам сюда, в папку lib.

Дед Пахом писал(а): 19 Ноябрь 2024, 13:19 Походу вам сюда, в папку lib.

Огромное Вам спасибо, Уважаемый!

forum.clarionlife.net

File not found or cannot be open: winapi.lib

File not found or cannot be open: winapi.lib

File not found or cannot be open: winapi.lib

File not found or cannot be open: winapi.lib