Pagina Iniziale | Preferiti Comunity: Login | Registrati | Newsletter | Forum | Concorsi Newsgroup
Canali: Hardware | Software | Files | Webmaster | Cellulari | Shop
Nel sito: News | Articoli | Files | Manuali | Consigli PC | Schede cellulari | Programmaz. | Hosting | Motori Ricerca | Glossario | Link
Servizi: Shopping | Forum | Crea un BLOG | Cartucce Compatibili | Tool News |   Sponsor: Automazione Industriale
  Articoli

Recensioni
Consigli per PC


  News e files

Software
Telefonia
Internet
Tecnologia
Files e Download


  Manualistica

Guide HW/SW
Scripts ASP
Scripts HTML
Scripts Java
Scripts Delphi
Glossario


  Shopping

Hardware
Software e Giochi
Elettronica
Cinema e Film
Console e Accessori
Prodotti Ufficio
Formazione e Corsi

Tieniti aggiornato sul mondo della tecnologia con la nostra newsletter!
La tecnologia sulla tua
casella e-mail

[Info Newsletter]


Concessionaria Pubblicitaria

<< News Precedente [Fine Pagina] News Successiva >>
Verificare se il Drive "A:" è pronto

Un articolo di: Criest del 24/11/2002      Letture: 12389

Introduzione:
Attravero questo TISP Delphi, potete controllare se il Driver "A:" è pronto. Il codice è riportato qui sotto:
Codice:

function DiskInDrive(const Drive: Char): Boolean;
var DrvNum: Byte;
    EMode: Word;
begin
  Result := False;
  DrvNum := Ord(Drive);
  if DrvNum >= Ord('a') then 
    Dec(DrvNum, $20);
  EMode := SetErrorMode(SEM_FAILCRITICALERRORS);
  try
    if DiskSize(DrvNum-$40) <> -1 then
      Result := true
    else
      MessageBeep(0);
  finally
    SetErrorMode(EMode);
  end;
end;



[Indietro]    [Su]      [Home]      [Commenti]      [V. Stampabile]

Commenta questa notizia:
Non hai ancora fatto il
Login, puoi inserire commenti solo come anonimo.
ATTENZIONE: il tuo IP verrà memorizzato e mostrato a fianco del commento; con la pressione del tasto invia commento si esprime il consenso alla pubblicazione di tale informazione personale.
A discrezione dello staff, i commenti ritenuti non adatti od offensivi potranno essere rimossi. Nel caso di utilizzo di espressioni volgari od offensive il comportamento verrà segnalato al provider interessato.
Se non ti sei ancora registrato, cosa aspetti? Registrati subito.

Da ora puoi discutere dei problemi informatici anche sul nostro FORUM

Testo del commento:


  News correlate
 Array e matrici dinamiche
 Finestra "Trova file o cartella"
 Verificare se il Drive "A:" è pronto
 Leggere e scrivere lo stato della tastiera
 Usare il registro di Windows
 Quake2 da Visual C a Delphi
 Percorso dell'applicazione
 Disabilitare i tasti Alt+Tab e Ctrl+Esc
  Ultime dal Forum

sample essay benefits computer
baylor graduate school dissertation
free economics homework help
interest and career goals essay
in the heat of the night movie essay
buy discount casadei online Manolo Blahnik Green Snake Driver Flats
essay on eid ul azha in urdu
dar american history essay
sample admissions essays harvard

Comunicazioni / Note Legali / Staff / Collabora / Pubblicità / Privacy / Contatti


Triboo Media s.r.l. (società socio unico) - Viale Sarca 336 - Edificio 16, 20126 Milano (MI) Cap. Soc. 1.250.000,00 euro i.v. - P.IVA, C.F. e CCIAA di Milano IT06933670967 - REA MI-1924178 tel. +39 02 64741470 - fax +39 02 64741494 Società sottoposta alla direzione e coordinamento di TRIBOO SPA - all rights reserved CAP. SOC. EURO 28.740.210 I.V. - P.IVA 02387250307 - COD. FISC. e numero iscrizione al registro delle imprese CCIAA MI : 02387250307 tel.+39 02 64741401 - fax + 39 02 64741491. Utenti Connessi: 244


Pagina creata in 0,09sec. Powered by JuiceADV S.r.l.

Stats v0.1 (0,000sec.)