AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

CD

Ein Thema von ByStones2 · begonnen am 6. Okt 2005 · letzter Beitrag vom 7. Okt 2005
Antwort Antwort
ByStones2

Registriert seit: 6. Okt 2005
Ort: Birenbach
133 Beiträge
 
Turbo Delphi für Win32
 
#1

CD

  Alt 6. Okt 2005, 17:59
HI,

wie kann ich überprüfen ob eine bestimmte CD im laufwerk liegt ???
überprüfung soll nach name der CD ausgehen.
  Mit Zitat antworten Zitat
Ratte

Registriert seit: 12. Dez 2003
Ort: Erfurt
345 Beiträge
 
Delphi 2005 Personal
 
#2

Re: CD

  Alt 6. Okt 2005, 19:15
Probier mal ob das mit CDs funzt: http://www.dsdt.info/tipps/?id=149
Ratte
Schiffsratte der U.S.S. Delphipraxis, Laderaum 4538
BUSH:= TTerminator.create;
  Mit Zitat antworten Zitat
Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
 
Delphi 12 Athens
 
#3

Re: CD

  Alt 6. Okt 2005, 20:36
Ansonsten kümmere Dich bitte darum, dass Du etwas aussagekräftigere Titel nutzt. "CD" kann vieles sein

......
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat
Benutzerbild von RavenIV
RavenIV

Registriert seit: 12. Jan 2005
Ort: Waldshut-Tiengen
2.875 Beiträge
 
Delphi 2007 Enterprise
 
#4

Re: CD

  Alt 7. Okt 2005, 08:16
vermutlich trifft eher dieses zu:
Datenträger in Laufwerk
Klaus E.
Linux - das längste Text-Adventure aller Zeiten...
Wer nie Linux mit dem vi konfiguriert hat, der hat am Leben vorbei geklickt.
  Mit Zitat antworten Zitat
StefanW

Registriert seit: 22. Okt 2004
Ort: Treuen
25 Beiträge
 
Delphi 7 Enterprise
 
#5

Re: CD

  Alt 7. Okt 2005, 19:55
zum Prüfen auf eine "bestimmte" CD würd ich den Befehl "GetVolumeInformation" bevorzugen... besser wäre allerdings wenn du die Seriennummer der CD prüfst. diese ist nur bei sehr wenigen CD gleich, und nicht beeinflussbar (soweit ich weiß).

etwa sowas hier:
Delphi-Quellcode:
Function TLaufwerkInfo.ASN;
Var
    Dummy: DWORD;
    Buffer: Array[0..MAX_PATH] Of Char;
    nummer: DWORD;
Begin
    Try
        GetVolumeInformation(PChar(Self.FLW), Buffer, SizeOf(Buffer), @nummer, Dummy, Dummy, Nil, 0);
        Result := IntToStr(nummer);
    Except
        Result := 'unbekannt';
    End;
End;
Hoffe geholfen zu haben
Tschau Stefan
Stefan W.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:51 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz