请问怎么判断光驱里的光盘是音乐CD(音轨)还是数据光盘? 应该有一个标识符我觉得,怎么判断呢?希望写过这方面程序的高手帮忙解答一下,谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Function AudioCD(Drive : Char) : Boolean;VarFSFlags, MaxLength: DWORD;VolName, Path : String;BeginPath := Drive + ':\';Result := FALSE;if (GetDriveType(PChar(Path)) = DRIVE_CDROM) thenBeginSetLength(VolName, 64);GetVolumeInformation(PChar(Path), PChar(VolName), Length(VolName), nil, MaxLength, FSFlags, nil,0);if (lStrCmp(PChar(VolName),'Audio CD') = 0) Then Result := TRUE;End;end; 如何结束onclick事件 System Error.Code 5 拒绝访问的问题。 关于程序打包的问题 在delphi中如何导入文本数据,和导出文本数据 fastreport的简单问题,在线等!!!!!!!!! 书生是旺财,大家和我喊!!!散分 odbc 一份理工科大学生的文化素质的调查表 forgot2000散分!终于回来工作了。 请喜爱borland的来看看~~哈哈 关于建立类 FastReport2.5如何不显示空值并格式化显示小数?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货