Как сделать mount

Delphi , ОС и Железо , Kylix

Автор: http://www.swissdelphicenter.ch

{
  The following example shows a Linux-Console application, which mount
  the floppy.
 }

program Project1;

{$APPTYPE CONSOLE}
uses
  Libc;

begin
  if mount('/dev/fd0', '/mnt/floppy', 'vfat', MS_RDONLY, nil) = -1 then
    WriteLn('Mount return : ', Errno, '(', strerror(errno), ')')
  else
    WriteLn('Floppy mounted');
end.

Статья Как сделать mount раздела ОС и Железо Kylix может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

:: Главная :: Kylix ::