Czy moze mi ktos wyjaśnić dlaczego system pobierania numeru seryjnego partycji napisany przez Adama nie dziala ...
var
Bufor:array[0..MAX_PATH] of Char;
MaxCompLength, FileSystemFlags : Integer;
Drive:Char;
Serial:DWORD;
begin
Drive:='A';
GetVolumeInformation(PChar(Drive + ': '),Bufor,SizeOf(Bufor),
@serial,MaxCompLength,FileSystemFlags,nil,0);
end;
Powyżej jest kod który jest zamieszczony w faq.
Za pomoc z góry dziekuje.