Tienes 2 opciones...
1. Cargar los archivos de imagen usando la forma:
Código Delphi
[-]
var
ExePath: string;
begin
ExePath := ExtractFilePath(Paramstr(0));
try
Image1.Picture.LoadFromFile(ExePath + '\f' + DBEdit1.Text + '.bmp')
except
Image1.Picture.LoadFromFile(ExePath + '\ima\leofig01.bmp')
end
end;
2. O en el acceso directo llenas el campo
Iniciar en: con la ruta donde está instalado el programa...
Espero que te sirva...
Saludos...