20.05.2008, 22:23
|
|
Banned
Регистрация: 18.02.2008
Сообщений: 47
С нами:
9593546
Репутация:
129
|
|
Код:
i:=1;
while not eof do
Begin
search:= pos("@mail.ru",i);
masiv[i]:= search;
i:=i+1;
End;
В итоге у тебя будут все отпарсиные мыла в масиве - masiv
De-visible: Теги [code] |
|
|