El error es el siguiente:
identifier not found TDato2
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils;
type
TDato1 = class
campo1: string;
campo2: string;
dato2: TDato2;
end;
TDato2 = class(TDato1)
campo3: byte;
campo4: string;
dato1: TDato1;
end;
implementation
end.