فراخوانی عکس در SQL

[raouf4850 150]

سلام

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

که الان برای من مشکل داره

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

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

 

کد Bitmap Extended اینجوری بود:

Dim img As ImageView
img.Initialize("")
img.Bitmap=Namayesh(i)
Dim bp As BitmapExtended
bp.Initialize("")
ScrollView1.Panel.AddView(img,0,h,bp.getWidth(img.Bitmap),bp.getHeight(img.Bitmap))
h= h + bp.getHeight(img.Bitmap) + 2%y

sh=sh+bp.getHeight(img.Bitmap)
ScrollView1.Panel.Height=sh

End If
ScrollView1.Panel.Height=ScrollView1.Panel.Height+10%y
Next
End Sub

میشه جاش از اون استفاده کزد؟؟

[shahab.es 5,429]

سلام اقای رضایی عزیز

کتابخونه Farakhani 2 ، هم ایتمی داره برای TowLine And Bitmap listview و هم همونطور که جناب فرقانی گفتن، میتونید اگه بخواین در یک بیتمپ ذخیره کنین و استفاده کنید

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

موفق باشید

[raouf4850 150]

ممنون از پاسخ همتون الان من همون فراخوانی زو تیک بزنم و به کد ها دست نزنم حله؟؟

یا بازم باید تغییرات بدم

کجارو تغییر بدم؟

در ضمن میشه لینک کتابخونه رو بدید

 

با تشکر

[Kazem Forghani 2,927]

بفرمایید :

دانلود کتابخانه Farakhani 2

دانلود ویدئو آموزشی ( حتما ببینید )

[raouf4850 150]

ممنون از پاسخ همتون الان من همون فراخوانی زو تیک بزنم و به کد ها دست نزنم حله؟؟

یا بازم باید تغییرات بدم

کجارو تغییر بدم؟

[shahab.es 5,429]

سلام

اره من نوشتمش

ببین

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

تو فروشگاه انجمن فک کنم یه اموزش هست

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

 

ببین

کتابخونه ، کار شما رو تو فراخوانی(فقط فراخوانی فعلا) راحت میکنه

شما میتونی عکس رو بگیری از دیتابیس و با روشی که بلدی(من زیاد تو این کار وارد نیستم) اون عکس رو بین متنا قرار بدی

[raouf4850 150]

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

من فراخوانی عکس در اسکرول ویو و نشون دادن در متن رو میخوام

مثلا یه کتاب دارم که بین داستان هاش عکس داره

اینجوری

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

#Region  Activity Attributes 
	#FullScreen: False
	#IncludeTitle: True
#End Region

Sub Process_Globals

Dim s As SQL
End Sub

Sub Globals


	Private ScrollView1 As ScrollView
End Sub

Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("iran")


If File.Exists(File.DirInternal,"mydbb.db")=False Then
File.Copy(File.DirAssets,"mydb.db",File.DirInternal,"mydb.db")
End If

If s.IsInitialized=False Then
s.Initialize(File.DirInternal,"mydb.db",False)
End If

show
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub show
Dim sh As Int
sh=0
Dim cur As Cursor
cur=s.ExecQuery("SELECT * FROM Tbl")

Dim h As Int
h = 2%y
For i = 0 To cur.RowCount-1
cur.Position=i
If cur.GetInt("Type")=0 Then
Dim Lbl As Label
Lbl.Initialize("")
Lbl.Text=cur.GetString("Value")
Lbl.Gravity=Gravity.LEFT
Lbl.TextSize=15
Lbl.TextColor=Colors.Black
ScrollView1.Panel.AddView(Lbl,2%x,h,96%x,0)
Dim su As StringUtils
Lbl.Height=su.MeasureMultilineTextHeight(Lbl,Lbl.Text)
h = h + Lbl.Height + 2%y
sh=sh+Lbl.Height
ScrollView1.Panel.Height=sh
Else
Dim img As ImageView
img.Initialize("")
img.Bitmap=Namayesh(i)
Dim bp As BitmapExtended
bp.Initialize("")
ScrollView1.Panel.AddView(img,0,h,bp.getWidth(img.Bitmap),bp.getHeight(img.Bitmap))
h= h + bp.getHeight(img.Bitmap) + 2%y

sh=sh+bp.getHeight(img.Bitmap)
ScrollView1.Panel.Height=sh

End If
ScrollView1.Panel.Height=ScrollView1.Panel.Height+10%y
Next
End Sub


Sub Namayesh(Position As String) As Bitmap
Dim cur As Cursor
cur=s.ExecQuery("SELECT Value FROM Tbl")
cur.Position=Position

Dim bytes() As Byte
bytes=cur.GetBlob("Value")

Dim input As InputStream
input.InitializeFromBytesArray(bytes,0,bytes.Length)

Dim b As Bitmap
b.Initialize2(input)
input.Close
Return(b)
End Sub

[shahab.es 5,429]

بازم سلام اقای رضایی عزیز

همونطور که تو ویدیو دیدید، میتونید باهاش یه بیتمپ بگیرید، یعنی تصویر مد نظرتون رو از طریف بیتمپ بگیرید و بعد با هر روشی که خودتو صلاح میدونید، بین متن ها ازشون استفاده کنید

کتابخونه به خودیه خود، تصاویر رو بین متن ها نمیچینه

[raouf4850 150]

کتابخونه کار شماست؟

الان طبق کد بالا که عکس در بین متن قرار میگیره

من چی قرار بدم با این کتابخونه که عکس بین متن بیوفته؟

 

تو کدش گیرم

[Kazem Forghani 2,927]

سلام

بله امکانش وجود داره .

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