EXIF格式分析及通过XML处理(4)[7]

    DWORD nPointer;

    memcpy( &nPointer, p, sizeof ( nPointer ) );

    int i = 0;

    while ( nPointer > 0 )

    {

        p = GetIFD( aNode, aTIFFHeader, nPointer, AnsiString( "IFD" ) + IntToStr( i++ ) );

        if ( !p )

            break;

        memcpy( &nPointer, p, sizeof ( nPointer ) );

    }

}

//---------------------------------------------------------------------------

int __fastcall TExifXML::LoadFromStream(TStream * aStream)

{

    if ( !FXMLDoc )

        throw Exception( "XMLDoc property is null!" );

    TMauto_ptr<TMemoryStream> ms( new TMemoryStream( ) );

    ms->CopyFrom( aStream, aStream->Size );

    ms->Seek( 0, soFromBeginning );

    FXMLDoc->FileName = "";

    FXMLDoc->Active   = true;

    FXMLDoc->Version  = "1.0";

    FXMLDoc->Encoding = "GB2312";

    _di_IXMLNode pNode = FXMLDoc->AddChild( "ExifAPP1" );