|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
10.02.2024, 01:48 | #1 |
Форумчанин
Регистрация: 10.02.2021
Сообщений: 653
|
Строка из подстроки (тест BASM-функции)
После кучи доработок, функция прошла тесты, но может я что-то не заметил, потому просьба помочь с тестами. Да и просто, может я не совсем верно что-то написал и что-то можно было сделать проще
Итак, что за функция. К примеру у меня есть строка '000.111.222.333.444' Функция из нее должна извлечь определенный фрагмент между точками и вернуть во вторую строку Третий параметр. чтобы при вызове функции не дёргать стек, сразу три параметра были склеены в один LongWord 4 байт - номер необходимой подстроки начиная с 0 3 байт - код чара-разделителя 1-2 байты - это если эта функция используется в цикле, чтобы каждый раз не дёргать функцию Length, длину можно один раз найти и передавать в 1-2 байтах Результат функции должен давать false если пустая входящая строка, или если запрашивается подстрока которой нет (запросили подстроку номер 5, а их всего 3) Код:
|
10.02.2024, 04:44 | #2 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,341
|
Ассемблер не проверял - лень думать. А в чем все-таки смысл опускаться до ассемблера, если небрежно написанная на дельфи функция (PartString2) работает соизмеримое время? А если предварительно "нарезать" строку, а потом только доставать подстроки, то и быстрее (PartString4).
Код:
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
Последний раз редактировалось BDA; 10.02.2024 в 04:47. |
10.02.2024, 12:33 | #3 |
Старожил
Регистрация: 04.02.2011
Сообщений: 4,619
|
Важен сам процесс... "Цель - ничто, движение к цели - всё"
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Обратиться к регистру через методы delphi? Или вызов функции из basm | Kronos913 | Общие вопросы Delphi | 2 | 22.04.2022 21:44 |
PHPunit тест для функции | APlayer | PHP | 0 | 19.09.2017 11:58 |
Задана строка A(N). Вычислить для каждой подстроки функцию A(i), равную палиндрому максимальной длины | forged | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 24.12.2013 12:56 |
Строка из цифр и её подстроки(Pascal) | MuruMec | Помощь студентам | 8 | 04.12.2013 19:06 |
PCHAR строка с разделителями #13#10. Как вычленить отдельные "подстроки" | EdNovice | Общие вопросы Delphi | 1 | 17.04.2007 11:42 |