如何用BCB读取及编辑JPG,GIF图片中的附加信息呢?
日期:2007-10-16 荐:
如何用BCB读取及编辑JPG,GIF图片中的附加信息呢?rt,请问有谁知道啊?比如注释,创建人之类的,谢谢了读文件信息阿//取得指定文件handleHANDLE fo = ::CreateFile(str, GENERIC_READ | GENERIC_WRITE, 0,NULL, OPEN_EXISTING, FILE_FLAG_WRITE_THROUGH, NULL);BY_HANDLE_FILE_INFORMATION fd;//取得指定文件资料if(::GetFileInformationByHandle(fo, &fd)) { //取得指定文件的状态 AnsiString string; switch(fd.dwFileAttributes) { case FILE_ATTRIBUTE_ARCHIVE: string = "此文件处于保存状态"; break; case FILE_ATTRIBUTE_COMPRESSED: string = "此文件处于压缩状态"; break; case FILE_ATTRIBUTE_DIRECTORY: string = "此文件处于不存在状态"; break; case FILE_ATTRIBUTE_HIDDEN: string = "此文件处于隐藏状态"; break; case FILE_ATTRIBUTE_NORMAL: string = "此文件处于设置状态"; break; case FILE_ATTRIBUTE_OFFLINE: string = "此文件处于离线状态"; break; case FILE_ATTRIBUTE_READONLY: string = "此文件处于只读状态"; break; case FILE_ATTRIBUTE_SYSTEM: string = "此文件处于系统状态"; break; case FILE_ATTRIBUTE_TEMPORARY: string = "此文件处于缓冲状态"; break; } //分辨文件系统 AnsiString nl; if(((int)fd.nNumberOfLinks)== 1) nl = "FAT"; else nl = "NTFS"; //列出指定文件所有信息 ListBox1->Items->Add(string); ListBox1->Items->Add("建立时间(L)" AnsiString((int)fd.ftCreationTime.dwLowDateTime)); ListBox1->Items->Add("建立时间(H)" AnsiString((int)fd.ftCreationTime.dwHighDateTime)); ListBox1->Items->Add("最后存取时间(L)
标签: