Delphi USB Stick erkennen

Thema durchsuchen

Ansicht

Themen-Optionen

USB Stick erkennen

Ein Thema von Jelly · begonnen am 28. Feb 2004 · letzter Beitrag vom 10. Apr 2012

Vorheriger Beitrag

Nächster Beitrag

DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.656 Beiträge

Delphi 12 Athens

#11

Re: USB Stick erkennen

12. Nov 2008, 16:00

markieren

Delphi-Quellcode:

			type TFenster = class(TForm)

  ...

private

  procedure WMDeviceChange(var Msg: TMessage); message WM_DEVICECHANGE;

  ...

end;

Wobei Du "TFenster" natürlich durch den Namen Deiner Form ersetzen musst. Im implementation-Teil der Unit dann halt den Code von oben (mit ersetztem Pan

) einsetzen.

Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen