Pascal/Turbo Pascal - como realizo una busqueda en una lista enlazada?

Hola, necesito saber como realizar una busqueda en una lista enlazada, ademas me gustaria tener un curso con informacion de pilas, colas y correspondencia, esto por si saben de algun enlaze.

Bueno. Supongamos que la lista es:

type TLista= ^TNodo;
TNodo=record
Dato:integer;
Sig:TLista;
end;

var pLista:TLista;

function Buscar(pLst:TLista; e:integer): TLista;
var Aux:TLista;
begin
Aux:=pLst;
while (Aux<>nil) and (Aux^.Dato<>e) do Aux:=Aux^.Sig;
Buscar:=Aux;
end;

var res:TLista;
begin
res:=buscar(pLista,3);
if res<>nil ---> se encontró y res apunta al nodo con el dato
else -->no se encontró
end.

Saludos y felices compiladas.