привет всем, как сделать реверс строк в файлах? есть вообще компонент str reverse в hiasm? если нету буду благодарен за код

еще нужно перебрать все файлы в папке и зареверсить первые 12 строк в них

Редактировалось 1 раз(а), последний 2021-09-15 10:39:56

StrReverse

Netspirit, о, спасибо, не видел компонент, а со строками в файлах поможете?

Предполагается что файл - текстовый.
1) Перебор файлов папке - с помощью компонента FileSearch
2) Берешь один StrList, загружаешь в него файл методом doLoad
3) Перебираешь строки первого StrList с помощью компонента ArrayEnum, обрабатываешь их и добавляешь во второй StrList
4) По окончанию второй StrList сохраняешь в файл методом doSave.

Редактировалось 3 раз(а), последний 2021-09-15 14:32:28

Netspirit, а варианта побыстрее нету? каждый файл обрабатывать такими манипуляциями очень долго мне кажется

Не думаю что долго. Весь файл загружается в память, в памяти обрабатывается, и потом целиком сохраняется. На фоне быстродействия HDD - незаметно.

Например, быстродействие алгоритма Base64 на старом ПК достигало выше 200 Мб/сек, компоненты шифрования - 40-80 Мб/сек.

Редактировалось 2 раз(а), последний 2021-09-15 14:37:11

Netspirit, имеется в виду, что мне надо это автоматизировать

это надо еще учитывать, что strlist надо будет очищать от предыдущего содержимого файла.. мне кажется фигня какая-то

набросок сие чуда можно посмотреть?

--- Добавлено в 2021-09-15 14:38:05

Netspirit, и применять str reverse надо только на 12 строк, а не на весь файл

Редактировалось 1 раз(а), последний 2021-09-15 14:38:05

Второго - да. Для этого там есть метод doClear.
Ну, так это надо просто по пунктам выполнить то, что я написал.

Netspirit, то есть 1. я компонентом filesearch ищу файлы в папке, 2. после нахождения открываю его для чтения\записи компонентом filestream и вывожу содержимое в strlist? мм, а как второй strlist узнает какое содержимое в каком файле сохранять?

Редактировалось 1 раз(а), последний 2021-09-15 14:47:10

Нет. Просто загружаешь его методом StrList.doLoad.
На выходе из FileSearch ты получаешь полный путь к файлу - сохраняешь его в Memory, а с него подаешь на точку StrList.Filename обеих StrList.
Перед обработкой каждой строки поставить CounterEx и проверять его значение с помощью If_Else. Точка ArrayEnum.Index содержит номер обрабатываемой строки (начиная с 0) - проверять её значение с помощью If_Else. Если меньше 12 - обрабатывать текущую строку, иначе - пропускать без обработки.

Редактировалось 6 раз(а), последний 2021-09-15 15:07:21

Netspirit, мда, если б я еще умел строить схему по тексту, вроде ни че сложного, но я запутался

--- Добавлено в 2021-09-15 15:16:08

Netspirit, у меня от моих манипуляций программа наверно думает ну его нах*р и тупо вылетает при нажатии на кнопку..

Редактировалось 2 раз(а), последний 2021-09-15 15:17:04

Попробуй выполнять пошагово. На каждом шаге проверяй результат на соответствие ожидаемому. Спроси что не понятно.

Редактировалось 1 раз(а), последний 2021-09-15 15:36:47

Netspirit, во второй strlist через doadd добавлять обработанные строки или как?

И обработанные и необработанные. Для этого перед ставится If_else, который проверяет значение точки ArrayEnum.Index с условием Op1 < 12. По событию onTrue строка обрабатывается и добавляется в список, по onFalse - не обрабатывается и добавляется как есть.

Netspirit, хз короче, не понимаю, рано или поздно я конечно дойду до правильного варианта, но не знаю когда это будет