September Morn Update

This commit is contained in:
Ingy döt Net 2019-09-12 10:33:56 -07:00
parent 4e2d22a71d
commit aac6731f2c
6856 changed files with 141342 additions and 21127 deletions

View file

@ -1,33 +1,27 @@
import forms.
import forms;
class MainWindow:: SDIDialog
public class MainWindow : SDIDialog
{
object goodByeWorldLabel.
object closeButton.
Label goodByeWorldLabel;
Button closeButton;
constructor new
<= new;
[
goodByeWorldLabel := Label new.
closeButton := Button new.
constructor new()
<= new()
{
goodByeWorldLabel := new Label();
closeButton := new Button();
theControls
append:goodByeWorldLabel;
append:closeButton.
self
.appendControl(goodByeWorldLabel)
.appendControl(closeButton);
$self
set x:250 y:200;
set width:200 height:110.
self.setRegion(250, 200, 200, 110);
goodByeWorldLabel
set x:40 y:10;
set width:150 height:30;
set caption:"Goodbye, World!".
goodByeWorldLabel.Caption := "Goodbye, World!";
goodByeWorldLabel.setRegion(40, 10, 150, 30);
closeButton
set x:20 y:40;
set width:150 height:30;
set caption:"Close";
set onClick(:args)[ 'program stop ]
]
closeButton.Caption := "Close";
closeButton.setRegion(20, 40, 150, 30);
closeButton.onClick := (args){ forward program.stop() };
}
}