Pascal/Turbo Pascal - Función comparar registro y dato

Quería saber como se implementa una función que compare el campo de un registro de tipo string con un dato de tipo tdato.

¿Cómo está declarado TDato?

mira aki te va la definicion de tipos:

UNIT lista;

{USES error;}

INTERFACE
const
NULO = nil ;
TYPE
tDato = record
nombre : string;
numero : integer; {revisar???}
end;

tPos=^tNodo;
tNodo=record
d: tDato;
sig: tPos;
end;
tLista=tPos;

procedure listaVacia (var l : tLista);
function esListaVacia (l: tLista) : boolean;
function primero (l : tLista) : tPos;
function siguiente (l : tLista; p : tPos) : tPos;
function esFinLista (l : tLista; p : tPos) : boolean;
procedure insertarOrdenado (d : tDato; var l : tLista);
procedure borrar (var l : tLista; p : tPos);
function obtenerDato (l : tLista; p : tPos) : tDato;{preg}
function existe (l : tLista; nombre : string) : boolean;
function buscarDato (l : tLista; nombre : string) : tPos;
procedure actualiza (l : tLista; p : tPos; d : tDato);

necesito q alguien me ayude con esa duda anterior

que tal

Var
l:lista;

begin
...
if ( l^.d.nombre="cadena") then ...