View previous topic :: View next topic |
Author |
Message |
Sol.gaming How do I cheat? Reputation: 0
Joined: 14 Apr 2024 Posts: 9
|
Posted: Sun Apr 21, 2024 4:45 pm Post subject: Create a background image in the program |
|
|
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
For example, an uploaded image
|
|
Back to top |
|
|
AylinCE Grandmaster Cheater Supreme Reputation: 33
Joined: 16 Feb 2017 Posts: 1317
|
Posted: Sun Apr 21, 2024 6:09 pm Post subject: |
|
|
Code: | exFormandImageName = UDF1.CEImage1 -- your Form and image name?
exFormandImageName.picture.loadFromStream(findTableFile("yourAddTableImageName.png").stream) -- or jpg |
_________________
|
|
Back to top |
|
|
Sol.gaming How do I cheat? Reputation: 0
Joined: 14 Apr 2024 Posts: 9
|
Posted: Sun Apr 21, 2024 6:20 pm Post subject: |
|
|
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
|
|
Back to top |
|
|
AylinCE Grandmaster Cheater Supreme Reputation: 33
Joined: 16 Feb 2017 Posts: 1317
|
Posted: Sun Apr 21, 2024 9:27 pm Post subject: |
|
|
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() |
_________________
|
|
Back to top |
|
|
Sol.gaming How do I cheat? Reputation: 0
Joined: 14 Apr 2024 Posts: 9
|
Posted: Mon Apr 22, 2024 10:27 am Post subject: |
|
|
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 |
|
|
AylinCE Grandmaster Cheater Supreme Reputation: 33
Joined: 16 Feb 2017 Posts: 1317
|
Posted: Mon Apr 22, 2024 12:42 pm Post subject: |
|
|
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
|
_________________
|
|
Back to top |
|
|
Sol.gaming How do I cheat? Reputation: 0
Joined: 14 Apr 2024 Posts: 9
|
Posted: Mon Apr 22, 2024 2:05 pm Post subject: |
|
|
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 |
|
|
AylinCE Grandmaster Cheater Supreme Reputation: 33
Joined: 16 Feb 2017 Posts: 1317
|
Posted: Mon Apr 22, 2024 4:02 pm Post subject: |
|
|
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 |
_________________
|
|
Back to top |
|
|
|