Czy moze mi ktos powiedziec jak skonwertować ponizszy kod aby dane dla zmiennej Volname aby pobierał ja z listviewa. Oto kod:
GetVolumeInformation(inttostr(listview1.items),VolName, MAX_PATH, @NumerSeryjny,
MaxL, FileSysFlags,
FileSysName, MAX_PATH);
i:=(IntToStr(NumerSeryjny));
I niestey ale nie działa ...
GetVolumeInformation(inttostr(listview1.items??? - co to jest? ),VolName, MAX_PATH, @NumerSeryjny,
MaxL, FileSysFlags,
FileSysName, MAX_PATH);
i:=(IntToStr(NumerSeryjny));I niestey ale nie działa ...
jezeli cos to:
inttostr(ListView1.Items.Count)
albo strtoint(ListView1.Items[0].Caption);
zalezy co to ma byc bo nie podales, nie wiem o co Ci chodzi...
To jest fragment procedury pobierajacej nr. seryjny CD i chodzi mi o to zeby pobierał ten nr. z elementu zaznaczonego w listviewie ...
To jak??
Numer seryjny jest pobierany z ListViewa??
Jezeli chodzi o konwetowanie to DWORD=LongWord;
Mozesz to chyba przekonwrtowac IntToStr ??
W ListView powinna znajdować się ścieżka do katalogu głównego voluminu, a nie liczba!!! Czyli np. 'C:'
I powinno to być przekazywane jako PChar.
Dlatego najlepiej to zrobić tak:
var
Buf: string;
begin
Buf := ListView1.Selected.Caption;//zakładam, że cała ścieżka jest
GetVolumeInformation(PChar(Buf), VolName, MAX_PATH, @NumerSeryjny, MaxL, FileSysFlags, FileSysName, MAX_PATH);
i:= IntToStr(NumerSeryjny);