Ya las tienes vinculadas por el nombre. (Imagen = Ruta + CodigoProducto + ".JPG")
Supongo que te refieres a mostrar la imagen.
En ese caso tienes que tener un componente TImage en el formulario y cargarle la imagen:
Código Delphi
[-]procedure TForm.CargarImagenDeArchivo(Imagen: TImage; Archivo: string);
begin
try
Imagen.Picture.LoadFromFile(Archivo);
except
on EInvalidGraphic do
begin
Imagen.Picture.Graphic := nil;
MessageDlg(_('Formato de imagen no aceptado'), mtError, [mbOK], 0);
end;
on EFOpenError do
begin
Imagen.Picture.Graphic := nil;
end;
end;
end;
begin
RutaImagenesProductos := 'C:\Imagenes\Productos\';
RutaImagenesClientes := 'C:\Imagenes\Clientes\';
[...]
CargarImagenDeArchivo(MiImagen, RutaImagenesProductos + Tabla.FieldByName('PRODUCTO').AsString + '.JPG')
[...]
end;