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

[Mr Mansour 325]

با سلام به دوستان گل انجمن انسور سنتر

بنده یک مشکلی دارم - می خوام تکست لیست ویو زمانی که حالت Click میشه کپی شه

تمام راه هارو انجام دادم - داخل انجمن هم جستجو زدم اما به نتیجه ی نادری نرسیدم   

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

ممنون و سپاس 

[Farzad Musavi 576]

Sub listview1_ItemClick (Position As Int, Value As Object)
    Dim aria As AriaLib
    Value=aria.ClipboadText
End Sub

اریا لیب هم تیک بزن

[Mr Mansour 325]

ممنون فرزاد جان ولی این مقدار عددی رو کپی می کنه 

منظور بنده متن لیست ویو هستش 

یعنی اگر لیست ویو پوزیشن 1 - تکستش Salam بود 

می خوام اون سلامه کپی شه 

[salmana 174]

Sub Globals
Private ListView1 As ListView
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("12")
ListView1.AddSingleLine("آنسور سنتر")
ListView1.AddSingleLine("مهدی ایزدی")
ListView1.AddSingleLine("بندرلنگه")
ListView1.AddSingleLine("بستک")
ListView1.AddSingleLine("گزیر")
End Sub
Sub listview1_ItemClick (Position As Int, Value As Object)
Dim aria As AriaLib
aria.SetClipboardText(Value)
ToastMessageShow("متن گرفته شده:"&Value,True)
End Sub

سورس مربوطه