EnumTags example for C++ Builder
void __fastcall TForm1::btnEnumTagsClick(TObject *Sender)
{
LEADImage1->EnumTags("clean.tif", 0, 0);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::LEADImage1EnumTags(WORD uTag, WORD uType,
DWORD uCount, bool &bContinue)
{
// Displaying the Tag's Info.
ShowMessage("Tag = " + IntToStr(uTag) + "\n" +
"Type = " + IntToStr(uType) + "\n" +
"uCount = " + IntToStr(uCount));
bContinue= true; // Keep enumerating tags.
}