PDA

View Full Version : نحوه پشتیبانی از صوت mp3



Mahdiseif
شنبه 10 آبان 1382, 19:59 عصر
سلام بر دوستان

ظاهرا در ویندوز 98 که تازه نصب شده از پخش صوتmp3 پشتیبانی نمیکند. اگر در برنامه هایی که دارای اینگونه صوتهایی است بخواهیم مشکل را حل کنیم میتوانیم کامپوننت و یا یونیتی را اضافه کنیم ؟ و اگر چنین است آیا وجود دارد؟
با کمال سپاس از راهنمایی شما

houshmand
یک شنبه 11 آبان 1382, 05:34 صبح
Xing Player را نصب کن

Mahdiseif
یک شنبه 11 آبان 1382, 22:28 عصر
سلام
یعنی در ستاپ برنامه کل برنامه زینگ را قرار داده و نصب کنم ؟
و یا اینکه مثلا مثل فلش یک player مجزا وجود دارد که کم دردسرتر باشد؟

متشکرم
--

Gladiator
یک شنبه 11 آبان 1382, 22:48 عصر
دوست عزیز شما میتونی از ActiveX ها استفاده کنی .

امروز توی سایت delphi.about.com مقالاتی در این زمینه دیدم . میتونی فایل ocx رو هم توی فایل exe قرار بدی . :mrgreen: یا یه همچین چیزی من دقیق نخوندمش ولی میرم دوباره میخونمو خبرت میکنم .

موفق باشی .

Mahdiseif
دوشنبه 12 آبان 1382, 00:36 صبح
سلام
پیشاپیش تشکر بنده را بپذیرید.

---

Gladiator
دوشنبه 12 آبان 1382, 09:26 صبح
با سلام

توی این مقاله اول روش کار رو توضیح میده بعد فرستادن فایل ocx به exe

1. استفاده از RegSvr32.exe

این شکل فرمان و سوئیچها :


RegSvr32.exe has the following command-line options:

Regsvr32 [/u] [/s] [/n] [/i[:cmdline]] dllname
/s - Silent; display no message boxes
/u - Unregister server
/i - Call DllInstall passing it an optional [cmdline];
when used with /u calls dll uninstall
/n - do not call DllRegisterServer; this option must
be used with /i

این توضیحش :


To call the regsvr32 tool from within Delphi code, you'll need a function that can execute a file and wait for the execution to finish.

این هم کد برنامه برای دلفی :


procedure RegisterOCX;
type
TRegFunc = function : HResult; stdcall;
var
ARegFunc : TRegFunc;
aHandle : THandle;
ocxPath : string;
begin
try
ocxPath := ExtractFilePath(Application.ExeName) + 'Flash.ocx';
aHandle := LoadLibrary(PChar(ocxPath));
if aHandle <> 0 then
begin
ARegFunc := GetProcAddress(aHandle,'DllRegisterServer');
if Assigned(ARegFunc) then
begin
ExecAndWait('regsvr32','/s ' + ocxPath);
end;
FreeLibrary(aHandle);
end;
except
ShowMessage(Format('Unable to register %s', [ocxPath]));
end;
end;

توجه :
the ocxPath variable points to the 'Flash.ocx' Macromedia ActiveX control.

حالا برای باز کردن یک فایل بروی کامپیوتر مقصد :

برای این کار از ExecAndWait استفاده شده :


uses shellapi;
...
function ExecAndWait(const ExecuteFile, ParamString : string): boolean;
var
SEInfo: TShellExecuteInfo;
ExitCode: DWORD;
begin
FillChar(SEInfo, SizeOf(SEInfo), 0);
SEInfo.cbSize := SizeOf(TShellExecuteInfo);
with SEInfo do begin
fMask := SEE_MASK_NOCLOSEPROCESS;
Wnd := Application.Handle;
lpFile := PChar(ExecuteFile);
lpParameters := PChar(ParamString);
nShow := SW_HIDE;
end;
if ShellExecuteEx(@SEInfo) then
begin
repeat
Application.ProcessMessages;
GetExitCodeProcess(SEInfo.hProcess, ExitCode);
until (ExitCode <> STILL_ACTIVE) or Application.Terminated;
Result:=True;
end
else Result:=False;
end;

این مقاله رو هم بخون شاید یه وقت بدردت بخوره . در مورد اجرای فایلها از توی دلفی :

http://delphi.about.com/library/weekly/aa082499.htm

موفق باشی .

Gladiator
دوشنبه 12 آبان 1382, 09:33 صبح
توی این مقاله برای فایل Flash.ocx مثال زده شما میتونی هر ActiveX دلخواهی رو بهمین روش ثبت کنی و به کار بگیری . :mrgreen:

Mahdiseif
دوشنبه 12 آبان 1382, 16:49 عصر
سلام
جناب گلادیاتور عزیز
حسابی شرمنده کردی . بسیار متشکرم : :wink: :oops:

موارد را امتحان میکنم و نتیجه را خدمتت میگم

دوست خوب هم نعمت بزرگی است :D

houshmand
دوشنبه 12 آبان 1382, 17:00 عصر
اگه داخل فایل
win.ini
زیر این عنوان
[mci extensions]
این را اضافه کنید
mp3=MpegVideo


و داخل فایل
system.ini
زیر این عنوان
[mci]
کلیدی مانند زیر که مسیر این فایل dll است اضافه کنید
MpegVideo=D:\PROGRA~1\XING\XINGMP~1\XMDRV95.DLL
فکر کنم دیگر با MediaPlayer دلفی هم بتوانید mp3 پخش کند

البته مطمئن نیستم ولی حدس میزنم :oops:
:idea: راستی این کار را یکی امتجان کند و نتیجه را نیز به من هم بگویید :lol:
این فایل XMDRV95.DLL را هم وقت Xingplayer نصب می شود در مسیر آن می توانید پیدا کننید
البته با توجه به نسخه شما ممکن است یک کم فرق کند

Mahdiseif
سه شنبه 13 آبان 1382, 00:33 صبح
سلام
دوستان اینجا را هم ببینید

http://www.dailymp3.com/programming.html

-------