مشاهده نسخه کامل
: دستوری که با آن بتوان عملی را که انجام شده undo کرد بگویید؟
اگر میشه دستوری که با آن بتوان عملی را که انجام شده undo کرد بگویید؟ :evil:
Ali-Bahal
21-07-2006, 19:34
undo کار میکنه هههههههه
دوست عزیز شما باید خودتون حالتی اجیاد کنی که بتونی Undo کنه من که دستوری بلد نیستم . شما باید کد یبنویسی که اطلاعات مورد نظر را مثلاً تا 5 عمل آخری در جایی ذخیره کنه مثل فایلی نمیدونم رجیستری یا هرجایی دیگه که میتونی . این چیزی که به ذهن من میرسه . شاید راه بهتری باشه من بلد نباشم . در ضمن اگه بتوی پشته پیدا سازی کنی که دیگه کارت حله از پشته استفاده می کنی . یعنی بهترین روش هم استفاده از پشته است .
Ctrl +z اما دستور ! ! نمی دونم !
:biggrin:
black_storm
22-07-2006, 21:37
اقا روشهای زیادی داره
مثلا با sendkeys
یا
دستورات API
...
Ali-Bahal
22-07-2006, 21:59
ههههههه آره کنترل و زد
تو هم کد بنویس
Blue Rose
23-07-2006, 00:25
سلام
اگه واسه يه اديتور ميخواي من اينو دارم اگه واسه چيز ديگه (مثلا Paint) يا چيز ديگه ميخواي متاسفم
Module Code
Declare Function SendMessageBynum& Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, _
ByVal lparam As Long)
Public Const EM_UNDO = &HC7&
------------------------------------
Form Code
Private Sub TextUndo(T As TextBox)
SendMessageBynum T.hwnd, EM_UNDO, 0, 0
End Sub
Private Sub Command1_Click()
'replace the "Text1" below with the name of the Text Box you want to
'apply the Undo on it.
Call TextUndo(Text1)
End Sub
black_storm
24-07-2006, 14:35
اقا من سورس paint را دارم اما بعلت اینکه زیاده نمی تونم بنویسم
- امکان پیوست هم ندارم
- اما اینا بگم امکان کار کردن با لایه ها داخلش فراهم شده - یعنی کپی و پیست جواب میده - %100 با کنکاش می شه به undo هم رسید ---
شما میتونید از فضای مجانی که در اینترنت هست استفاده کنی فایلهاتون آپلود کنی .
vBulletin , Copyright ©2000-2024, Jelsoft Enterprises Ltd.