Hola, así puedes extraer las imágenes de un DBNavigator:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
begin
with DBNavigator1 do
for I:= 0 to ControlCount-1 do
if Controls[i] is TNavButton then
TNavButton(Controls[i]).Glyph.SaveToFile('C:\' + Hint + '.bmp');
end;