Hallo Delphianer!
Kennt jemand von euch vielleicht eine Möglichkeit, wie man den Namen der CD, der unter Windows erscheint auslesen kann? Es gibt auch einige Angaben über „Interpret“, „Datenvorbereiter“, „Anwendung“, ect., die man bei Brennerprogrammen immer mit angibt. Wie ist an diese Daten ranzukommen?
Dank im vorraus!
Benjamin Meier
Hallo erstmal,
hiermit kann man den Namen einer CD auslesen - oder besser gesagt - von „D:“. Allerdings sollte auch eine CD drin sein, sonst gibt es Probleme.
procedure TForm1.Button1Click(Sender: TObject);
var buffer: Array [0..255] of Char;
buf: DWord;
begin
GetVolumeInformation('d:\', buffer, SizeOf(buffer), nil, buf, buf, nil, buf);
Label1.Caption:= StrPas(buffer);
end;
Ich hoffe, ich helf dir damit.
Gruß Thomas
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]