forum.clarionlife.net

С Новым годом!
Здоровья и удачи!!!

Добрый день!
У меня была давно ошибка в List по форматированию колонки.
Ничем не мог ее исправить. Помогло только создание аналогичного List в другом арр
с последующим импортом.

Алексей

Попробуй убить INI файл

Добрый день!
Всем спасибо за участие!
Нашел проблему, хорошо , что так относительно быстро. Мог бы искать значительно дольше...(((
Сразу напишу - мой косяк.
Оба варианта, с next и get работают одинаково!!! (в данном случае)
В чем была проблема:
Процедура "В", работающая с NEXT-ом файла В ...

Добрый день!

больше 2-х полей не set и get не работает, по крайней мере в С10, сам был недавно удивлен

по крайней мере get работает в моей задаче

Алексей

Добрый день!

SET(...), что в нем написано?

Так:
Ключ составной из четырех полей, поэтому:
clear(fil:record)
my.field1 = 1
my.field2 = 2
my.field3 = 3
Set(MyfielsKey,MyfielsKey)

Алексей

Добрый день!
Set - по индексу спозиционировал файл.
Next - прочитал запись в буфер из базы.
то же одно обращение к базе.
Почему он (Next) должен читать много записей?

Алексей

Добрый день!
Кларион 10. Windows 7. Файлы TPS.
(но, думаю не в этом суть)
Всю жизнь считал, что последовательное чтение файла/части файла, должно происходить быстрее, чем чтение тех же записей файла по ключу.
Элементарная программа:
В одном файле около 2 000 записей, читаю его последовательно ...

Добрый день!
Спасибо всем за отклик.
Заказчик обнародовал, что у него есть аппарат Эвотор.
связался с их службой поддержки, те сказали, что нет у них DLL для работы с аппаратом в windows
Интересно, Атол драйвер подцепит такой аппарат?

Алексей

Добрый день!
Знаю, что есть темы и "Взять кассу" и прочие.
Не хочу в них флудить, но есть вопрос:
Какой предложить кассовый аппарат заказчику для работы в режиме "онлайн кассы", для которого есть наработки на кларионе?
(чтобы самому потом меньше мучиться)
ПС. С кассами , в том числе и "онлайн ...

Добрый день!

kreator писал(а): 18 Июль 2019, 13:56 Где-то раньше на форуме обсуждали эти переменные. Можно ещё вот так:

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

LOC:Int64             group(INT64)
                      end

А совсем без like будет доступно, вероятно, после внедрения полноценной поддержки 64 бита.

Да, так тоже работает. Спасибо)

Алексей

Добрый день!
И снова, Дед Пахом, спасибо большое !
Про Like - и не думал в эту сторону()

Алексей

Добрый день!

Вопрос к стартеру - если не секрет, для чего нужна эта функция?
Работаю с файлами больших размеров, 500 Гб , например.
В equates.clw есть группа int64. Скорее всего, то, что надо.
Да, нашел i64.INC файл. Там "математика" с 64-битными целыми.,там же и описание:
! INT64 GROUP,TYPE ...

Спасибо, сейчас попробую!

Алексей

Добрый день!
Как описать api функцию:
BOOL SetFilePointerEx(
HANDLE hFile,
LARGE_INTEGER liDistanceToMove,
PLARGE_INTEGER lpNewFilePointer,
DWORD dwMoveMethod
);

SetFilePointerEx(UNSIGNED,?,?,ULONG),BOOL,PASCAL,RAW,NAME('SetFilePointerEx')

А вот как определить LARGE_INTEGER и PLARGE_INTEGER ...