Corroder Grandmaster Cheater Supreme
Reputation: 75 Joined: 10 Apr 2015 Posts: 1668
|
Posted: Thu Mar 14, 2019 4:13 am Post subject: |
|
|
Code: | picturestbl = {
{p_img='pict-1.gif'},
{p_img='pict-2.gif'},
{p_img='pict-3.gif'}
}
UDF1.CEImage1.Visible = false
function picShow(sender)
if sender.Name == 'CEButton1' then
index = picturestbl[1]
UDF1.CEImage1.Visible = true
UDF1.CEImage1.Picture.loadFromStream(findTableFile(index.p_img).Stream)
elseif sender.Name == 'CEButton2' then
index = picturestbl[2]
UDF1.CEImage1.Visible = true
UDF1.CEImage1.Picture.loadFromStream(findTableFile(index.p_img).Stream)
elseif sender.Name == nil then
UDF1.CEImage1.Visible = false
end
end
UDF1.Show()
UDF1.CEButton1.onClick = picShow
UDF1.CEButton2.onClick = picShow |
The form made as shown on attaching pictures :
Btw, how if you have 100 pictures ?. should we make 100 buttons on the form?  _________________ Stealing Code From Stolen Code...
And Admit It.. Hmmm....Typically LOL
|
|