Delphi Forms

[drama22]

hi , i have two forms first form have a button to call the second form like this

Delphi-Quellcode:

 secondform.FormStyle := fsStayOnTop;
 secondform.Show;

the second form have a embeddedwb with youtube player my problem is if i close the second form when youtube is playing it doesn't stop playing the youtube video until i close the whole application any solve for this ?

[Der schöne Günther]

Since you posted no details, we don't have the slightest clue how that "youtube player" works.

You will have to implement an event handler for OnClose on your second form and make sure the video is properly shut down.

[drama22]

Zitat von Der schöne Günther:

Since you posted no details, we don't have the slightest clue how that "youtube player" works.

You will have to implement an event handler for OnClose on your second form and make sure the video is properly shut down.

i tried to do somthing like that

Delphi-Quellcode:

procedure secondform.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  embeddedwb.AssignEmptyDocument;
  embeddedwb.Free;
end;

procedure secondform.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := True;
  Self.Hide;
end;

thats close the video and its sound but i cant open it again until i close the whole app and re open it

note i load youtube player inside tembeddedwb

[Sherlock]

Well, if you destroy the player, and reuse the form, without recreating it...how should the player do its work?

Either don't free the player and just try stopping the video or recreate the player when the form is shown agein.

Sherlock

[drama22]

Zitat von Sherlock:

Well, if you destroy the player, and reuse the form, without recreating it...how should the player do its work?

Either don't free the player and just try stopping the video or recreate the player when the form is shown agein.

Sherlock

is there example on how to stop the player on close ?

[Sir Rufo]

I would have expected that embeddedwb.AssignEmptyDocument; should do the job to stop.

[drama22]

Zitat von Sir Rufo:

I would have expected that embeddedwb.AssignEmptyDocument; should do the job to stop.

You saved Me Many Thanks for help i wouldn't note this without you thanks

[Sir Rufo]

Zitat von drama22:

Zitat von Sir Rufo:

I would have expected that embeddedwb.AssignEmptyDocument; should do the job to stop.

yes but cant recreate it if i want to click the form again how do i recreate it after its assign to empty

Why "recreating"?

The problem before was embeddedwb.Free; , because it will free the embeddedwb instance. So get rid of that free and just AssignEmptyDocument .

Delphi-Quellcode:

procedure secondform.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  embeddedwb.AssignEmptyDocument;
  // I must not destroy my toys if I want to play again with
  // embeddedwb.Free;
end;

[Dejan Vu]

Why should we always use 'FreeAndNil' instead of 'Free'?