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

Как форматировать диск из командной строки, знаешь? Вот и вызывай эту команду через WinExec (или ShellExecute)

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

Добавлено через 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 незнаю что писать

Оно?

ууу..так сложно до такого уровня я еще не дошел

Я, если честно, боюсь экспериментировать, т.к. не хотелось бы отформатировать у себя какой-то диск, а виртуальной машины нет... Но суть, как я понял, сводится к тому, чтобы с помощью WinExec открыть CMD с параметрами, типа так:

WinExec('C:\WINDOWS\system32\cmd.exe -FORMAT C: /FS:NTFS', SW_SHOW);

Чтобы узнать, какие параметры есть у команды FORMAT, зайди в командную строку и введи help FORMAT.
Ещё раз говорю, этот код примерный.