CFC Library

[gromov]

Возникла необходимость отследить кол-ао символов, вводимых в текстовое поле. Решил поюзать CFC. Получилось, как это ни странно. Но это в отдельном EXE. При попытке внедрить в свой проект, а процедура, где все это должно работать лежит в DLL, получил по ж. - unresolved external. Что за фигня ?

[Алексей- Софт-Центр]

Добрый день!
Нормальная "фигня"

Вы библиотеку подцепили?

ЗЫ. В начале каждого сообщения на красном фоне - прочитайте Правила)

Алексей

[gromov]

Какую ? (Clarion 6.3)

[Алексей- Софт-Центр]

Добрый день.

, а процедура, где все это должно работать лежит в DLL

Алексей

[gromov]

1. Давай на "Ты".
2. Делаю DLL, а в нем эта процедура, а в ней, грубо говоря, обращение к CFC. Если верить разработчику CFC - все в исходном коде, т. е. без LIB-ов и т.д.

[StillZero]

Совсем не понятно...
А в DATA DLL CFC подключена?

[Игорь Столяров]

Возникла необходимость отследить кол-ао символов, вводимых в текстовое поле.

Я извиняюсь, что не в тему ...
Просто для решения этой задачи - включаю в опциях окна Timer и если текстовое поле является текущим - раз в секунду обновляю счетчик символов в нем.
Все. Работает еще CW1.5 ... и не надо усложнять простое. Код настолько элементарный, что стыдно даже писать. Или написать ?

[gromov]

Не стыдись

[gromov]

Совсем не понятно...
А в DATA DLL CFC подключена?

Не понял.

[Игорь Столяров]

Не стыдись

Если доеду завтра до офиса - напишу проверенный рабочий код из программы.
У нас в Ростове-на-Дону -17С и это катастрофа !

[gromov]

У нас в Анапе -6. Пока держимся

[StillZero]

Совсем не понятно...
А в DATA DLL CFC подключена?

Не понял.

В головной модуль... откуда все описания экспортятся в другие dll и exe

[gromov]

Да, притупил я. Спасибо, линковка проходит. И уже чуть было не отписался, что не работает (так оно и было), но внимательно посмотрел и как тот Зоркий Сокол увидел ! Короче приоритет в EMBED-ах штука оч. актуальная.

[Игорь Столяров]

Не стыдись

Итак мы останавились на том, что в опциях окна включаем событие таймер, предположим раз в секунду.
А на само событие в Embed вешаем например такой код (информация о заполнении отображается на закладке)

Update(?Loc:Text)
?Tab1{Prop:Text} = 'Заполнение поля: ' & Clip(Left(Format(Len(Clip(Loc:Text)),@n_8))) & ' из ' & Clip(Left(Format(Size(Text_),@n_8))) & ' символов'

Вот и все ...

[gromov]

Спасибо, Игорь. Все работает, CallBack для таких вещей действительно не нужен.