ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|

19.12.2008, 17:47
|
|
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме: 5749763
Репутация:
1680
|
|
Подскажите ещё раз пожалуйста насчёт парсинга, как вот такой текст:
"<script>lol</script>" отфильтровать чтобы получилось только lol ???
Учитывая то, что данный текст <script>lol</script> находится в memo в перемешку с другим текстом (то есть он может быть на любой линии)
|
|
|

19.12.2008, 19:14
|
|
Участник форума
Регистрация: 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;
end;
Провер, может -1 в делите не надо.. В а будет lol 
|
|
|

19.12.2008, 19:40
|
|
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме: 6828219
Репутация:
2274
|
|
Вопрос по дельфи
Второй день его "изучаю" по сравнению с PHP это ад Х_Х
Юзаю borland delphi чёто такое... Вот у мя проблема
Я там по середине сделал надпись в проге "Hello" и сделал чтоб при нажатии на кнопку происходило
message.Caption := 'Hello, world';
И текст при замене уже получается не по центру... А вот как его заставить чтоб он центровался?
Я надеюсь понятно объясняю?
=====
Я вобще и по гуглу бегаю по своим вопросам но нахожу тама коды по 100 строк, хотя когда это делается за 2-3 строки, в гугле одни задроты  ))
Ну в общем вот...
|
|
|

19.12.2008, 19:44
|
|
Участник форума
Регистрация: 21.04.2007
Сообщений: 289
Провел на форуме: 4612647
Репутация:
368
|
|
MessageBox(0,'Hello, world','Fuck you,world',MB_OK);
|
|
|

19.12.2008, 19:45
|
|
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме: 5749763
Репутация:
1680
|
|
Сообщение от Pir4tt
Nightmarе:
Провер, может -1 в делите не надо.. В а будет lol 
Не пашет.
Где ошибка хз, переменные объявил так:
var
txt,a:string;
i: integer;
Но в любом случае парсить надо не одну линию а весь текст в memo1
|
|
|

19.12.2008, 19:47
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
label1.Alignment:=taCenter;
если я правильно понял
Сообщение от NeXArmAor
MessageBox(0,'Hello, world','Fuck you,world',MB_OK);
бугога 
отжег))))))))))))))))))
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|

19.12.2008, 19:47
|
|
Участник форума
Регистрация: 21.04.2007
Сообщений: 289
Провел на форуме: 4612647
Репутация:
368
|
|
.Alignment:=taCenter;
|
|
|

19.12.2008, 19:54
|
|
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме: 6828219
Репутация:
2274
|
|
NeXArmAor, не то, но огромное спасибо что подсказал, я вчера незнал как такое сделать (окошко)
W!z@rD, ниработат...
Вот
А вот подлинее
А мне посередине надо 
|
|
|

19.12.2008, 20:08
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
Сообщение от Nightmarе
Подскажите ещё раз пожалуйста насчёт парсинга, как вот такой текст:
"<script>lol</script>" отфильтровать чтобы получилось только lol ???
Учитывая то, что данный текст <script>lol</script> находится в memo в перемешку с другим текстом (то есть он может быть на любой линии)
Регулярка к примеру типа таких:
http://regexlib.com/Search.aspx?k=a+href&c=-1&m=-1&ps=20
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|

19.12.2008, 20:11
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
Ponchik, тебе надо компонент растянуть по верху: Align:=alTop;
label1.Align:=alTop;
label1.Alignment:=taCenter;
label1.Caption:=edit1.Text;
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|