Clarion last version + Wine

[Andrew Listiev]

Привет всем комрады!

У кого-нибудь получилось запустить сабж после инсталляции ?
Ошибка по поводу шрифтов у меня...

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

Clarion Version : 11.1.0.13815
.NET Version         : 4.0.30319.1
OS Version           : Microsoft Windows NT 6.1.7601 Service Pack 1
Current culture      : English (United States) (en-US)
Working Set Memory   : 75320kb
GC Heap Memory       : 1283kb


Unhandled exception terminated Clarion

Exception Type: System.ArgumentException

Exception thrown: 
System.ArgumentException: Font '?' cannot be found.
   at System.Drawing.FontFamily.GetGdipGenericSansSerif()
   at System.Drawing.FontFamily.CreateFontFamily(String name, FontCollection fontCollection)
   at System.Drawing.FontFamily..ctor(String name, Boolean createDefaultOnFail)
   at System.Drawing.Font.Initialize(String familyName, Single emSize, FontStyle style, GraphicsUnit unit, Byte gdiCharSet, Boolean gdiVerticalFont)
   at System.Drawing.Font..ctor(String familyName, Single emSize)
   at ICSharpCode.SharpDevelop.SplashScreenForm..ctor()
   at ICSharpCode.SharpDevelop.SplashScreenForm.ShowSplashScreen()
   at ICSharpCode.SharpDevelop.SharpDevelopMain.Run(String[] args)
   at ICSharpCode.SharpDevelop.SharpDevelopMain.Main(String[] args)

[Дед Пахом]

Отталкиваясь от вот этого "at System.Drawing.FontFamily.GetGdipGenericSansSerif()" можно поискать "wine sans serif", например такое обсуждение: https://forum.winehq.org/viewtopic.php?t=27014

[Andrew Listiev]

Привет. Не помогло. В corefont'ах sans serif'a нет. Надо отдельно качать и положить его в ~/<WINEPREFIX>/drive_c/windows/Fonts/ где WINEPREFIX - ваш префикс. Тогда всё нормально

[Дед Пахом]

Так не помогло или всё нормально?

[Andrew Listiev]

Да, но с моим комментом. Сейчас бьюсь с регай

[gopstop2007]

Да, но с моим комментом. Сейчас бьюсь с регай

Напишите пожалуйста по подробнее, какой Clarion, какая сборка ввиде ехе, ехе+длл...
Недавно устанавливал на macbook am1, но для 'этого пришлось ставить windows 10 при помощи parallels destop, заработало, даже mysql-conector
ODBC работает. Интересно было бы на будущее получится ли, чтобы заработало в wine.

Clarion 10 ABC, ODBC, multi-dll

[Andrew Listiev]

Так не помогло или всё нормально?

Привет! Да, всё запустилось

[Andrew Listiev]

Напишите пожалуйста по подробнее, какой Clarion, какая сборка ввиде ехе, ехе+длл...
Недавно устанавливал на macbook am1, но для 'этого пришлось ставить windows 10 при помощи parallels destop, заработало, даже mysql-conector
ODBC работает. Интересно было бы на будущее получится ли, чтобы заработало в wine.
Clarion 10 ABC, ODBC, multi-dll

Я попробовал поставить 11ю версию. Запускается. Проблемы, которые были и как решил, написал выше. Как там со сборкой проекта и запуском приложений, сделанных на Clarion - ещё не тестировал. Никак не соберусь. Давно не трогал "Клару"

[Губин Игорь]

запуском приложений, сделанных на Clarion

С запуском чистых приложений никаких проблем. Тестировал и под чистым вайн и под ботлес, и под вайнетерсофт. Проблемы начинаются, когда используются всякие "навесы" (в моём случае защита ключами HASP). Но всё решилось на ура после использования вайнетерсофт, в который поддержка ключей уже интегрирована.

[George]

Привет всем!
Clarion10 ABC, программу запускаю в Astra Linux.
Формирую в программе файл EXCEL, пытаюсь его открыть LibreOffice при помощи ShellExecute и RUN.
Получаю ошибку (см. вложение).

изображение_2023-08-04_175956618.png (11.33 КБ) 853 просмотра

LibreOffice при этом установлен непосредственно в Astra Linux.

[Губин Игорь]

Clarion

ормирую в программе файл EXCEL, пытаюсь его открыть LibreOffice при помощи ShellExecute и RUN.
Получаю ошибку (см. вложение).

А имя файла можно?

[George]

Clarion

ормирую в программе файл EXCEL, пытаюсь его открыть LibreOffice при помощи ShellExecute и RUN.
Получаю ошибку (см. вложение).

А имя файла можно?

Имя файла типа C:\CATALOG\EXPORT\ot0403203.xlsx

[Губин Игорь]

Только что проверил
1. Если сохранить на рабочий стол, то никак не открывается. Т.е. никакой реакции.
2. Если сохранить в документах, то всё отрабатывает на ура.

AltLinux, LibreOffice

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

             GoURL(UNSIGNED,String,byte=1) ! 1 - open, 2 - edit

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

     GoURL(GetDesktopWindow(),Clip(ExportOpenFileName))

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

GoURL           PROCEDURE (wHandle, URL, ActionCode)
!wHandle  window{PROP:Handle}
URLBuffer            CSTRING(256)
EmptyString          CSTRING(254)
URLAction            CSTRING(254)
  CODE                                                          ! Begin processed code
 IF AnyScreen:Active()
  AnyScreen:OpenURL(Clip(URL))
 Else
   URLBuffer = CLIP(URL)
     Execute ActionCode
      URLAction = 'OPEN'
      URLAction = 'EDIT'
     End
     EmptyString=''
     x#=ShellExecute(wHandle, URLAction, URLBuffer, EmptyString, EmptyString, 1)
 End

[George]

Если сохранить в документах, то всё отрабатывает на ура.

Что имеется ввиду под документами, какой каталог - внутри Wine или непосредственно в Linux?

[George]

Для пояснения:
- у меня установлена Linux-версия LibreOffice;
- программа запускается из под WINE;
- LibreOffice запускается, после чего появляется ошибка.
У Вас прописаны какие-либо дополнительные параметры в реестре для запуска файлов EXCEL?
Код в программе:
Shex:FileName = CLIP(LocPathOtchet) & '\' & CLIP(LocFileOtchet) & '.xlsx'
Shex:Param = ''
IF ShellExecute(0,Shex:Type,Shex:FileName,Shex:Param,Shex:Directory,3).