Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
20.05.2008, 22:09
|
|
Познающий
Регистрация: 14.02.2008
Сообщений: 62
Провел на форуме:
335706
Репутация:
4
|
|
работа с txt в delphi
Я гуружу текст в memo1, как сделать так чтоб с memo1 выдергивался текст в memo2 по маске.
Подскожите плз
или стукните 775474
|
|
|
20.05.2008, 22:12
|
|
Banned
Регистрация: 18.02.2008
Сообщений: 47
Провел на форуме:
477406
Репутация:
129
|
|
Напиши маску,а я код соображу....
|
|
|
|
20.05.2008, 22:13
|
|
Познающий
Регистрация: 14.02.2008
Сообщений: 62
Провел на форуме:
335706
Репутация:
4
|
|
@mail.ru
|
|
|
|
20.05.2008, 22:14
|
|
Banned
Регистрация: 18.02.2008
Сообщений: 47
Провел на форуме:
477406
Репутация:
129
|
|
Тебе просто парсер мыл нужен?
|
|
|
|
20.05.2008, 22:14
|
|
Banned
Регистрация: 06.01.2008
Сообщений: 904
Провел на форуме:
4037638
Репутация:
1821
|
|
Каждая запись с новой строки или все в смешку?!
pos(искомая_строка,обрабатыв аемая_строка) - Или это не в моде?  |
|
|
|
20.05.2008, 22:15
|
|
Познающий
Регистрация: 14.02.2008
Сообщений: 62
Провел на форуме:
335706
Репутация:
4
|
|
каждая в новой строке
|
|
|
|
20.05.2008, 22:18
|
|
Banned
Регистрация: 18.02.2008
Сообщений: 47
Провел на форуме:
477406
Репутация:
129
|
|
для перехода на новую строку используй
|
|
|
|
20.05.2008, 22:19
|
|
Banned
Регистрация: 06.01.2008
Сообщений: 904
Провел на форуме:
4037638
Репутация:
1821
|
|
k,i:integer;
Код:
For i:=1 to Memo1.lines.count Do
Begin
k:=pos('@mail.ru',Memo1.Lines[i])
If k<>0 then Memo2.Lines.add(Memo1.lines[i]);
End.
Будет что-то в этом роде!
Пока ни Делфи ни паскаля! |
|
|
|
20.05.2008, 22:23
|
|
Banned
Регистрация: 18.02.2008
Сообщений: 47
Провел на форуме:
477406
Репутация:
129
|
|
Код:
i:=1;
while not eof do
Begin
search:= pos("@mail.ru",i);
masiv[i]:= search;
i:=i+1;
End;
В итоге у тебя будут все отпарсиные мыла в масиве - masiv
De-visible: Теги [code] |
|
|
|
20.05.2008, 22:28
|
|
Reservists Of Antichat - Level 6
Регистрация: 04.02.2007
Сообщений: 1,152
Провел на форуме:
3008839
Репутация:
1502
|
|
Сообщение от .:KeepeR:.
Код:
i:=1;
while not eof do
Begin
search:= pos("@mail.ru",i);
masiv[i]:= search;
i:=i+1;
End;
В итоге у тебя будут все отпарсиные мыла в масиве - masiv Чё? Если честно, то это даже не скомпилится
__________________
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
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
