forum.clarionlife.net

Дед Пахом писал(а): locCOMIniter CCOMIniter
это автоматом вызывает CoInitialize() в конструкторе.

автоматом вызвало только "Illegal data type CCOMINITER"
где он описан ?

ЗЫ: C55ee - проект Legacy

пользуйтесь, кому понравится... (100% рабочий код) WSADESCRIPTION_LEN Equate(256) WSASYS_STATUS_LEN Equate(128) TWSAData Group, Type !ТИП СТРУКТУРЫ ДЛЯ ОРГАНИЗАЦИИ РАБОТЫ С ФУНКЦИЯМИ NET API wVersion Short wHighVersion Short szDescription CString(WSADESCRIPTION_LEN + 1) szSystemStatus CString(WSASYS...

Заголовок кларион=dat-файла анализируется с ограничениями, связанными с оставшимися открытыми вопросами:
1. BINARY для MEMO - где в файле ?
2. алгоритм расшифровки для ENCRYPT ?

то, что выше - не проблема, сделал заменялку имени в DLL-ке. Дальше - всё гораздо хужеватее: / DLL с комом регистрируется в системе, из Excel объект создаётся, методы вызываются. / В реализацию интерфейса COM включена переменная, ну скажем, XVar, инициализацию провожу в CONSTRUCT. После создания объ...

Так, что правке под твои нужды подлежит функция LDAP_User (которая в предложенном виде ищет инфу о заданном пользователе в заданном домене). нужно строчку Execute изменить как-то так: 'Execute("SELECT samAccountName FROM ''LDAP://' & DomainNameWithPoints &''' WHERE objectCategory=''user...

MAP MODULE('WINDOWS') GetUserName(*CString, *ULong),BOOL,RAW,PASCAL,DLL(TRUE),NAME('GetUserNameA') END GetLoginName Function(),String END GetLoginName Function() !,String Buff CString(256) LenB ULong(255) Code If ~GetUserName(Buff, LenB) Then Buff = ''. Return (Buff) Это узнаёт Login пользователя, ...

Почти (зы: самому не нравится словцо) сделал функцию чтения и анализа заголовка DAT-файла клары.
Не достаёт информации, где спрятано:
1. флаг, что MEMO BINARY
2. флаг OEM
3. алгоритм расшифровки

Подскажите, добры люди...

подмена на 6-кину либу не прокатила
в смысле - итог тот же самый

Это был дан не пример, а работоспособная функция ! - это комментарии с примером работы упомянутая в комментариях DLL - та, в которой реализована у меня эта функция упомянутый в комментариях INC - соответственно, тот файл, где содержится описание (заголовок) этой функции вставлены комментарии прямо и...

1) а может тупо - нет такой папки или нет разрешений на запись, ReadOnly или NTFS-ных
2) а может ещё тупее - маршрут словарный в атрибуте файла NAME не полный, а к примеру '.\Mefile.tps' или вообще не указан
- попробуй до открытия файла оператор:
MeFile{PROP:Name} = 'полный маршрут'

Дед Пахом писал(а):Можно ещё из win32.lib выкинуть.

способ ?

ды конечно, катит.
так я и танцую с бин.редактором, чтоб функциональность не потерять.

Спасибо, Михаил! EasyCOMCreator - это сила, респект! Тестовый Math под C55 заработал после недолгих танцев с бубном. А именно: 1) исключение строки INCLUDE('cwutil.inc'),ONCE 2) собственное определение процедур LONGTOHEX (? N), String -И- PathSplit (String FileName, <*CString FileDrive>, <*CString F...

Задача: создать COM-объект на клаше (в DLL) для оперирования через него с DAT-файлами клариона из MSSQL-сервера. ---среда C55ee --- Прочёл статью Михаила (спасибо, ДП). Пример Math вызвал некоторые сложности. А именно, на экспортируемую DllCanUnloadNow() компоновщик ругается, будто она дважды объявл...

Вам написали: тип REAL имеет точность только 15 значащих цифр. Шестнадцатую цифру округляет по определению типа.
Вывод:
А) использовать не более 15 знаков
либо
Б) использовать другой тип