Segun el código que envías, tienes dos procedimientos:
Código Delphi
[-]
function GetDescripcion: integer;
procedure SetDescripcion(NewDescripcion: integer);
Que están definidos arriba (cabecera) y no tienen implementación.
De ahí los errores:
----------------------------------------------------------------
[Error] SEARCH.pas(22): Unsatisfied forward or external declaration: 'TSEARCHDLG.GetDescripcion'
[Error] SEARCH.pas(23): Unsatisfied forward or external declaration: 'TSEARCHDLG.SetDescripcion'
----------------------------------------------------------------
Pon el cursor sobre el procedimiento GetDescripcion y pulsa CTRL+SHIFT+C El IDE de Delphi te generará una implementación vacía de esos métodos.