[ecfisa]

Hola Agustin.

No tenes nada de que excusarte.
Hay que poner la cabecera de la funcion en la sección private o public de la clase TForm:

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, ...

type
  TForm1 = class(TForm)
  ... 
   procedure Button1Click(Sender: TObject);
  ...  
  private
     function DatoExiste(Campo, Valor: string): Boolean;
  public
  
  end;

var
  Form1: TForm1;

implementation
...

function TForm1.DatoExiste(Campo, Valor: string): Boolean;
begin
   ....
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
   ...
   if DatoExiste('Telefono',METelefono.Text) then
      METelefono.SetFocus;
   ...
end;
...

Saludos.