Форматирование винта на языке делфи, Создать программу форматирования жесткого диска Опции

[dron4ik]

Всем привет.Хочу написать прогу с помощью которой можно форматировать жесткиий диск.Незнаю как это осуществить

[dron4ik]

я незнаю как это осуществить...т.е. на кнопке?

Добавлено через 4 мин.
т.е. я хочу чтобы форматирование происходило засчет нажатие на кнопку. т.е.нужно использовать через вызов команды форматирование через WinExec (или ShellExecute), но как это сделать не имею представления

Добавлено через 1 мин.

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin

end;

end.

Добавлено через 55 сек.
между begin и еnd незнаю что писать