Cheat Engine Forum Index Cheat Engine
The Official Site of Cheat Engine
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 


Cheat Engine Forum Index
PostGo back to topic
Corroder
Grandmaster Cheater Supreme
Reputation: 33
Joined: 10 Apr 2015
Posts: 1315

PostPosted: Tue Jan 29, 2019 3:52 am    Post subject:

@FreeER : something like this ?

Code:
f = createForm()
f.Height = 300
f.Width = 300
f.BorderStyle = 'Single'
f.Cursor = -21

img = createImage(f)
img.Top = 10
img.Left = -100
img.Height = 300
img.Width = 300
img.Stretch = true
img.Picture.loadFromStream(findTableFile('horses.png').Stream)
img.Visible = true

Speed = 1
Direction = ''
ImageExpandLeft = 250
ImageBaseLeft = -100

function ImagePop()
 if Direction == 'out' then
  if img.left >= ImageExpandLeft then
     Timer.Enabled = false
  else
     img.left = img.Left + Speed
  end
 else  --- Direction == 'in'
  if img.left <= ImageBaseLeft then
     Timer.Enabled = false
  else
     img.Left = img.Left - Speed
  end
 end
end

function img2right()
 Direction = 'out'
 Timer.Enabled = true
end

function  img2left()
 Direction = 'in'
 Timer.Enabled = true
end

Timer = createTimer(f)  -- create in Form
Timer.Interval = 40  --- 1/1000 second
Timer.Enabled = false
Timer.OnTimer = ImagePop

f.Show()

img.onMouseEnter =  img2right
img.onClick =  img2left


For who want to try :
- Add a picture file to your ct table as a stream file. And change 'horses.png' with your picture filename.
_________________
Stealing Code From Stolen Code...
And Admit It.. Hmmm....Typically LOL
Back to top
View user's profile Send private message
Post reviews:   Approve 1
Author Review
Aylin
Review: Approve
Post reference:
ReviewPosted: Tue Jan 29, 2019 10:11 am

Thanks Corroder.. Big Thanks..
Back to top
View user's profile Send private message MSN Messenger
Display:  
Cheat Engine Forum Index


Powered by phpBB © 2001, 2005 phpBB Group

CE Wiki   IRC (#CEF)   Twitter
Third party websites