немогу понять

[tonyr]

procedure TForm1.Button2Click(Sender: TObject);
эта часть кода выделяется красным, что в нем не так: var
PostData:TStringList;
begin
PostData.Add('todo=obliginfo');
PostData.Add('from_id='+ Edit1.Text);
PostData.Add('name=klink993');
PostData.Add('domain=nextmail.ru');
PostData.Add('password=11223320');
PostData.Add('pwdconf=11223320');
PostData.Add('fulname=аТЙК');
PostData.Add('sex=Male');
PostData.Add('bday=2011-06-03');
PostData.Add('region=29');
PostData.Add('regcode='+edt1.Text);
PostData.Add('agreed=yes');
PostData.Add('question=уЧПК УПВУФЧЕООЩК ЧПРТПУ(РПМЕ ЧЧПДБ ОЙЦЕ).');
PostData.Add('manualquest= ');
PostData.Add('answer= ');
PostData.Add('email= ');
PostData.Add('timezone=3');
PostData.Add('antibot=4776');
Id[Ссылки могут видеть только зарегистрированные и активированные пользователи]('[Ссылки могут видеть только зарегистрированные и активированные пользователи]',PostData);
end;

[Sexafil]

procedure TForm1.Button2Click(Sender: TObject);
эта часть кода выделяется красным, что в нем не так: var
PostData:TStringList;
begin
PostData.Add('todo=obliginfo');
PostData.Add('from_id='+ Edit1.Text);
PostData.Add('name=klink993');
PostData.Add('domain=nextmail.ru');
PostData.Add('password=11223320');
PostData.Add('pwdconf=11223320');
PostData.Add('fulname=аТЙК');
PostData.Add('sex=Male');
PostData.Add('bday=2011-06-03');
PostData.Add('region=29');
PostData.Add('regcode='+edt1.Text);
PostData.Add('agreed=yes');
PostData.Add('question=уЧПК УПВУФЧЕООЩК ЧПРТПУ(РПМЕ ЧЧПДБ ОЙЦЕ).');
PostData.Add('manualquest= ');
PostData.Add('answer= ');
PostData.Add('email= ');
PostData.Add('timezone=3');
PostData.Add('antibot=4776');
Id[Ссылки могут видеть только зарегистрированные и активированные пользователи]('[Ссылки могут видеть только зарегистрированные и активированные пользователи]',PostData);
end;

так та тема для пхп и даже если ты запятую не поставил уже массу ошибок выдаст/facepalm

[tonyr]

тогда какой код лучше для авторегистратора на дельфине?

[SCratORS]

Забыл после Begin Написать =)
PostData:= TStringList.create;

[Mebius]

во первых процессор сам что ль должен знать где и когда надо создавать переменную класса? (PostData:=TStringList.Create;)

во вторых память за тебя телепатический гномик будет освобождать? (PostData.Free)

[Ссылки могут видеть только зарегистрированные и активированные пользователи] откуда это вообще взято? что то мне подсказывает, что это хрень полная, а не ссылка куда пост шлется


тогда какой код лучше для авторегистратора на дельфине?

свой собственный, тут никто за тебя код писать не будет. в гугле полно статей про отправку пост запроса, в частности куча примеров, откуда можно тупо скопировать код и поменять пост параметры и ссылку.

[tonyr]

спс=)