mirror of
https://github.com/brmlab/ratbox.git
synced 2025-06-08 09:54:03 +02:00
Aktualni verze.
This commit is contained in:
parent
ec9deb970d
commit
fa66e43aa2
5 changed files with 843 additions and 213 deletions
25
Form1.class
25
Form1.class
|
@ -15,19 +15,12 @@ PUBLIC SUB stimul(xxx AS String)
|
|||
END
|
||||
|
||||
PUBLIC SUB loginfo(aaa AS String)
|
||||
|
||||
Label1.Text = aaa
|
||||
|
||||
END
|
||||
|
||||
PUBLIC SUB cyklusinfo(bbb AS String)
|
||||
|
||||
label2.Text = bbb
|
||||
|
||||
END
|
||||
|
||||
|
||||
|
||||
PUBLIC SUB PictureBox1_DblClick()
|
||||
Form1.FullScreen = FALSE
|
||||
Form1.Visible = FALSE
|
||||
|
@ -37,23 +30,17 @@ WAIT
|
|||
END
|
||||
|
||||
PUBLIC SUB Form_Resize()
|
||||
|
||||
PictureBox1.Width = Form1.Width
|
||||
PictureBox1.Width = Form1.Width
|
||||
PictureBox1.Height = Form1.Height
|
||||
|
||||
END
|
||||
|
||||
PUBLIC SUB Form_Show()
|
||||
WAIT
|
||||
PictureBox1.Width = Form1.Width
|
||||
PictureBox1.Height = Form1.Height
|
||||
WAIT
|
||||
WAIT
|
||||
PictureBox1.Width = Form1.Width
|
||||
PictureBox1.Height = Form1.Height
|
||||
WAIT
|
||||
END
|
||||
|
||||
|
||||
|
||||
PUBLIC SUB PictureBox1_Menu()
|
||||
|
||||
FMain.remstart()
|
||||
|
||||
FMain.remstart()
|
||||
END
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue