В чём у меня проблемма в коде

[gum_classis]

Вот весь код
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
Id[Ссылки могут видеть только зарегистрированные и активированные пользователи] StdCtrls;

type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
Id[Ссылки могут видеть только зарегистрированные и активированные пользователи] TId[Ссылки могут видеть только зарегистрированные и активированные пользователи]
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var postdata, [Ссылки могут видеть только зарегистрированные и активированные пользователи]
begin
postdata:=TStringList.Create;
try
[Ссылки могут видеть только зарегистрированные и активированные пользователи]
postdata.Add('username='+Edit1.Text);
postdata.Add('password='+Edit2.Text);
[Ссылки могут видеть только зарегистрированные и активированные пользователи]('[Ссылки могут видеть только зарегистрированные и активированные пользователи]',postdata);
if Pos('logout',[Ссылки могут видеть только зарегистрированные и активированные пользователи])>0 then
ShowMessage('Авторизовался!')
else
ShowMessage('Авторизация не удалась!');
finally
postdata.free;
end;

end.
Ошибка вылазит вот тут end.
В чём проблемма

[Mebius]

перед end. допиши end;

[Mebius]

Посчитай сколько у тебя "begin" и сколько "end"

это просто невнимательность,

з.ы. юзайте РАД Студию, она за вас сама все эти мелкие штучки писать будет)

[ultrazzz]

Поставь cnwizards он подсвечивает все связки Begin и End, не ошибешься :)