Link to home
Avatar of rowisoft
rowisoft

asked on

MCISendString

Hy!

In my old Programming-laguage I know "MCI" for Playing music, videos and so on... To play a video was the command:

MCISend$("OPEN C:\VIDEO.AVI TYPE AVIVIDEO ALIAS FILM")
MCISend$("PLAY FILM")
MCISend$("CLOSE FILM")

So I know a little bit of MCI. But how to use this MCI in Delphi??
In the Windows-SDK-Helpfile I saw the command "MCISendString", I think that's the right command. But how to use this command in Delphi?? I'm a bit new in Delphi so I don't know about "handles" and so on...
Please give an example

bye

Robert
Avatar of Epsylon
Epsylon

Why don't you use TMediaPlayer?

You can find it under the System tab.
Add a TMediaPlayer and a TPanel to your form. Choose a file for TMediaPlayer.Filename, set TMediaPlayer.Display to the Panel and set AutoOpen to true. Now run and play...
ASKER CERTIFIED SOLUTION
Avatar of arkamax
arkamax

Blurred text
THIS SOLUTION IS ONLY AVAILABLE TO MEMBERS.
View this solution by signing up for a free trial.
Members can start a 7-Day free trial and enjoy unlimited access to the platform.
See Pricing Options
Start Free Trial
Avatar of rowisoft

ASKER

Adjusted points from 100 to 110
Hy!

Arkamax your answer is good, but I can't use ist!!
Epsylon, I don't want to use the TMediaPlayer, because if I make it with MCI I can put a text over the Video on TMediaPlayer I can't do that and in MCI I can record a WAV File and do something more!

Arkamax, how to declare the function you've written?? If I put this commandy in my Delphi code it don't go! To do "ShellAPI" to uses didn't help!
Hope to hear from you!

Robert Wismet
hi,
you should add "mmsystem" to your uses section then you can use
MCISendString(blah);
MCISendString(blah);
 etc..
The sing we need is some place we can find all the commands of MCISendString.
Is some one know a web address of a place as that?
Comment accepted as answer
Sorry, inthe!

I give the points to arkamax! But you've helped, too!
Hope this is OK for you...

bye

Robert
Thanks for the points!