Найдено 362 результата

vic7tar
06 Июль 2020, 12:34
Форум: CLARION for Windows
Тема: Clarion 11-12
Ответы: 2342
Просмотры: 315972

Clarion 11-12

finsoftrz писал(а): 06 Июль 2020, 12:26 Текст под картинкой?
По барабану.
finsoftrz писал(а): 06 Июль 2020, 12:26 А в чем смысл?
Да нет тут никакого смысла.
vic7tar
06 Июль 2020, 12:22
Форум: CLARION for Windows
Тема: Clarion 11-12
Ответы: 2342
Просмотры: 315972

Clarion 11-12

Для справки.
Вставил png, запускаю превьювер в форматере, получаю:
PNG_Prev.png
В том же превьювере жму печать (по умолчанию Adobe PDF), получаю:
PNG_PrevPrint.png
vic7tar
25 Июнь 2020, 13:49
Форум: CLARION for Windows
Тема: Сравнение содержимого CSTRING и STRING
Ответы: 18
Просмотры: 4165

Сравнение содержимого CSTRING и STRING

Что-то я недопонимаю.

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

myCSTR    CSTRING(81)
mySTR     STRING(80)
str       STRING('abcde       ')

   Code

    myCSTR = clip(str)
    mySTR = clip(str)
    IF myCSTR <> mySTR THEN 
       stop
    .
RaFael, На stop выйдем?
vic7tar
25 Июнь 2020, 10:37
Форум: CLARION for Windows
Тема: Сравнение содержимого CSTRING и STRING
Ответы: 18
Просмотры: 4165

Сравнение содержимого CSTRING и STRING

Yufil писал(а): 25 Июнь 2020, 9:45 ...
Тире – &ndash; = '<150>'
Длинное тире — &mdash = '<151>' почти не отличается от знака '-'.
Так и никакой clip() тут не поможет.
vic7tar
24 Июнь 2020, 19:58
Форум: CLARION for Windows
Тема: Сравнение содержимого CSTRING и STRING
Ответы: 18
Просмотры: 4165

Сравнение содержимого CSTRING и STRING

Я хочу сказать, что

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

myCSTR    CSTRING(81)
mySTR     STRING(80)

  IF myCSTR <> (=)  mySTR  THEN
  ...
будет обрабатываться правильно без всяких клипов.
vic7tar
23 Июнь 2020, 23:07
Форум: CLARION for Windows
Тема: Сравнение содержимого CSTRING и STRING
Ответы: 18
Просмотры: 4165

Сравнение содержимого CSTRING и STRING

ingasoftplus писал(а): 23 Июнь 2020, 20:18 нет не будет. STRING будет с пробелам в хвосте, а СSTRING - нет. Делайте clip(STRING)
Ответ неправильный.
vic7tar
28 Апрель 2020, 1:16
Форум: CLARION for Windows
Тема: Экспорт отчетов в doc/docx или аналоги. Какие есть варианты?
Ответы: 64
Просмотры: 16272

Экспорт отчетов в doc/docx или аналоги. Какие есть варианты?

это понятно, делать то что Я так и не понял до конца задачи. Если нужно подсчитать количество строк в контроле, то легче это сделать так: Map Module('winapi') SendMessage(long hWnd, ulong Msg, ulong wParam, long lParam), long, Pascal, name('SendMessageA'), Proc . . ... Code hRtf# = ?Rtf{PROP:Handle...
vic7tar
22 Апрель 2020, 14:29
Форум: CLARION for Windows
Тема: Юникод
Ответы: 37
Просмотры: 8432

Юникод

kreator писал(а): 22 Апрель 2020, 14:07 Но более вероятный случай - копирование строк с инвойсов, с других электронных документов, присланными иностранными партнёрами.
Замечательное решение.
vic7tar
22 Апрель 2020, 13:28
Форум: CLARION for Windows
Тема: Юникод
Ответы: 37
Просмотры: 8432

Юникод

Какое-то зацикливание на юникоде. Вышел Clarion 13, с юникодом всё хорошо, всё записывается, показывается, прыгает и ищется. А как работать с ним? Где-нибудь нужно ввести или świecie, или Helló világ, или lungă, или živa и т.п., и как? Создавать виртуальную клавиатуру для всех комбинированных символ...
vic7tar
21 Апрель 2020, 19:30
Форум: CLARION for Windows
Тема: Юникод
Ответы: 37
Просмотры: 8432

Юникод

Было ό -> NormalizeString() -> станет o
Было ё -> NormalizeString() -> станет е
Чтобы ё не стало е, ё нужно поместить в таблицу исключений, т.е. в цикле пропускать её обработку.
vic7tar
21 Апрель 2020, 19:02
Форум: CLARION for Windows
Тема: Юникод
Ответы: 37
Просмотры: 8432

Юникод

Может быть, использовать NormalizeString(long NormForm = NormalizationKD, ...) для удаления диакритических знаков? Придётся строку преобразовывать в UTF-16, в цикле пропускать каждый символ (2 байта) через NormalizeString(), исключать кирилсимволы с диакритикой (вот здесь нужна таблица исключений - ...
vic7tar
24 Март 2020, 15:24
Форум: Обо всем ...
Тема: Конец VB
Ответы: 14
Просмотры: 4707

Конец VB

Просто шутка. Ну всё правильно, всё в духе либерализма : Свободная точка осторожна и эксцентрична. Плоскость пафосно изменяет скрытое сновидение суфия. Насыщенный сон имманентен и амбивалентен. Верификация бережна. Часто бывает, что свободная квинтэссенция замысловата и продуманна. Киник скрыт. Нед...
vic7tar
24 Март 2020, 15:19
Форум: Обо всем ...
Тема: Конец VB
Ответы: 14
Просмотры: 4707

Конец VB

см. ниже
vic7tar
24 Март 2020, 14:51
Форум: Обо всем ...
Тема: Конец VB
Ответы: 14
Просмотры: 4707

Конец VB

kreator писал(а): 13 Март 2020, 15:51 Пустячок, а приятно .
Как-то не обратил ранее внимания, а почему приятно?
vic7tar
21 Март 2020, 13:59
Форум: Готовые программы, шаблоны, библиотеки...
Тема: libxlsxwriter for Clarion
Ответы: 904
Просмотры: 216289

libxlsxwriter for Clarion

Ну, примерно, что-то такое: Program Map inter_ranges(long first_row, short first_col, long last_row, short last_col), long . diap_range Queue, pre(dr) first_row long first_col short last_row long last_col short. Code err# = inter_ranges(2, 2, 2, 6) ; do err_mesage ! 1диап. err# = inter_ranges(3, 5, ...