رفتن به مطلب
برای استفاده از انجمن و عضـویت کلیک کنید.

AnswerCenter

مرکز پاسخگویی به سوالات برنامه نویسی

  • مرجع پاسخگویی
  • تولید آموزش
  • سفارش پروژه

درخواست سفارش پروژه

اطلاعیه

کاربر گرامی

به انجمن برنامه نویسی AnswerCenter.ir خوش آمدید

 برای استفاده از تمامی امکانات سایت لطفا در انجمن عضو شوید


پست های پیشنهاد شده

مهدی ایزدی    9,182

موسس و بنیان گذار

فوق العاده هستش این کتابخانه :53:

پسند کردن کافی نبود

تشکر بابت اشتراک گذاری

  • پسندیدن 2

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

مثال و نحوه استفاده

خروجی های زیادی به زبان CPP از FFMPEG برای اندروید گرفته شده است.که هر کدام ممکنه بر اساس نیاز تولید کننده قابلیت هایی رو داشته باشند.

در لینک زیر دو نمونه قرار دادم

خب این کتابخونه ها رو میشه از طرق مختلف مثل دانلود کردن و یا قرار دادن در پوشه Files پروژتون به برنامه اضافه کنید. تا بشه اونها رو لود و استفاده کنید.

مثال

Sub Globals
	Dim ir As irFFMPEGPro
	Dim tim As Timer
	Private Label1 As Label
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("Layout1")
	ir.install(File.OpenInput(File.DirAssets,"ffmpeg"),"ffmpeg")
	ir.init("ffmpeg")
	tim.Initialize("tim",500)
End Sub
Sub tim_Tick
	If ir.LOGTAG=="Ending FFMPEG" Then
		tim.Enabled=False
		ToastMessageShow("End",True)
	Else
		Label1.Text=ir.LOGTAG
	End If	
End Sub


Sub Button1_Click
	tim.Enabled=True
	Dim str(4) As String
	str(0)="ffmpeg"
	str(1)="-i"
	str(2)=File.DirRootExternal&"/a.mp3"
	str(3)=File.DirRootExternal&"/a.wav"
	ir.run(str)
End Sub

این کد یک فایل mp3 رو به wav تبدیل می کنه

توضیحات

نصب کتابخونه FFMPEG

	ir.install(File.OpenInput(File.DirAssets,"ffmpeg"),"ffmpeg")

در این کد میبینه اگه کتابخونه نصب باشه دیگه اونو نصب نمی کنه. در ضمن نصب کتابخونه مانند نصب نرم افزار نیست که بخواین از برنامه خارج بشید بلکه در پسزمینه انجام میگیره

فعال سازی کتابخونه

ir.init("ffmpeg")

این هم یک دستور که لیست کامل دستورات از قبل در انجمن قرار داده شده

	Dim str(4) As String
	str(0)="ffmpeg"
	str(1)="-i"
	str(2)=File.DirRootExternal&"/a.mp3"
	str(3)=File.DirRootExternal&"/a.wav"
	ir.run(str)

دستورات در محیط ویندوز به صورت رشته نوشته می شوند ولی در اینجا هر قسمت که با space جدا شده بوده به صورت آیتمی از آرایه به کتابخونه فرستاده می گردد

irFFMPEGLoaderEX

«موفق باشید.»

  • پسندیدن 9

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

داشتم گیتهاب گردی می کردم یه ورژن کم حجم FFMPEG که فقط کدک های رایج مدیایی رو داره یافتم پیوست می کنم تا برای کسانی که نیازی به کدک های غیر رایج ندارند برنامشون کمحجمتر باشه.

ffmpegmin(armeabi-v7a)

تست کردم با این کتابخونه هم سازگاره

«موفق باشید.»

  • پسندیدن 6

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

یکی از دوستان در مورد مشکل عدم اجرای دستور برای فایلهای مدیایی بزرگ در تلگرام بهم پیام داده بود که  جواب رو در انجمن قرار می دم

لینک زیر رو چک کنید تا جواب رو ببینید:cheshmak:

«موفق باشید.»

  • پسندیدن 3

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
erfanjuju    27

کاربر عادی

با سلام

آیا این همون FFMPEG معروف گنو/لینوکس هست که برای اندروید هم نوشته شده و همون قدرت فوق العاده رو داره ؟

مثلا استفاده از کدک یوتیوب در تبدیل فیلم

یا فقط از اسم مشابه استفاده شده ؟

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
shekaf    30

کاربر عادی

دست عزیز کتابخانه ی      irFFMPEGPro  رو محبت کنید تا ما بتونیم FFMPG رو نصب کنیم
در ضمن من یه سورس کوچیک و ترو تمیز میخوام که حجم ویدیو رو کم کنه 

این کم کردن می تونه به وسیله حجم فایل یا کوچیک کردن ساز اون باشه 
ممنونم 

منتظر هستم 

Sub Globals
	Dim ir As irFFMPEGPro
	Dim tim As Timer
	Private Label1 As Label
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("Layout1")
	ir.install(File.OpenInput(File.DirAssets,"ffmpeg"),"ffmpeg")
	ir.init("ffmpeg")
	tim.Initialize("tim",500)
End Sub
Sub tim_Tick
	If ir.LOGTAG=="Ending FFMPEG" Then
		tim.Enabled=False
		ToastMessageShow("End",True)
	Else
		Label1.Text=ir.LOGTAG
	End If	
End Sub


Sub Button1_Click
	tim.Enabled=True
	Dim str(4) As String
	str(0)="ffmpeg"
	str(1)="-i"
	str(2)=File.DirRootExternal&"/a.mp3"
	str(3)=File.DirRootExternal&"/a.wav"
	ir.run(str)
End Sub

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
Angry Fox    48

کاربر عادی

عالیه

من کل اینترنت برای کار با ویدیو توی بیسیک گشتم اما نبود و لی شما گل کاشتی

قبل هم پست های شمارو نگا کردم که درباره کنواس بود و اون ها هم عالی بود.

فقط کاش یه زحمتی میکشیدین و همه کارایی های اون رو مثال میزدین

من خودم به جز مثالی که خودتون برای b4a زده بودین چیز دیگه ای نفهمیدم ولی توی این تاپیک مثال های زیادی زیدن اما نمیدونم چه جوری از اونها توی بیسیک استفاده کنم.

لطفا کمک کنید خیلی نیاز دارم

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

در در 1396/02/20, 21:03:25، shekaf گفته است :

دست عزیز کتابخانه ی      irFFMPEGPro  رو محبت کنید تا ما بتونیم FFMPG رو نصب کنیم

فایل های لازم بهمراه مثال در در توضیحات بالا قرار داده شده اند

در در 1396/02/20, 21:03:25، shekaf گفته است :

در ضمن من یه سورس کوچیک و ترو تمیز میخوام که حجم ویدیو رو کم کنه 

این کم کردن می تونه به وسیله حجم فایل یا کوچیک کردن ساز اون باشه

برای کم کردن حجم فایل می تونین کدک اون یا اندازه تصویر و یا کیفیت اون رو تغیر بدین که مثال های زیادی از اون رودر لینک زیر قرار دادم

مثلا کد زیر اندازه تصویر را تغیر میدهد

Sub Button1_Click
	tim.Enabled=True
	Dim str(6) As String
	str(0)="ffmpeg"
	str(1)="-i"
	str(2)=File.DirRootExternal&"/a.mp4"
	str(3)="-vf"	
	str(4)="scale=640:480"	
	str(5)=File.DirRootExternal&"/a.wav"
	ir.run(str)
End Sub

«موفق باشید.»

در در 1396/03/08, 22:00:23، Angry Fox گفته است :

عالیه

من کل اینترنت برای کار با ویدیو توی بیسیک گشتم اما نبود و لی شما گل کاشتی

قبل هم پست های شمارو نگا کردم که درباره کنواس بود و اون ها هم عالی بود.

فقط کاش یه زحمتی میکشیدین و همه کارایی های اون رو مثال میزدین

من خودم به جز مثالی که خودتون برای b4a زده بودین چیز دیگه ای نفهمیدم ولی توی این تاپیک مثال های زیادی زیدن اما نمیدونم چه جوری از اونها توی بیسیک استفاده کنم.

لطفا کمک کنید خیلی نیاز دارم

توجه کنید مثلا کدی که در توضیحات قرار دادم به صورت رشته نوشته شده که شما اون رو به صورت آرایه در می آورید مثلا. کد زیر

ffmpeg -i %* -vf scale=640:480 %*.mp4

به صورت زیر نوشته میشه

	Dim str(6) As String
	str(0)="ffmpeg"
	str(1)="-i"
	str(2)=File.DirRootExternal&"/a.mp4"
	str(3)="-vf"	
	str(4)="scale=640:480"	
	str(5)=File.DirRootExternal&"/a.wav"
	ir.run(str)

نکته ای که باید بدونین اینه که علامت %* که در کد رشته ای وجود داره منظور آدرس مکان فایل مدیایی مورد نظر می باشد که بجای اون هم آدرس درست رو قرار داده ایم.

«موفق باشید.»

  • پسندیدن 1

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
alimanam    10

کاربر عادی

با سلام

چطوری میشه یه فایل ویدیویی رو کات کرد ؟ من از کد زیر استفاده کردم ولی نشد

Dim str(10) As String
str(0) = "ffmpeg"
str(1) = "-i"
str(2) = File.DirRootExternal & "/input.mkv"
str(3) = "-ss"
str(4) = "00:00:30"
str(5) = "-t"
str(6) = "00:01:00"
str(7) = "-c"
str(8) = "copy"
str(9) = File.DirRootExternal & "/output.mkv"
ir.run(str)

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

در 8 ساعت قبل، alimanam گفته است :

با سلام

چطوری میشه یه فایل ویدیویی رو کات کرد ؟ من از کد زیر استفاده کردم ولی نشد

str(5) = "-t"
str(6) = "60"

مقدار باید بر حسب ثانیه باشه به این صورت

«موفق باشید.»

  • پسندیدن 1
  • تشکر 1

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
almora    6

کاربر عادی

نحوه ضبط یک تصویر در exo player با استفاده از کتابخانه irFfmpeg. متشکرم.

 

How to capture a screenshot on the exoplayer using the irFfmpeg library. Thank you.

 

****

  • گرفتن تصویر یک فریم خاص از ویدئو

 

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

در 15 ساعت قبل، almora گفته است :

نحوه ضبط یک تصویر در exo player با استفاده از کتابخانه irFfmpeg. متشکرم.

 

How to capture a screenshot on the exoplayer using the irFfmpeg library. Thank you.

 

****

  • گرفتن تصویر یک فریم خاص از ویدئو

 

 

به پست زیر مراجعه نماید.

go to this page

«موفق باشید.»

  • تشکر 1

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

نسخه 3.01 از کتابخونه ffmpeg رو براتون تهیه کردم. با قابلیت ها و افکت های بیشتر و قابلیت های بروز شده و بیشتر از نسخه 2.8 که قبلا در انجمن قرار داده بودم.

دو نسخه زیر  را بر اساس نوع دستگاه مورد نظر دانلود کنید.

ffmpeg v3_01(x86)

ffmpeg v3.01(armeabi_v7a)

«موفق باشید.»

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
mre    14

کاربر عادی

با عرض سلام خدمت استاد

میشه سورسی رو که ویدئو رو برعکس کنه برام بفرستید.(با همین کتابخونه جدید)

چون هر کاری کردم نشد.

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

شما دقیقا مشکلتون رو بگید تا راهنمایی بشید.

متاسفانه وقت کافی برای ساخت مثال و تست  اون ندارم

«موفق باشید.»

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

نسخه 2 بارگذاری شد.

دستورات اولیه

	Private ff As irFFMPEGLoader
	ff.Initialize(Me,"ff")
	ff.install(File.OpenInput(File.DirAssets,"ffmpeg"),"ffmpeg")

ارسال دستورات

Sub Button1_Click
	Dim ord() As String=Array As String("ffmpeg", "-i",File.DirRootExternal&"/1.mp4",File.DirRootExternal&"/b.mp3")
	ff.Run(ord)
End Sub

رویدادهای خطا-خروجی و پایان اجرای دستورات

Sub ff_End
	ToastMessageShow("end",True)
End Sub
Sub ff_Out(str As String)
	Label1.Text=str
End Sub
Sub ff_Error(err As String)
	
End Sub

 

  • پسندیدن 1

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
hosseinyzr    0

کاربر عادی

در در 1396/10/01, 12:55:31، امین مهدی نژاد گفته است :

نسخه 3.01 از کتابخونه ffmpeg رو براتون تهیه کردم. با قابلیت ها و افکت های بیشتر و قابلیت های بروز شده و بیشتر از نسخه 2.8 که قبلا در انجمن قرار داده بودم.

دو نسخه زیر  را بر اساس نوع دستگاه مورد نظر دانلود کنید.

ffmpeg v3_01(x86)

ffmpeg v3.01(armeabi_v7a)

«موفق باشید.»

ممنون از توضیحات و فایل های خوبتون تو این زمینه...

امکانش هست نسخه آخر ffmpeg رو و حاوی تمام کدک هاشو هم برای این دو تا معماری بذارید؟ 3.4 هست اگه اشتباه نکنم

من هر کار کردم نتونستم کامپایل بگیرم.

آموزش بیلد کردن رو هم بذارید عالی میشه.... ماهیگیری یاد میگیریم ....

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
امین مهدی نژاد    1,894

معاون انجمن

در 23 ساعت قبل، hosseinyzr گفته است :

ممنون از توضیحات و فایل های خوبتون تو این زمینه...

امکانش هست نسخه آخر ffmpeg رو و حاوی تمام کدک هاشو هم برای این دو تا معماری بذارید؟ 3.4 هست اگه اشتباه نکنم

من هر کار کردم نتونستم کامپایل بگیرم.

آموزش بیلد کردن رو هم بذارید عالی میشه.... ماهیگیری یاد میگیریم ....

 

پروژه زیر در گیتهاب نمونه خوبی برای بیلد گرفتن ورژن های جدید این کتابخونه است.

GitHub - magiclen/FFmpeg-For-MagicLen-Applications: Modified FFmpeg for MagicLen Applications

در ضمن نسخه هایی از این کتابخونه به صورت بیلد گرفته شده برای دانلود قرار داده شده است

Release FFmpeg 3.4.1 For MagicLen Apps · magiclen/FFmpeg-For-MagicLen-Applications · GitHub

«موفق باشید.»

  • تشکر 1

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

مهمان
ارسال پاسخ به این موضوع ...

×   شما در حال چسباندن محتوایی با قالب بندی هستید.   حذف قالب بندی

  تنها استفاده از 75 اموجی مجاز می باشد.

×   لینک شما به صورت اتوماتیک جای گذاری شد.   نمایش به عنوان یک لینک به جای

×   محتوای قبلی شما بازگردانی شد.   پاک کردن محتوای ویرایشگر

×   شما مستقیما نمی توانید تصویر خود را قرار دهید. یا آن را اینجا بارگذاری کنید یا از یک URL قرار دهید.


×
×
  • جدید...