TJPEGImage *img = new TJPEGImage;

    for(i= 0 ; i < DM->DSRepPhotos->DataSet->RecordCount; i++)
    {
        _di_IXMLNode _n_photos = _n_man->AddChild(WideString( "фотографии" ));

        load_jpeg(DM->DSRepPhotos->DataSet->FieldByName( "фото" ),img);
        img->SaveToFile(IntToStr(i) +  ".jpg" );
        _di_IXMLNode _n_photo_link = _n_photos->AddChild(WideString( "фото" ));
        _n_photo_link->Text = WideString( "<img src=\"  " +IntToStr(i) + " .jpg " + " \ "></img>" );

        DM->DSRepPhotos->DataSet->Next();
    }
    delete img;

<фото><img src= "0 .jpg"></img></фото>

<img src= "0 .jpg"></img>