[Adrenalin666]

Код:

procedure TForm1.N1Click(Sender: TObject);
begin
AboutBox6:=TAboutBox6.Create(Owner);
end;

почему не работает

[v1s2222]

Код:

AboutBox6:=TAboutBox6.Create(Self);
AboutBox6.Visible := True;

Так же место Self можешь писать, как ты и написал Owner.

[Adrenalin666]

Код:

procedure TAboutBox6.OKButtonClick(Sender: TObject);
begin
  inherited;
        ModalResult := mrOk;
end;

и закрыть это окно по кнопке хочу но не работает

[v1s2222]

А чем Close не подходит?
ЗЫ можно так же Halt(), Applicatiom.Terminate... (ну это если надо закрыть всю программу сразу)

[Adrenalin666]

тоесть как закрыть

[Adrenalin666]

мне собственно только это окно