Вверх ↑
Этот топик читают: Гость
Ответов: 2059
Рейтинг: 132
#16: 2015-05-29 14:12:05 ЛС | профиль | цитата
Erik,
но заменяла +10 или -10 на один пробел,

Виноват, исправлюсь! Было не очевидно на сколько менять.
А почему на два пробела?
+10 - три знака.
А, в смысле добавил ещё.
карма: 6

0
Ответов: 24
Рейтинг: 0
#17: 2015-05-29 14:20:09 ЛС | профиль | цитата
flint2

"+10 и -10 нужно заменить, каждое на три пробела"

Ну я не знаю как ещё написать, извиняйте милостиво!
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#18: 2015-05-29 14:30:33 ЛС | профиль | цитата
Erik писал(а):
flint2
Ваша схема работает
Не догнал какая. (Между прочим, у каждой выложенной схемы есть номер.)
Erik, а так ?
code_35757.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_35757.txt [715B] [294]
Ответов: 2059
Рейтинг: 132
#19: 2015-05-29 14:34:38 ЛС | профиль | цитата
Tad, Нет.
hhSFkh +10 ouhhjk -10 jvuj
yuuuu +10 iyg-bhjj-10-10jooj
546556 GFgg shdr

- пишем, остальное на ум пошло.
-10ou+10
uuuyyy+10uby
-10buvu i9io12+10

здесь меняем +10 и -10 на три пробела =
hhSFkh +10 ouhhjk -10 jvuj
yuuuu +10 iyg-bhjj-10-10jooj
546556 GFgg shdr___ou___
uuuyyy___uby
___buvu i9io12___

карма: 6

0
Ответов: 16884
Рейтинг: 1239
#20: 2015-05-29 15:08:36 ЛС | профиль | цитата
А у меня как ? Тебе не кажется, что ты, кроме TabControl-а, ещё в каком-то элементе пошалил ?
Вот результат работы моей схемы у меня. (Copy-Paste 1:1)

hhSFkh +10 ouhhjk -10 jvuj
yuuuu +10 iyg-bhjj-10-10jooj
546556 GFgg shdr ou+10
uuuyyy+10uby
-10buvu i9io12+10
Между shdr и ou+10 ровно три пробела.
Что не так ?
------------ Дoбавленo в 15.08:
Кажется понял - после shdr все +10 и - 10 меняем до конца.
Блин, ну и постановка ТЗ.
Запросто. Минутку.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 2059
Рейтинг: 132
#21: 2015-05-29 15:11:14 ЛС | профиль | цитата
Tad,
hhSFkh_?+10 ouhhjk_?-10 jvuj
yuuuu +10 iyg-bhjj-10-10jooj
546556 GFgg _?shdr _ ?ou+10
uuuyyy+10uby
-10buvu i9io12+10

Сначала Parse( var S : String; const Separators : String ), а потом меняем
карма: 6

0
Ответов: 16884
Рейтинг: 1239
#22: 2015-05-29 16:38:00 ЛС | профиль | цитата
Отвлекли.
flint2, так ?
code_35759.txt
[flood]счет 14:22[/flood]
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_35759.txt [1.4KB] [250]
Ответов: 2059
Рейтинг: 132
#23: 2015-05-29 16:50:07 ЛС | профиль | цитата
Tad, Так точно!
карма: 6

0
Ответов: 1841
Рейтинг: 369
#24: 2015-05-29 17:03:53 ЛС | профиль | цитата
[offtop]На плюсах https://ideone.com/yzIHXx
Реализация в 2 цикла, хотя, можно было и в одном цикле сделать, но сейчас некогда сравнивать как лучше [/offtop]
карма: 1
0
Ответов: 2059
Рейтинг: 132
#25: 2015-05-29 17:36:01 ЛС | профиль | цитата
CriDos, лаконично
Можно и в одном цикле, только код получается немного длиннее.
Во всяком случае у меня так год назад получалось. Тут или скорость, или количество кода.
карма: 6

0
Ответов: 16884
Рейтинг: 1239
#26: 2015-05-29 18:08:39 ЛС | профиль | цитата
CriDos писал(а):
На плюсах

На IC (HiAsm)
code_35761.txt
или с таким IC

Add(InlineCode,7039544,567,364)
{
WorkPoints=#6:doWork|
EventPoints=#6:doText|
DataPoints=#3:Str|
Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses kol,Share,Debug;|12:{$I def.inc}|4:type|28: THiAsmClass = class(TDebug)|10: private|0:|9: public|10: doText,|19: Str : THI_Event;|49: procedure doWork(var _Data:TData; Index:Word);|5: end;|0:|14:implementation|0:|29:procedure THiAsmClass.doWork;|19:var s, ss : string;|17: i : integer; |5:begin|26: s := toStringEvent(Str);|20: if s='' then exit;|21: i := pos('shdr',s);|19: if i=0 then exit;|21: ss := CopyEnd(s,i);|56: while Pos('+10',ss)<>0 do StrReplace( ss,'+10',' ');|56: while Pos('-10',ss)<>0 do StrReplace( ss,'-10',' ');|39: _hi_onEvent(doText,copy(s,1,i-1)+ss);|4:end;|4:end.|
}


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_35761.txt [1.2KB] [250]
Ответов: 2059
Рейтинг: 132
#27: 2015-05-29 18:28:12 ЛС | профиль | цитата
flint2 писал(а)
На IC получится 2-3 строчки.

карма: 6

0
Ответов: 223
Рейтинг: 24
#28: 2015-05-29 19:31:32 ЛС | профиль | цитата
Еще вариант :
code_35762.txt
карма: 0

0
файлы: 1code_35762.txt [1.3KB] [226]
Ответов: 24
Рейтинг: 0
#29: 2015-06-08 20:04:53 ЛС | профиль | цитата
Что-то у меня не получается не загрузить файл не сохранить.

code_35812.txt

Файл 123.sf2 необходимо открыть найти в нём сигнатуру shdr и после этой сигнатуры все встретившиеся символы -L и +L заменить на 00 00 hex, вот у меня никак не получается, подскажите пожалуйста как сделать?

Файл 123.sf2 http://rghost.ru/7rDTnLKcB
карма: 0

0
файлы: 1code_35812.txt [3KB] [205]
Ответов: 16884
Рейтинг: 1239
#30: 2015-06-08 21:49:24 ЛС | профиль | цитата
Кажется пора в КуплюПродам.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)