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

آموزش ساخت بازی اندروید+پکیج های تخصصی

در گیم اور، همیشه حق با مشتری است و در صورت نارضایی با هم به توافق می رسیم.
--
تمام اعمالی که انجام می دهیم، حتی اگر ذره ای و مثقالی باشد، به خودمان باز می گردد و بازتابش آنها را در زندگی خواهیم دید. زلزال ۷
او کسی است که (روح) شما را در شب (به هنگام خواب) میگیرد; و از آنچه در روز کرده ‏اید، با خبر است; سپس در روز شما را (از خواب) برمیانگیزد; و (این وضع همچنان ادامه مییابد) تا سرآمد معینی فرا رسد; سپس بازگشت شما به سوی اوست; و سپس شما را از آنچه عمل میکردید، با خبر میسازد. انعام ۶۰
دلها به یاد خدا آرام میگیرد. رعد آیه ۲۷
بدانید زندگی دنیا تنها بازی و سرگرمی، و تجمل پرستی و تفاخر در میان شما و افزون طلبی در اموال و فرزندان است . حدید آیه ۲۰
آن خدایی که آدمی را از خون بسته (که تحول نطفه است) بیافرید.
بخوان و (بدان که) پروردگار تو کریم‌ترین کریمان عالم است.
آن خدایی که بشر را علم نوشتن به قلم آموخت.
به آدمی آنچه را که نمی‌دانست تعلیم داد.
راستی که انسان سرکش و مغرور می‌شود.
چون که خود را در غنا و دارایی ببیند. علق ۲- ۷
این زندگانی چند روزه دنیا افسوس و بازیچه‌ای بیش نیست، عنکبوت ۶۴
در روی زمین به تکبر راه مرو که نمی توانی زمین را بشکافی و هرگز قامتت به بلندای کوهها نمی رسد. اسراء ۳۷
در آنچه خداوند بر تو بخشیده است، سرای آخرت را بجوی و سهم خود را از دنیا فراموش مکن و همانگونه که خدا به تو نیکی کرده است نیکی کن و هرگز فساد در زمین منما که خدا مفسدان را دوست ندارد. قصص ۷۷
و هرگاه نعمت و رحمتی به انسان بچشانیم و سپس آن را از او برگیریم او مأیوس و نومید میشود و به کفران و ناسپاسی بر میخیزد. هود ۹
بندگان مرا آگاه ساز که من بسیار آمرزنده و مهربانم. حجر ۴۹
از رحمت خدا نا امید مباشید که جز کافر هیچ کس از رحمت خدا نا امید نیست. یوسف ۸۷
پس به یاد من باشید تا به یاد شما باشم. بقره ۱۵۲
زندگانی دنیا چیزی جز متاع فریبنده نیست . آل عمران ۱۸۵
از آنچه به شما روزی داده ایم پیش از آنکه روزی فرا رسد که نه معامله ای وجود دارد و نه دوستی و شفاعت ، انفاق کنید. بقره ٢۴۵
بسا چیزی را ناخوش داشته باشید که آن به سود شماست و بسا چیزی را دوست داشته باشید که به زیان شماست، و خدا میداند و شما نمیدانید. بقره ۲۱۶
ما آیات (خود) را برای شما بیان کردیم شاید اندیشه کنید...حدید ۱۷

پیوندهای روزانه
پیوندها

باید آموزش جستجو در دیتا بیس SQL رو بلد باشی و برنامه navicat هم باید نصبیده باشید.
این آموزش رو بخونید :

http://promakers.ir/showthread.php?tid=10325
اینجا هم تمام تاپیک ها و آموزش های قدیمی رو بخونید و یکی یکی برسید به آموزش های جدید:
http://promakers.ir/forumdisplay.php?fid=109&page=5


توضیحات:
ببین قبل از اینکه basic4android یاد بگیرید باید کمی visual basic 6 رو یاد بگیرید(حالا vb.net وی بی دات نت هم شد زیاد فرقی نداره ولی vb6 سبک تره و لینک دانلودشم توی اینترنت هست . نبود پ.خ بزنید بدم لینک رو).
-
بعدش شما باید با دستورات ساده ی SQL (یعنی Structured Query Language = زبان پرس و جوی ساختاری) رو یاد بگیری.
چیز خاصی نداره
مثال :

کد PHP:
SELECT FROM table_name 
دستور بالا برای انتخاب * یا کل ستون های جدول بکار می ره(مثل جدول که دو ستون name و fam داره و ما هم نام و هم فاملیی از تمام سطرها رو از جدول واکشی می کنیم و توی حافظه یا recordSet موقتی کاری می ذاریم)

ما کاری به بقیه چیزا نداریم.

توی هر زبون برنامه نویسی توابعی هست که SQL رو می تونیم به صورت رشته ای بکار ببریم و Execute(اجرا) کنیم.

مثال توی b4a:
ابتدا متغیرهایی از نوع کرسر و س کو ال تعریف می کنیم(در بخش global):
کد PHP:
    Dim SQL1 As SQL
    Dim cursor1 
As Cursor 
سپس با SQL و بانک اطلاعات مثل db1.db ارتباط برقرار می کنیم(در بخش ایجاد اکتیویتی یا Activity_Create):
کد PHP:
    If SQL1.IsInitialized False Then
        SQL1
.Initialize(File.DirInternal"db1.db"False)
    
End If
DBload(""
سپس برای سادگی اینکار در آخر سطر فوق DBload("") رو آوردیم و توی تابع DBload که قبلا تعریف باید کنیم،بقیه ی کدها رو برای انتخاب سطرهای جدول باید اجرا کنیم.
مثال :
کد PHP:
Sub DBload(As String)
Private 
condition As String
q
=q.Trim'remove spaces
condition="WHERE esm LIKE '
%" & q & "%'"
ListView1.Clear'
need to clear the list
cursor1 SQL1.ExecQuery("SELECT * FROM table1 " condition "ORDER BY esm")
For 
0 To cursor1.RowCount 1
cursor1
.Position i
ListView1
.AddSingleLine(cursor1.GetString("esm")& "|" &cursor1.GetString("nomre"))
ListView1.SingleLineLayout.ItemHeight 40
ListView1
.SingleLineLayout.Label.TextSize 20
ListView1
.SingleLineLayout.Label.TextColor Colors.Black
ListView1
.SingleLineLayout.Label.Color Colors.White
Next
End Sub 
به کد بالا خوب نیگا کن.

q از نوع رشته ای هست و چیزی رو که می خوایم توی جدول جستجو کنیم رو بهش می دیم(ما متن وارد شده در کادر متنی رو بهش می دیم)

q.Trim باعث میشه اگه توی کادر متنی در سمت چپ و راست فضای خالی بود حذف بشه(البته از توی q)


خط بعدی این است :
کد:
condition="WHERE esm LIKE '%" & q & "%'"
به کد دقت کنید : متغیری به نام condition تعریف کردم که دستور WHERE از SQL هست که یک جور شرط هست که می گه فقط سطرهایی رو واکشی کن که ستون esm اون ها مثل(like) این q باشه یا مثل ورودی ای باشه که ما از کادر متنی خوندیم و ریختیم توی متغیر q.
علامت درصد(%) باعث میشه تا n کاراکتر در سمت چپ رشته ی ورودی بررسی بشه.مثل دستور dir در ویندوز (خط ommand prompt) که اونجا می گفتیم *ali* که این باعث میشد تمام فایل هایی که کلمه ی ali توی اسمشون باشه و اول و آخر نامشون هر تعداد کاراکتر باشه رو برگشت بده.

سپس ListView1.Clear باعث پاک کردن سطرهای لیست ویو میشه.

سپس باید SQL رو طبق شرط condition که بالاتر ساختیم اجرا کنیم و بعد از اجرا متغیر cursor(کرسر) یا اشاره گر رو اشاره می دیم به ابتدای جدولی که اطلاعات واکشی شده رو به طور موقت در اون ذخیره کرده سیستم پایگاه داده ی درونی b4a:
کد:
cursor1 = SQL1.ExecQuery("SELECT * FROM table1 " & condition & "ORDER BY esm")
به کد بالا دقت کنید:
order by esm باعث میشه که سطرهایی که واکشی شدن بر حسب ستون esm واکشی و مرتب بشن(توی جدول موقت واکشی شده)

اطلاعات از جدول table1 خوانده شد و cursor1 داره به ابتدای این حدول اشاره می کنه.

حالا باید یه حلقه ی while یا for بنویسیم که سطر به سطر از این جدول رو برای ما نمایش بده یا به لیست ویو listView1 اضافه کنه.

چون سطر اول شمارش 0 هست آخرین سطر باید n منهای 1 باشه.(cursor1.RowCount - 1)

ما هر بار با دستور cursor1.Position باید پاس بدیم به سطر بعدی و اینکار رو تا رسیدن به آخرین سطر تکرار کنیم و اسم و نمره ی دانش آموزان (واکشی شده بر حسب نام جستجو شده) رو نشون بدیم:
کد:
For i = 0 To cursor1.RowCount - 1
cursor1.Position = i
ListView1.AddSingleLine(cursor1.GetString("esm")& "|" &cursor1.GetString("nomre"))
.
.
.

سپس با دستور ListView1.SingleLineLayout.ItemHeight = 40 اندازه ی ارتفاع هر سطر از listView رو زیاد (روی 40 تنظیم)می کنیم .

سپس با دستور ListView1.SingleLineLayout.Label.TextSize = 20 اندازه ی متن رو روی size 20 تنظیم می کنیم.

سپس رنگ متن رو سیاه و پس زمینه رو سفید می کنیم :
ListView1.SingleLineLayout.Label.TextColor = Colors.Black و ListView1.SingleLineLayout.Label.Color = Colors.White

بقیه هم دیگه نیازی به توضیح نداره.

از جمله دستورانت دیگه ی SQL عبارت است از DELETE و UPDATE و INSERT که به ترتیب برای حذف و به روزرسانی(ویرایش=Edit) ودرج داده ها بکار می ره و دتورات دیگه ای که ما زیاد نیازی بهشون نداریم
http://promakers.ir/showthread.php?tid=11479&pid=120448#pid120448
موافقین ۰ مخالفین ۰ ۹۴/۰۴/۰۲
مدیرکل

نظرات (۰)

هیچ نظری هنوز ثبت نشده است

ارسال نظر

ارسال نظر آزاد است، اما اگر قبلا در بیان ثبت نام کرده اید می توانید ابتدا وارد شوید.
شما میتوانید از این تگهای html استفاده کنید:
<b> یا <strong>، <em> یا <i>، <u>، <strike> یا <s>، <sup>، <sub>، <blockquote>، <code>، <pre>، <hr>، <br>، <p>، <a href="" title="">، <span style="">، <div align="">
تجدید کد امنیتی