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 


Create a background image in the program

 
Post new topic   Reply to topic    Cheat Engine Forum Index -> Cheat Engine Lua Scripting
View previous topic :: View next topic  
Author Message
Sol.gaming
How do I cheat?
Reputation: 0

Joined: 14 Apr 2024
Posts: 9

PostPosted: Sun Apr 21, 2024 4:45 pm    Post subject: Create a background image in the program Reply with quote

Hello.
I'm back with another stupid question

How can I put this link as the background of the main form?

CHEATENGINE V 7.5

Image link:
You can't put a link on the site Evil or Very Mad

For example, an uploaded image
Back to top
View user's profile Send private message
AylinCE
Grandmaster Cheater Supreme
Reputation: 33

Joined: 16 Feb 2017
Posts: 1317

PostPosted: Sun Apr 21, 2024 6:09 pm    Post subject: Reply with quote

Code:
exFormandImageName = UDF1.CEImage1 -- your Form and image name?

exFormandImageName.picture.loadFromStream(findTableFile("yourAddTableImageName.png").stream) -- or jpg

_________________
Hi Hitler Different Trainer forms for you!
https://forum.cheatengine.org/viewtopic.php?t=619279
Enthusiastic people: Always one step ahead
Do not underestimate me Master: You were a beginner in the past
Back to top
View user's profile Send private message Visit poster's website MSN Messenger
Sol.gaming
How do I cheat?
Reputation: 0

Joined: 14 Apr 2024
Posts: 9

PostPosted: Sun Apr 21, 2024 6:20 pm    Post subject: Reply with quote

I think you don't understand what I mean,
I want to use an image uploaded in a link as background in a frame
Without using a library.


My code as an example:



Code:

local form = createForm(true)
form.Caption = "test"

local imageUrl = xxxxxxxxxxxxxxxx
local WebClient = clr.System.Net.WebClient()
local imageData = WebClient:DownloadData(imageUrl)
local MemoryStream = clr.System.IO.MemoryStream(imageData)
local Image = System.Drawing.Image.FromStream(MemoryStream)
local pictureBox = createPictureBox(form)
pictureBox.Image = Image
pictureBox.SizeMode = PictureBoxSizeMode.StretchImage
pictureBox.Width = Image.Width
pictureBox.Height = Image.Height

form:Show()

I am not allowed to post links

Forgive me because I am new to Cheat Engine Laughing
Back to top
View user's profile Send private message
AylinCE
Grandmaster Cheater Supreme
Reputation: 33

Joined: 16 Feb 2017
Posts: 1317

PostPosted: Sun Apr 21, 2024 9:27 pm    Post subject: Reply with quote




Code:
if frm1 then frm1.Destroy() frm1=nil end
DP1=getScreenDPI()/96
frm1=createForm()
frm1.height=260*DP1 frm1.width=300*DP1 frm1.left=400*DP1 frm1.top=109*DP1
frm1.PopupMode=0 frm1.caption="frm1"
frm1.Position="poDesktopCenter" frm1.ShowInTaskBar="stAlways"
frm1.BorderStyle="bsSingle"
--[==[
frm1.BorderStyle="bsNone"
frm1.setLayeredAttributes(0x000100, 255, LWA_COLORKEY | LWA_ALPHA )
frm1.Color=0x000100
--]==]
-------------------------
local ftbl = {}
----------------------- ftbl.backPnl1 ----- 
ftbl.backPnl1=createPanel(frm1)
ftbl.backPnl1.AutoSize=false
ftbl.backPnl1.height=260*DP1 ftbl.backPnl1.width=300*DP1 ftbl.backPnl1.left=0*DP1 ftbl.backPnl1.top=0*DP1
ftbl.backPnl1.BevelWidth=10 ftbl.backPnl1.BevelColor=clAqua
-----------------------
----------------------- ftbl.backImg1 ----- 
ftbl.backImg1=createImage(ftbl.backPnl1)
ftbl.backImg1.AutoSize=false
ftbl.backImg1.height=240*DP1 ftbl.backImg1.width=280*DP1 ftbl.backImg1.left=10*DP1 ftbl.backImg1.top=10*DP1
ftbl.backImg1.Stretch=true
ftbl.backImg1.OnMouseDown=function() frm1.DragNow() end
-----------------------
--############################################################################--
--############################################################################--

int = getInternet()
logostr=int.getURL("https://i.hizliresim.com/kv2cwb1.jpg")
int.destroy ()
ss=createStringStream(logostr)
ftbl.backImg1.Picture.loadFromStream(ss)
ss.destroy()

_________________
Hi Hitler Different Trainer forms for you!
https://forum.cheatengine.org/viewtopic.php?t=619279
Enthusiastic people: Always one step ahead
Do not underestimate me Master: You were a beginner in the past
Back to top
View user's profile Send private message Visit poster's website MSN Messenger
Sol.gaming
How do I cheat?
Reputation: 0

Joined: 14 Apr 2024
Posts: 9

PostPosted: Mon Apr 22, 2024 10:27 am    Post subject: Reply with quote

excellent.
Done.
Teşekkür ederim

And now why does the ParentBackground function in the following code not display the background of the main form

Code:
CEPanel1.ParentBackground = true


test code:

Code:
if form then
    form.Destroy()
    form = nil
end

DP1 = getScreenDPI() / 96
form = createForm()
form.height = 630 * DP1
form.width = 475 * DP1
form.left = 400 * DP1
form.top = 109 * DP1
form.PopupMode = 0
form.caption = '🔥SoL .Gaming.MODE MENU HACK🔥'
form.Position = "poDesktopCenter"
form.ShowInTaskBar = "stAlways"
--form.BorderStyle = "bsNone"
local myText = createEdit(form)
myText.ReadOnly = true myText.Color = 0x22FFF myText.Font.Size = 11
myText.Font.Color = 0x11FFFF myText.Height = 8 myText.Width = 340
myText.Top = 4 myText.Left = 70 myText.Text = "🔱 WELLCOME TO .............................. 🔱"
-----------------------------------------------------------------------------
local CEPanel1 = createPanel(form) -- Create a new regular panel named CEPanel1
CEPanel1.Font.Size = 10.5 CEPanel1.Font.Color = 0x00FFF CEPanel1.Font.Bold = true
CEPanel1.Caption = 'ESP                                '
CEPanel1.Top = 33 CEPanel1.Left = 10 CEPanel1.Height = 40 CEPanel1.Width = 220
CEPanel1.ParentBackground = true
---CEPanel1.ParentColor = true

local buttonYes1 = createButton(form)
buttonYes1.Caption = 'ON' buttonYes1.Color = 0x000FFF buttonYes1.Height = 24
buttonYes1.Left = 123 buttonYes1.Top = 42 buttonYes1.Width = 48
local buttonNo1 = createButton(form) -- Create the "OFF" button with form as parent
buttonNo1.Caption = 'OFF' buttonNo1.Height = 24 buttonNo1.Left = 175
buttonNo1.Top = 42 buttonNo1.Width = 48

local ftbl = {}
ftbl.backPnl1 = createPanel(form)
ftbl.backPnl1.AutoSize = false
ftbl.backPnl1.height = 630 * DP1
ftbl.backPnl1.width = 475 * DP1
ftbl.backPnl1.left = 0 * DP1
ftbl.backPnl1.top = 0 * DP1
ftbl.backPnl1.BevelWidth = 10
ftbl.backPnl1.BevelColor = clAqua

ftbl.backImg1 = createImage(ftbl.backPnl1)
ftbl.backImg1.AutoSize = false
ftbl.backImg1.height = 630 * DP1
ftbl.backImg1.width = 475 * DP1
ftbl.backImg1.left = 0 * DP1
ftbl.backImg1.top = 0 * DP1
ftbl.backImg1.Stretch = true
ftbl.backImg1.OnMouseDown = function()
form.DragNow()
end

int = getInternet()
logostr = int.getURL("https://uploadkon.ir/uploads/ac0522_24111.jpg")
int.destroy ()
ss = createStringStream(logostr)
ftbl.backImg1.Picture.loadFromStream(ss)
ss.destroy()
-----------------------Sol.Gaming Create----------------------------------------------------
local myText = createEdit(form)
myText.ReadOnly = true myText.Color = 0x22FFF myText.Font.Size = 11
myText.Font.Color = 0x11FFFF myText.Height = 8 myText.Width = 340
myText.Top = 4 myText.Left = 70 myText.Text = "🔱 WELLCOME TO .............................. 🔱"
---------------------Hight JumPPP-----------------------------------------------------------
local CEPanel1 = createPanel(ftbl.backPnl1) -- Create a new regular panel named CEPanel1
CEPanel1.Font.Size = 10.5 CEPanel1.Font.Color = 0x00FFF CEPanel1.Font.Bold = true
CEPanel1.Caption = 'ESP                                '
CEPanel1.Top = 33 CEPanel1.Left = 10 CEPanel1.Height = 40 CEPanel1.Width = 220
---CEPanel1.ParentColor = true
CEPanel1.ParentBackground = true
local buttonYes1 = createButton(form)
buttonYes1.Caption = 'ON' buttonYes1.Color = 0x000FFF buttonYes1.Height = 24
buttonYes1.Left = 123 buttonYes1.Top = 42 buttonYes1.Width = 48
local buttonNo1 = createButton(form) -- Create the "OFF" button with form as parent
buttonNo1.Caption = 'OFF' buttonNo1.Height = 24 buttonNo1.Left = 175
buttonNo1.Top = 42 buttonNo1.Width = 48
Back to top
View user's profile Send private message
AylinCE
Grandmaster Cheater Supreme
Reputation: 33

Joined: 16 Feb 2017
Posts: 1317

PostPosted: Mon Apr 22, 2024 12:42 pm    Post subject: Reply with quote



I think this one is a little different.

I have given examples for usage.
The box frames containing the buttons are standard and cannot be destroyed.

Here is the code;

Code:
if form then form.Destroy() form = nil end

DP1 = getScreenDPI() / 96
form = createForm()
form.height = 630 * DP1
form.width = 475 * DP1
form.left = 400 * DP1
form.top = 109 * DP1
form.PopupMode = 0
form.caption = '🔥SoL .Gaming.MODE MENU HACK🔥'
form.Position = "poDesktopCenter"
form.ShowInTaskBar = "stAlways"
form.BorderStyle="bsNone"
form.setLayeredAttributes(0x000100, 255, LWA_COLORKEY | LWA_ALPHA )
form.Color=0x000100
form.Visible=false
local ftbl = {}
----------------------- ftbl.titlepnl ----- 
ftbl.titlepnl=createPanel(form)
ftbl.titlepnl.AutoSize=false
ftbl.titlepnl.height=50*DP1
ftbl.titlepnl.width=475*DP1 ftbl.titlepnl.left=0*DP1 ftbl.titlepnl.top=0*DP1
ftbl.titlepnl.caption='🔥 SoL .Gaming.MODE MENU HACK 🔥'
ftbl.titlepnl.BevelWidth=10
ftbl.titlepnl.Color = 0x22FFF
ftbl.titlepnl.Font.Style="fsBold"
ftbl.titlepnl.Font.Size=-15*DP1
ftbl.titlepnl.OnMouseDown = function()
form.DragNow()
end
-----------------------
----------------------- ftbl.btnmin ----- 
ftbl.btnmin=createButton(ftbl.titlepnl)
ftbl.btnmin.AutoSize=false
ftbl.btnmin.height=26*DP1 ftbl.btnmin.width=45*DP1 ftbl.btnmin.left=15*DP1 ftbl.btnmin.top=12*DP1
ftbl.btnmin.caption="-"
ftbl.btnmin.Font.Size=12*DP1
-----------------------
----------------------- ftbl.btncls ----- 
ftbl.btncls=createButton(ftbl.titlepnl)
ftbl.btncls.AutoSize=false
ftbl.btncls.height=26*DP1 ftbl.btncls.width=45*DP1 ftbl.btncls.left=415*DP1 ftbl.btncls.top=12*DP1
ftbl.btncls.caption="X"
ftbl.btncls.Font.Size=12*DP1
-----------------------

ftbl.backPnl1 = createPanel(form)
ftbl.backPnl1.AutoSize = false
ftbl.backPnl1.height = 575 * DP1
ftbl.backPnl1.width = 475 * DP1
ftbl.backPnl1.left = 0 * DP1
ftbl.backPnl1.top = 55 * DP1
ftbl.backPnl1.BevelWidth = 10
ftbl.backPnl1.BevelColor = clDefault

ftbl.backImg1 = createImage(ftbl.backPnl1)
ftbl.backImg1.AutoSize = false
ftbl.backImg1.height = 555 * DP1
ftbl.backImg1.width = 455 * DP1
ftbl.backImg1.left = 10 * DP1
ftbl.backImg1.top = 10 * DP1
ftbl.backImg1.Stretch = true
ftbl.backImg1.OnMouseDown=function() form.DragNow() end

local myText = createPanel(ftbl.backPnl1)
myText.Height=25 myText.Width=325
myText.Top=15 myText.Left=75
myText.Color=0x22FFF myText.Font.Size=11
myText.BevelWidth = 5
myText.BevelColor = clDefault
myText.Color = 0x22FFF
myText.Font.Color = 0x11FFFF
 myText.Caption = "🔱 ............. WELLCOME TO ............. 🔱"
-----------------------------------------------------------------------------

local crtboxtop = 100

function createHackBox(len)
for i=0, tonumber(len) do
----------------------- ftbl["Btnbox"..i + 1] ----- 
ftbl["Btnbox"..i + 1]=createGroupBox(ftbl.backPnl1)
ftbl["Btnbox"..i + 1].AutoSize=false
ftbl["Btnbox"..i + 1].height=40*DP1
ftbl["Btnbox"..i + 1].width=220*DP1
ftbl["Btnbox"..i + 1].left=form.width - 230
ftbl["Btnbox"..i + 1].top=tonumber(crtboxtop)*DP1
ftbl["Btnbox"..i + 1].color=clDefault
ftbl["Btnbox"..i + 1].ParentColor=true
ftbl["Btnbox"..i + 1].Font.Style="fsBold"
ftbl["Btnbox"..i + 1].Font.Size=0*DP1
-----------------------
----------------------- ftbl["boxLbl"..i + 1] ----- 
ftbl["boxLbl"..i + 1]=createLabel(ftbl["Btnbox"..i + 1])
ftbl["boxLbl"..i + 1].AutoSize=false
ftbl["boxLbl"..i + 1].height=20*DP1
ftbl["boxLbl"..i + 1].width=50*DP1
ftbl["boxLbl"..i + 1].left=10*DP1
ftbl["boxLbl"..i + 1].top=-6*DP1
ftbl["boxLbl"..i + 1].caption="ESP"..i
ftbl["boxLbl"..i + 1].Font.Color=65535
ftbl["boxLbl"..i + 1].Font.Size=-15*DP1
-----------------------
----------------------- ftbl["buttonYes"..i + 1] ----- 
ftbl["buttonYes"..i + 1]=createButton(ftbl["Btnbox"..i + 1])
ftbl["buttonYes"..i + 1].AutoSize=false
ftbl["buttonYes"..i + 1].height=24*DP1
ftbl["buttonYes"..i + 1].width=45*DP1
ftbl["buttonYes"..i + 1].left=110*DP1
ftbl["buttonYes"..i + 1].top=-8*DP1
ftbl["buttonYes"..i + 1].caption="ON"
ftbl["buttonYes"..i + 1].Font.Size=0*DP1
-----------------------
----------------------- ftbl["buttonNo"..i + 1] ----- 
ftbl["buttonNo"..i + 1]=createButton(ftbl["Btnbox"..i + 1])
ftbl["buttonNo"..i + 1].AutoSize=false
ftbl["buttonNo"..i + 1].height=24*DP1
ftbl["buttonNo"..i + 1].width=45*DP1
ftbl["buttonNo"..i + 1].left=165*DP1
ftbl["buttonNo"..i + 1].top=-8*DP1
ftbl["buttonNo"..i + 1].caption="OFF"
ftbl["buttonNo"..i + 1].Font.Size=0*DP1
-----------------------
crtboxtop = tonumber(crtboxtop) + 45
end
end

createHackBox(9)  -- 9 = total 10

int = getInternet()
logostr = int.getURL("https://uploadkon.ir/uploads/ac0522_24111.jpg")
int.destroy ()
ss = createStringStream(logostr)
ftbl.backImg1.Picture.loadFromStream(ss)
ss.destroy()

form.setLayeredAttributes(0x000100, 255, LWA_COLORKEY | LWA_ALPHA )
form.Color=0x000100
form.Visible=true
--############################################################################--
ftbl.btnmin.OnClick = function()
form.WindowState = "wsMinimized"
end

ftbl.btncls.OnClick = function() -- active end trainer ..
  --closeCE()
  --return caFree
end
--############################################################################--

--use

ftbl.Btnbox4.Visible=false

ftbl.buttonYes2.OnClick=function() -- ESP1 panel click ON btn
ftbl.Btnbox4.Visible=true
ftbl.boxLbl6.caption="HEALTH"
end

ftbl.buttonNo2.OnClick=function() -- ESP1 panel click OFF btn
ftbl.Btnbox4.Visible=false
ftbl.boxLbl6.caption="ESP5"
end

_________________
Hi Hitler Different Trainer forms for you!
https://forum.cheatengine.org/viewtopic.php?t=619279
Enthusiastic people: Always one step ahead
Do not underestimate me Master: You were a beginner in the past
Back to top
View user's profile Send private message Visit poster's website MSN Messenger
Sol.gaming
How do I cheat?
Reputation: 0

Joined: 14 Apr 2024
Posts: 9

PostPosted: Mon Apr 22, 2024 2:05 pm    Post subject: Reply with quote

Wink

NICE

My opinion about the ability of the cheat engine in the GUI has changed

But please, if possible, tell me what was the problem of not running the background in my code?



Your code is a valuable and educational source
But I can't use it because I wrote a long code with another architecture and I have to fix the problems in my architecture.
Thank you for your time
Back to top
View user's profile Send private message
AylinCE
Grandmaster Cheater Supreme
Reputation: 33

Joined: 16 Feb 2017
Posts: 1317

PostPosted: Mon Apr 22, 2024 4:02 pm    Post subject: Reply with quote

Sol.gaming wrote:
excellent.
Done.
Teşekkür ederim

And now why does the ParentBackground function in the following code not display the background of the main form

Code:
CEPanel1.ParentBackground = true



I think this is the result you want:



Here are the relevant settings:

Code:
-- form:
form.ParentDoubleBuffered = true
form.ParentBiDiMode = true

-- Panels:
ftbl.backPnl1.ParentBackground = true


İmage code:
Code:
if form then form.Destroy() form = nil end

DP1 = getScreenDPI() / 96
form = createForm()
form.height = 630 * DP1
form.width = 475 * DP1
form.left = 400 * DP1
form.top = 109 * DP1
form.PopupMode = 0
form.caption = '🔥SoL .Gaming.MODE MENU HACK🔥'
form.Position = "poDesktopCenter"
form.ShowInTaskBar = "stAlways"
form.BorderStyle="bsNone"
form.ParentDoubleBuffered = true
form.ParentBiDiMode = true
--form.setLayeredAttributes(0x000100, 255, LWA_COLORKEY | LWA_ALPHA )
--form.Color=0x000100
form.Visible=false
local ftbl = {}
----------------------- ftbl.titlepnl -----
ftbl.titlepnl=createPanel(form)
ftbl.titlepnl.AutoSize=false
ftbl.titlepnl.height=50*DP1
ftbl.titlepnl.width=475*DP1 ftbl.titlepnl.left=0*DP1 ftbl.titlepnl.top=0*DP1
ftbl.titlepnl.caption='🔥 SoL .Gaming.MODE MENU HACK 🔥'
ftbl.titlepnl.BevelWidth=10
ftbl.titlepnl.Color = 0x22FFF
ftbl.titlepnl.Font.Style="fsBold"
ftbl.titlepnl.Font.Size=-15*DP1
ftbl.titlepnl.OnMouseDown = function()
form.DragNow()
end
ftbl.backImg1 = createImage(form)
ftbl.backImg1.AutoSize = false
ftbl.backImg1.height = 555 * DP1
ftbl.backImg1.width = 455 * DP1
ftbl.backImg1.left = 10 * DP1
ftbl.backImg1.top = 60 * DP1
ftbl.backImg1.Stretch = true

ftbl.backPnl1 = createPanel(form)
ftbl.backPnl1.AutoSize = false
ftbl.backPnl1.height = 275 * DP1
ftbl.backPnl1.width = 435 * DP1
ftbl.backPnl1.left = 20 * DP1
ftbl.backPnl1.top = 205 * DP1
ftbl.backPnl1.BevelWidth = 10
ftbl.backPnl1.BevelColor = clDefault
ftbl.backPnl1.Color = clDefault
ftbl.backPnl1.ParentBackground = true
ftbl.backPnl1.ParentBidiMode = true
ftbl.backPnl1.ParentColor = true
ftbl.backPnl1.Color = clDefault

int = getInternet()
logostr = int.getURL("https://uploadkon.ir/uploads/ac0522_24111.jpg")
int.destroy ()
ss = createStringStream(logostr)
ftbl.backImg1.Picture.loadFromStream(ss)
ss.destroy()

form.Visible=true

To disable the entire panel, including the frame, edit the following section of code:
Code:
ftbl.backPnl1.BevelWidth = 0


Of course, the panel and its contents will be active and visible.

This encoding does not have the same effect as the following control;
Code:
ftbl.backPnl1.Visible = false -- or true

_________________
Hi Hitler Different Trainer forms for you!
https://forum.cheatengine.org/viewtopic.php?t=619279
Enthusiastic people: Always one step ahead
Do not underestimate me Master: You were a beginner in the past
Back to top
View user's profile Send private message Visit poster's website MSN Messenger
Display posts from previous:   
Post new topic   Reply to topic    Cheat Engine Forum Index -> Cheat Engine Lua Scripting All times are GMT - 6 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


Powered by phpBB © 2001, 2005 phpBB Group

CE Wiki   IRC (#CEF)   Twitter
Third party websites