hvordan fanger man cd'ens titel ?!?!?!

Kig lige på denne funktion:

function GetVolumeName(DriveLetter: Char): string;
var
  dummy: DWORD;
  buffer: array[0..MAX_PATH] of Char;
  oldmode: LongInt;
begin
  oldmode := SetErrorMode(SEM_FAILCRITICALERRORS);
  try
    GetVolumeInformation(PChar(DriveLetter + ':\'),
                        buffer,
                        SizeOf(buffer),
                        nil,
                        dummy,
                        dummy,
                        nil,
                        0);
    Result := StrPas(buffer);
  finally
    SetErrorMode(oldmode);
  end;
end;


Den bruges (som du nok kan se) på denne måde:

ShowMessage(GetVolumeName('d'));

for at få d-drevets titel.

/SpEeDy

Hvis det er musik cd'er så er det en anden snak

Takker Speedy, det var lige det jeg stod og manglede....