Всем привет. Сегодня сел, и "заново изобрел велосипед" за это прошу тапками не закидывать) Написал первую программу на дельфи, которая хоть что-то может) Очень сыро, с использованием учебников и т.д...но всё же первое творение) прошу проверить на работоспособность...
[Ссылки могут видеть только зарегистрированные пользователи. ]
[Ссылки могут видеть только зарегистрированные пользователи. ]
В верхнее поле вводим ссыль на страницу в формате "http://www.адрес.ru/. Ниже получаем все ссылки с этой странички. При нажатии кнопки "сохранить" в папке с программой создаётся текстовый документ. Тапками не кидайте. Как я уже говорил, это первое творение. Проверяем..
Принимаются пожертвования любых размеров в фонд поддержки начинающих программистов
Кошельки: WMZ - Z276844220882; WMR - R231028582939; WMU - U394136909210; ЯД - 410011494605270.
вот таким способом пытаюсь парсить ники. но парсит не у всех. (только у обычных юзеров). как сделать чтоб строки "Имя: " (т.е. где не нашёл значения) не выводились?)
var s:string;
{....}
s:=Pars('<li class="profilefield_category">О',Source.Text,'<dl class="list_no_decoration profilefield_list">'));
if s<>'' then listbox1.items.add('Имя: '+s);
{.....}
Цитата:
в процедуре клика парса записано ~ следующее: memo1.text:=http.get(edit1.text);