Invertir string -

[mariolop12]

Hola,

Yo uso Delphi 5.

Código Delphi [-]
Estuve buscando por internet como invertir un string.... y encontré el siguiente código

 Function String_Reverse(S : String): String;
Var
   i : Integer;
Begin
   Result := '';
   For i := Length(S) DownTo 1 Do
   Begin
     Result := Result + Copy(S,i,1) ;
   End;
End;

Yo soy muy nuevo en delphi, estoy leyendo y aprendiendo.... 
quisiera saber en qué parte del editor de código puedo introducirlo.

este es mi programa...


interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, Buttons;

type
  TForm1 = class(TForm)
    BitBtn1: TBitBtn;
    procedure BitBtn1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.BitBtn1Click(Sender: TObject);
VAR a,b,e:real;
r:integer;
begin

a:=strtofloat(inputbox('Datos','Introduzca numero A:',''));
b:=strtofloat(inputbox('Datos','Introduzca numero B:',''));

//parte a   -----------------------------------------------------------
e:=Exp(B*Ln(A));
showmessage('Respuesta:'+' '+floattostr(e));

//parte b   ----------------------------------------------------------
r:=(trunc(Int(A)) mod 4567);

AQUÍ DEBERÍA IR EL CÁLCULO DEL INVERSO DE   'r'

//parte c  ------------------------------------------------------------
ShowMessage('Redondear B a las milésimas:'+FormatFloat('"Value = "0.000', b));

end;

end.

espero puedan ayudarme