ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
19.12.2008, 20:13
|
|
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме:
5749763
Репутация:
1680
|
|
Сообщение от W!z@rD
Регулярка к примеру типа таких:
http://regexlib.com/Search.aspx?k=a+href&c=-1&m=-1&ps=20
Ничё не понял чё там такое если чест.
Просто в куче текста в memo встречается место <script>lol</script>, больше оно в тексте не повторяется, и мне из всего текста нужно тока оставить lol и всё.
Тут работа не просто с линией а с большим кол-вом текста.
|
|
|
19.12.2008, 20:19
|
|
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме:
6828219
Репутация:
2274
|
|
W!z@rD, эээ... Работает, но "Присасывается" к верху, а как символ \n вставить? Я пишу ... := '\n' + ...; и не получается, так и выводит \n
|
|
|
|
19.12.2008, 20:32
|
|
Reservists Of Antichat - Level 6
Регистрация: 04.02.2007
Сообщений: 1,152
Провел на форуме:
3008839
Репутация:
1502
|
|
Сообщение от Ponchik
W!z@rD, эээ... Работает, но "Присасывается" к верху, а как символ \n вставить? Я пишу ... := '\n' + ...; и не получается, так и выводит \n
#13#10
__________________
Bedankt euch dafür bei euch selbst.
H_2(S^3/((z1, z2)~(exp(2pi*i/p)z1, exp(2pi*q*i/p)z2)))=Z/pZ
|
|
|
|
19.12.2008, 20:49
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Nightmarе по поводу регулярки можно спросить вон у Пончика )))
вот к примеру по поводу регулярок в Delphi http://forum.vingrad.ru/articles/topic-213075/anchor-entry1523979/0.html
Ponchik
label1.caption:='test'#13#10'2 test'
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
19.12.2008, 20:52
|
|
Участник форума
Регистрация: 21.04.2007
Сообщений: 289
Провел на форуме:
4612647
Репутация:
368
|
|
Сообщение от W!z@rD
Nightmarе по поводу регулярки можно спросить вон у Пончика )))
вот к примеру по поводу регулярок в Delphi http://forum.vingrad.ru/articles/topic-213075/anchor-entry1523979/0.html
Ponchik
label1.caption:='test'#13#10'2 test'
+ забыл поставить
label1.caption:='test'+#13#10+'2 test'
|
|
|
|
19.12.2008, 20:56
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Сообщение от NeXArmAor
+ забыл поставить
label1.caption:='test'+#13#10+'2 test'
мда...
NeXArmAor
ты сначала так попробуй и задумайся...
ничего я не забыл
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
19.12.2008, 20:58
|
|
Участник форума
Регистрация: 21.04.2007
Сообщений: 289
Провел на форуме:
4612647
Репутация:
368
|
|
по идее можно и так и так. разницы нет в принципе
|
|
|
|
19.12.2008, 23:57
|
|
Reservists Of Antichat - Level 6
Регистрация: 04.02.2007
Сообщений: 1,152
Провел на форуме:
3008839
Репутация:
1502
|
|
Сообщение от NeXArmAor
по идее можно и так и так. разницы нет в принципе
если делфа умная(читай очень умная, читай оптимизатор), то наверное нет. А вообще конкатенация строк с "+", как ни странно, медленнее работает, чем если у тебя сразу строка создана. Можете реверснуть и посмотреть
__________________
Bedankt euch dafür bei euch selbst.
H_2(S^3/((z1, z2)~(exp(2pi*i/p)z1, exp(2pi*q*i/p)z2)))=Z/pZ
|
|
|
|
20.12.2008, 18:21
|
|
Участник форума
Регистрация: 03.01.2008
Сообщений: 104
Провел на форуме:
400001
Репутация:
111
|
|
Nightmarе, скобку забыл одну:
txt:=Memo1.Text;
i:=Pos('<script>lol</script>',txt);
if i<>0 then begin
delete(txt,1,i+length('<script>')-1);
a:=Copy(txt,1,Pos('</script>',txt)-1);
Код только что проверен и прекрасно парсит, собстно заменяя <script> и </script> можно парсить любые данные  переменные ты правильно обявил))
p/s/ Можно с регулярками заморочиться, но тебе надо будут прикрутить TRegExp к сорцам, а ради одной единственной фразы оно того не стоит 
|
|
|
|
20.12.2008, 18:40
|
|
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме:
6828219
Репутация:
2274
|
|
Как я закалебался, всё что я в гугле или ещё где нахожу неработает! Ну сколько можно! Ну как так!
Вот например функция
http://www.jasonwhite.co.uk/index.php/2006/07/30/delphi-explode-function-like-php-explode/
Запускаю...
Какого-то чёрта тама лишний вопросительный знак.... Ну лан, удаляю
Потом строка
s := ”;
ему ненравятся такие ковычки! КАК ТАК! Ну если чел выложил значит должно нравиться! Ну лан! Заменяю на
s := '';
Ага... Запускаеца софтина...
Под функцией пишу
explode(’,',’test,test,tets’, 0) ;
опять эти ковычки! Причём побще непонятно одна ` пторая ' мб защита от школьников =\ нипаняяятна, исправляю на
explode(',','est,test,tets', 0) ;
Ну и чтобы вы думали... Ошибка естествено! Вы чё! Чтобы что-то запустилось! Да нереал вобще!
[Error] Unit2.pas(94): Declaration expected but identifier 'explode' found
[Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit2.pas'
Что эта гадина хочет?!
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
