Unit DiskEject |
------------------------------------------------------------------ TDiskEject Component for Delphi ------------------------------------------------------------------ (c) 1998 Daniel Polistchuck ZIP AND JAZ Disks & Drives are copyrighted by IOMEGA ------------------------------------------------------------------ This source code is freeware, feel free to use it as you wish - either commercially or not. The author shall not be held responsible for any damage made by the use or misuse of this software material. Please, if any changes or corrections are made, send me a copy at danpol@pobox.com. ------------------------------------------------------------------ Observations: -Ejects Removable disks (ZIP,JAZ,etc.) -Um abraço para a galera Delphizera do Brasil! (this is in portuguese and is a salute to the Delphi programmers from Brazil). -Not tested under NT. Should work, though. -While manipulating in design-time the Ejected property in the Object Inspector will only reflect the true state of the disk if you de-select then reselect the property after changing it from false to true. THIS PROBLEM OCCURS ONLY IN DESIGN-TIME, TOUGH. ------------------------------------------------------------------ Version history: v1.0 - first public release
Classes |
Functions |
Register -
Types |
Constants |
Variables |
Functions |
Types |
Constants |
Variables |