шифрование и дешифрование IdEncoderXXE и IdDecoderXXE

[betirsolt]

всем привет

procedure TForm1.Button1Click(Sender: TObject);
begin
 memo2.Text:=IdEncoderXXE1.Encode(memo1.Text);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
 memo1.Text:=IdDecoderXXE1.Decode(memo2.Text);
end;

при этом выдает ошибку [DCC Error] Unit1.pas(40): E2010 Incompatible types: 'string' and 'procedure, untyped pointer or untyped parameter'
на delphi 7 вроде так прокатывало,что мне с этим делать???

[betirsolt]

блин надо было decodestring писать,извиняюсь