[Ivan_009]

интересует как вывести только кнопку "закрыть"? »

Dodakaedr, Пример:

Код:

function GetClassLong(Wnd: HWnd; Index: Integer): Longint; external 'GetClassLongA@user32.dll stdcall';
function SetClassLong(Wnd: HWnd; Index: Integer; NewLong: Longint): Longint; external 'SetClassLongA@user32.dll stdcall';

procedure Close;
begin
  SetClassLong(Wizardform.Handle, -26, GetClassLong(Wizardform.Handle, -26) or $200);
end;

procedure InitializeWizard;
begin
  Close;
  WizardForm.Position:= poScreenCenter;
end;