Ай извеняюсь, то я спать хотел и через попу на код взглянул.
Если прогаешь первый день, я бы советовал начать с чего попроще, разобраться с типами данных и циклами для начала.
Для того что бы выдрать кусок со страницы тебе нужено использовать компонент idHttp (с ним проще обьяснять, да и заточен он под такую работу)
Получаем код страницы и вытаскиваем из него все ссылки (для простых страниц, вообще парсеры пишутся либо универсальными, либо специализированными под сайт):
function TForm1.GetLink(link: string): TStringList;
var
id[Ссылки могут видеть только зарегистрированные и активированные пользователи]
buf,s:string;
possition:integer;
begin
// вытаскиваем код
try
id[Ссылки могут видеть только зарегистрированные и активированные пользователи](Form1);
buf:=id[Ссылки могут видеть только зарегистрированные и активированные пользователи](link);
finally
id[Ссылки могут видеть только зарегистрированные и активированные пользователи]
end;
//ищем и вытаскиваем ссылки
result:=TStringList.Create;
possition:=pos('<a href="',buf);
while possition>0 do
begin
delete(buf,1,possition+8);
result.Add(copy(buf,1,pos('">',buf)-1));
delete(buf,1,pos('">',buf)+1);
possition:=pos('<a href="',buf);
end;
end;
В аттаче полный исходник.
Ну а как добавить элементы на свою страницу оставляю на твоей совести.