[fpc-pascal]Reading and writing volume IDs

[Aitor Santamaria Merino]

Hi all,

I thought the following:

FindFirst ('c:\', volumeID, SR);
mylabel := sr.name;

would work in order to get the volume ID, but it doesn't. THe strange
thing is that (except for misprints) such a code gives me a 'no more
files' DOSerror under TP, and a 'file not found' (I think) under FPK.
Now how can I read such a volume ID?

And what about modifying it? Is there any unit out there that I can use
to do this?

Thanks!

Aitor