В чём ошибка кода?

[Richard22]

Код не мой так что не ругайте сильно)
Выцепил код который вроде бы должен посылать чего то в rxrichedit
но изначально в коде ошибка, и Делфи подчёркивает красным некоторые места кода(выделено красным), можете объяснить в чём ошибочка

procedure PutRTFSelection(RichEdit: TRxRichEdit; SourceStream: TStream);
  // by P. Below
var
  EditStream: TEditStream;
begin
  with EditStream do
  begin
    dwCookie := Longint(SourceStream);
    dwError := 0;
    pfnCallback := EditStreamInCallBack;
  end;
  RichEdit.Perform(EM_STREAMIN, SF_RTF or SFF_SELECTION, Longint(@EditStream));
end;

[grafgrial]

RichEdit.Perform(EM_STREAMIN,( SF_RTF or SFF_SELECTION), Longint(@EditStream)););

а уверен что тут должно быть? в общем проверь (выделено жирным)

[Пепел Феникса]

ТС, перепишите ошибку вообще то.
ибо с виду верно.

grafgrial, что за бред?(я про два ; в конце).