مشکل لود فونت و چند مشکل دیگر

[bahman 165]

خب دوستان اولین بار ک اومدم انجمن گفتین برم یاد بگیرم منم اطاعت امر کردم

یاد گرفتم ولی خطاهایی میبینم ک نمیدونم چین و چجوری رفعش کنم

اولیش خطایی هست ک تصویرشو پیوست کردم

بعدی اینکه چطور تو کل پروژه یک موزیکی به عنوان پس زمینه بزارم که از تنظیمات نرم افزارم بشه موزیکو قطع وصل کرد ....

حالا تنها لودم باشه کارمو راه میندازه

[bahman 165]

مشکل بعدیم دوستان اینه که متنو از دیتابیس فرا خوندم منتها دقت کنین حاشیه ها درسته منتها متن از حاشیه ها میره تو اولش و دیده نمیشه

[مهدی ایزدی 9,203]

درود.

قسمت اول: bnazanin فونت هست؟ اگه از فونتش استفاده کردید:

1- فونت رو از Files هم اضافه کردید (Add کردید در پروژه؟)

2- کد مربوطش رو هم بزارید شاید کد رو اشتباه زدید

در مورد قسمت دوم هم باید بگم خب label رو اینجوری تنظیم کنید در Designer Scripts :

Label1.SetLeftAndRight(2%x,98%x)

در مورد پخش موزیک هم:

http://answercenter.ir/thread776.html

http://answercenter.ir/thread263.html

http://answercenter.ir/thread188.html

[bahman 165]

matn.Typeface = Typeface.LoadFromAssets(File.readstring(File.DirInternal,"FontType.txt")&".ttf")

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

کد بالا برا نوع فونت هست

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

Sub Activity_Create(FirstTime As Boolean)
   'Do not forget to load the layout file created with the visual designer. For example:
   Activity.LoadLayout("Matlab")
   Dim Cur As Cursor
   Cur = Home.SQL1.ExecQuery("SELECT * FROM mytable  WHERE id="&Home.meghdar)
   matn.Initialize("")
   matn.Gravity = Gravity.Right
   ScrollView1.Panel.AddView(matn,0,0,100%x,100%y)
   ts.Initialize
   For i = 0 To Cur.RowCount-1
   Cur.Position = i
   matn.Text = Cur.GetString("matn")
   Next
   matn.Typeface = Typeface.LoadFromAssets(File.readstring(File.DirInternal,"FontType.txt")&".ttf")
   ts.LongText (matn,matn.Text,File.readstring(File.DirInternal,"FontType.txt"),ScrollView1,File.ReadString(File.DirInternal,"lineheight.txt"))
End Sub

[آوای دل 38]

درود.

قسمت اول: bnazanin فونت هست؟ اگه از فونتش استفاده کردید:

1- فونت رو از Files هم اضافه کردید (Add کردید در پروژه؟)

2- کد مربوطش رو هم بزارید شاید کد رو اشتباه زدید

در مورد قسمت دوم هم باید بگم خب label رو اینجوری تنظیم کنید در Designer Scripts :

Label1.SetLeftAndRight(2%x,98%x)

در مورد پخش موزیک هم:

http://answercenter.ir/thread776.html

http://answercenter.ir/thread263.html

http://answercenter.ir/thread188.html

 

 

لینک ها خرابه

[bahman 165]

ضمنا اساتید استفاده از دکمه تشکر رو به جای تشکر لفظی ک منجر ب شلوغی پستم میشه قبول کنند

هرچند ک هرچقدر از این بزرگوارا تشکر شه بازم کمه

[مهدی ایزدی 9,203]

ممنون . این سوال رو جواب ندادید: خود Font رو هم Add کردید در پوشه Files ؟؟؟

[Elyas Erfani 3,582]

سلام

 

واسه اجرای یک اهنگ در پس زمینه برنامه

 

ابتدا در

Sub Globals 

 

 

Dim a As MediaPlayer

 

و بعد موسیقی مورد نظرتونو از قسمت Add Files داخل بیسیک ادد کنید

و در قسمت  Activity_Create

a.Initialize
a.Load(File.DirAssets , "Reza Pishro Ft Farid - Eshtebahe Mahz [128].mp3")
a.Play

اینجا اسم اهنگم اون رضا پیشرو بود

 

و واسه Stop کردن اهنگ هم در ساب یک دکمه بنویسید :

 

 

a.Stop

و واسه Pause کردن هم :

a.Pause

موفق باشید

[bahman 165]

ممنون . این سوال رو جواب ندادید: خود Font رو هم Add کردید در پوشه Files ؟؟؟

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

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

مشکل فونت حل شد

    ts.LongText (matn,matn.Text,File.readstring(File.DirInternal,"FontType.txt"),ScrollView1,File.ReadString(File.DirInternal,"lineheight.txt"))

که باید میشد

    ts.LongText (matn,matn.Text,File.readstring(File.DirInternal,"FontSize.txt"),ScrollView1,File.ReadString(File.DirInternal,"lineheight.txt"))

اما هنوز اون حاشیه متن حل نشده مشکلش ...

[پژمان نیکروان 6,055]

این تاپیک خیلی قدیمیه.

الیاس جان شما هم مثل اینکه اشتباهن اموزش پخش آهنگ رو گذاشتید تو این تاپیک

دوستان دیگه هم اگه سوال دارن توی تاپیک جدا مطرح کنند.

[نیما قبادی 246]

سلام ..

ببیند شما بیاد اینکارو بکنید

Sub Globals
Dim myfont As Typeface
End Sub

و بعد تو قسمت اکتیوتی کریت

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("m2")
   myfont = Typeface.LoadFromAssets("byekan.ttf")
Label1.Typeface=myfont
End Sub

شما میاید اینجوری میخونیدش( فکرکنم یادم رفته*خنده*)*عطسه*

[bahman 165]

مشکل فونت حل شد شکر خدا

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

فقط یک سوال دوستان من لیستام از دیتابیس خونده میشه

یعنی هم عنوان هم متنش

چجوری میتونم فونت عنوان رو یه فونت خاص بزارم ک تو پوشه پروژم هستش اون فونت

تصویرو پیوست کردم فونت اون قسمت رو میخوام

[نیما قبادی 246]

مشکل فونت رو

بهتون گفتم دوست عزیز یه ذره برید بالا میبینید!!!

[bahman 165]

مشکل فونت رو

بهتون گفتم دوست عزیز یه ذره برید بالا میبینید!!!

داداش منم گفتم حل شد مشکل از کد خودم بود ک جای فونت سایز زده بودم فونت تایپ

[نیما قبادی 246]

من جواب این رو دادم !!*چشمک*

فقط یک سوال دوستان من لیستام از دیتابیس خونده میشه 
یعنی هم عنوان هم متنش
چجوری میتونم فونت عنوان رو یه فونت خاص بزارم ک تو پوشه پروژم هستش اون فونت

[bahman 165]

من جواب این رو دادم !!*چشمک*

فقط یک سوال دوستان من لیستام از دیتابیس خونده میشه 
یعنی هم عنوان هم متنش
چجوری میتونم فونت عنوان رو یه فونت خاص بزارم ک تو پوشه پروژم هستش اون فونت

پس شرمنده من اونو اصلا یادم نبود

خیلی خیلی معذرت میخوام

[نیما قبادی 246]

ن خواهش میکنم...*چشمک**خنده*

[bahman 165]

اینم جواب نداد

[نیما قبادی 246]

اشکال نداره دوست عزیز یکم صبر کنید درستش میکنم

[bahman 165]

منتظرم

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

[bahman 165]

فکر کنم مشکل حاشیه هم درست شد

الان میمونه پس زمینه و فونت قسمتی ک گفتم

اینجا مثلا نمیشه مثل وب با یک کد خط موزیک پس زمینه رو برای اجرا فراخوند؟ البته زیادم مهم نیست ....

فقط دوستان من سرچم کدش اینه تنها تو عنوان میگرده

Sub Search_TextChanged (Old As String, New As String)
   Dim cur As Cursor
   cur = SQL1.ExecQuery("SELECT * FROM mytable WHERE list LIKE '%" & Search.Text & "%'")
   List_matlab.Clear
   For i = 0 To cur.RowCount-1
       cur.Position = i
       List_matlab.AddSingleLine2(cur.GetString("list"),cur.GetInt("id"))
   Next
   cur.Close
End Sub

این رو چجوری میشه کاری کرد که 2تا چک باکس بزارم کاربر تعین کنه ک تو متن بگرده یا عنوان و بعد انتخاب کلمه مورد نظرشو براش فرا بخونه

خیلی سرتون رو درد اوردم