1 Topic by easyterm (edited by easyterm 2017-11-14 10:14:22)

  • Registered: 2016-06-29
  • Posts: 36

Topic: Закрыть текущее окно и открыть новое кнопкой с функцией Show record

Как я понял, тут без onClick Event-а не как. Но вот что нужно добавить в окно скрипта дабы сработал close the current form и при этом открылось новое окно мне не понятно. (((

Посоветуйте плез )) что нужно ввести 

procedure frmWo_Button9_OnClick (Sender: TObject; var Cancel: boolean);
begin
тут, что бы закрыть "frmWo" и при этом открыть "Show record"
end;

Заранее огромнейшее спасибо!

Извиняюсь, я не программист но сильно стараюсь.

easyterm's Website

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Закрыть текущее окно и открыть новое кнопкой с функцией Show record

Закрыть не получиться, это противочерит принципу модальных окон. Но можно скрыть и затем когда вызываемая форма закроется, закрыть и форму с которой вызвали. необходимо использовать два события для кнопки с действие ShowRecord

procedure frmWo_Button9_OnClick (Sender: TObject; var Cancel: boolean);
begin
    frmWo.Visible := False;
end;

procedure frmWo_Button9_OnAfterClick (Sender: TObject);
begin
    frmWo.Close;
end;
Dmitry.
  • Registered: 2016-06-29
  • Posts: 36

Re: Закрыть текущее окно и открыть новое кнопкой с функцией Show record

DriveSoft wrote:

Закрыть не получиться, это противочерит принципу модальных окон. Но можно скрыть и затем когда вызываемая форма закроется, закрыть и форму с которой вызвали. необходимо использовать два события для кнопки с действие ShowRecord

procedure frmWo_Button9_OnClick (Sender: TObject; var Cancel: boolean);
begin
    frmWo.Visible := False;
end;

procedure frmWo_Button9_OnAfterClick (Sender: TObject);
begin
    frmWo.Close;
end;

А как можно закрыть активное окно по средствам onClick?

Извиняюсь, я не программист но сильно стараюсь.

easyterm's Website

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Закрыть текущее окно и открыть новое кнопкой с функцией Show record

К сожалению не понял вопроса.

Dmitry.