Fehlermeldung Methodenbezeichner erwartet

[julchen]

Hallo,

ich wollte diesen Code in mein Projekt einbinden, bekomme aber die Fehlermeldung: Methodenbezeichner erwartet. In der Hilfe habe ich schon gelesen, verstehe aber nicht, was da gemeint ist und kann die Erklärung für mein Problem nicht umsetzen. Der Compiler hängt sich immer am RichEdit1 auf.
Vielleicht seht Ihr ja, wo der Fehler ist!

Delphi-Quellcode:

type
        TForm1 = Class(TForm);
        RichEdit1 = TRichEdit;

procedure RichEdit1OnKeyup(Sender: TObject; var Key: word; Shift: TShiftState);
procedure RichEdit1OnKeydown(Sender: TObject; var Key: word; Shift: TShiftState);

implementation

uses unit5;

// ====== 

 einfügen ==============================
procedure RichEdit1OnKeyup(Sender: TObject; var Key: word; Shift: TShiftState);
var
        selstart: integer;
        tempstr1: PChar;
begin
        if key = VK_RETURN then
        begin
          tempstr1 := '

';
          SendMessage(RichEdit1.Handle, EM_Getsel, longint(@selstart), 0);
          SendMessage(RichEdit1.Handle, EM_Replacesel, 0, LongInt(tempstr1));
          SendMessage(RichEdit1.Handle, EM_Setsel, selstart + 4, Selstart + 3);
          key := 0;
        end;