Delphi reads the data, endures an edit, then add the edit value for the broadcast address of the film,
But found that can't play in the open the new screen, will have to manually enter the address to play,
With adoquery1 do
The begin
close;
SQL. The clear;
SQL. The Add (' select * from KJB where courseware name='" + Label5. The Caption + "' ");
The open;
Edit1. Text:=fieldbyname (' address '). AsString;
end;
Determine if Application. MessageBox ('? ', 'prompt', MB_YESNO)=IDYES then
The begin
Jx. Show;
Jx. ShockwaveFlash1. Movie:="' + edit1. Text + ' ';
End
Want to how to realize the control value to set up the broadcast address of the film?
CodePudding user response:
You haven't specified a good path to the file is played first, what,,,Three "' and this is what meaning,,,
Determine if Application. MessageBox ('? ', 'prompt', MB_YESNO)=IDYES then
The begin
Jx. ShockwaveFlash1. Movie:=edit1. Text;
Jx. Show;
End
CodePudding user response:
And pay attention to the Movie is widestring, if using does not support unicode version, pay attention to the path string coding,