PDA

View Full Version : سوال: سوال در مورد فرستادن تکست به کمبو بوکس



jooje_kocholo
شنبه 03 مرداد 1388, 17:58 عصر
چطور به یک کمبوبوکس در برنامه دیگر تکست اضافه کنیم برایه این کار باید این چنذ کلاس رو باید طی کنم چطور این کار کنم یک code به من بدید . merc


SEINFELD_SUPERMAN
#32770
ComboBox
Edit
_____:تشویق:

sina26
شنبه 03 مرداد 1388, 18:25 عصر
چطور به یک کمبوبوکس در برنامه دیگر تکست اضافه کنیم برایه این کار باید این چنذ کلاس رو باید طی کنم چطور این کار کنم یک code به من بدید . merc


SEINFELD_SUPERMAN
#32770
ComboBox
Edit
_____:تشویق:

سلام
لطفا با یک مثال ساده توضیح واضح تری ارائه فرمائید تا دوستان بتونند راهنمائیتون بکنند

jooje_kocholo
شنبه 03 مرداد 1388, 18:49 عصر
سلام
لطفا با یک مثال ساده توضیح واضح تری ارائه فرمائید تا دوستان بتونند راهنمائیتون بکنند
یک پنجره در یک برنامه هست که من میخوام به کمبوبوکس که در این پنجره هست تکس بفرستم میدونم که با برخی تابع آپیای میشه این کار را کردولی من هر کاری کردم نشد با یک برنامه کلاسها را گرفتم

sohrab o
یک شنبه 04 مرداد 1388, 02:43 صبح
سوالتونو درست متوجه شدم؟
میخواهید به یک ComboBox مربوط به Application دیگه Text اضافه کنید؟

jooje_kocholo
یک شنبه 04 مرداد 1388, 08:42 صبح
سوالتونو درست متوجه شدم؟
میخواهید به یک ComboBox مربوط به Application دیگه Text اضافه کنید؟
بله منظورم همین است

Tasiyan
یک شنبه 04 مرداد 1388, 08:59 صبح
کار این تابع فرستادن متن به یک پنجره است
مثال:

Private Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" ( _
ByVal hwnd As Long, _
ByVal lpString As String) As Long

Private Sub Form_Load()
SetWindowText Me.hwnd, "Welcome to VB"
End Sub
:لبخند:

sohrab o
یک شنبه 04 مرداد 1388, 13:04 عصر
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long




Public Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long

sohrab o
یک شنبه 04 مرداد 1388, 13:06 عصر
Dim imclass As Long, Button As Long
Dim YSearchMenuWndClass As Long
YSearchMenuWndClass = FindWindow("YSearchMenuWndClass", vbNullString)
imclass = FindWindowEx(YSearchMenuWndClass, 0&, "IMClass", vbNullString)
Button = FindWindowEx(imclass, 0&, "button", "&Send")


این هم برای کار با توابع بالا
با استفاده از توابع بالا میتونید هندل Object مربوطه را پیدا کنید
و با استفاده از تابعی که دوست خوبمون "Saddad" قراردادن متن را انتقال بدید

sohrab o
یک شنبه 04 مرداد 1388, 19:10 عصر
این هم فکر کنم بدردت بخوره

jooje_kocholo
یک شنبه 04 مرداد 1388, 21:33 عصر
نمیدونم چرا به این پنجره ای که من میخوام تکست ارسال نمیشه ولی به هر جایی که دیگه میخوام تکست ارسال میشه:متفکر:

sohrab o
دوشنبه 05 مرداد 1388, 00:06 صبح
بیا این هم یک سورس که من خودم از همین سایت گرفتم و ویرایش کردم
وقتی پنجره Run باز هست متنی را داخل اون کپی میکنه (داخل Combo)

sa.mousavi
دوشنبه 05 مرداد 1388, 00:15 صبح
نیازی به API فک نکنم باشه. خود وی براش فرمان داره. AppActivate فوکوس میکنه روی پنجره دلخواهت، SendKeys هم متنت رو ارسال می کنه.

sohrab o
دوشنبه 05 مرداد 1388, 00:29 صبح
نیازی به API فک نکنم باشه. خود وی براش فرمان داره. AppActivate فوکوس میکنه روی پنجره دلخواهت، SendKeys هم متنت رو ارسال می کنه.

این نمونه ای که من گذاشتمو چک کن ، اون روشی که شما بیان می کنید به نظرم خیلی جالب و مناسب نیست چون اگر کاربر مکان فوکوسو تغییر بده چی؟

jooje_kocholo
دوشنبه 05 مرداد 1388, 06:30 صبح
بیا این هم یک سورس که من خودم از همین سایت گرفتم و ویرایش کردم
وقتی پنجره Run باز هست متنی را داخل اون کپی میکنه (داخل Combo)
سلام این کد هم کار منو راه نمیندازه به این کمبوبوکسها کد دارم متن میفرستادم ولی این برنا مه ای که من میخوام بهش تکست بفرستم تکست فرستاده نمیشه

sohrab o
دوشنبه 05 مرداد 1388, 15:30 عصر
سلام این کد هم کار منو راه نمیندازه به این کمبوبوکسها کد دارم متن میفرستادم ولی این برنا مه ای که من میخوام بهش تکست بفرستم تکست فرستاده نمیشه

خوب دوست خوبم مگه چه برنامه ای هست؟!!!!! میشه بیشتر توضیح بدی!!!!!شاید تغییرات نمیدی تو برنامه ها و سورس هایی که استفاده میکنی!!!!!!!

sa.mousavi
چهارشنبه 07 مرداد 1388, 02:21 صبح
خوب دوست خوبم مگه چه برنامه ای هست؟!!!!! میشه بیشتر توضیح بدی!!!!!شاید تغییرات نمیدی تو برنامه ها و سورس هایی که استفاده میکنی!!!!!!!

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