Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #use <cais>
- use <ui.e>
- use <uim.e>
- @import "main.cobj";
- @import "frameworks/uim/gstarted.csf" as styles;
- @import "frameworks/uim/aqua.csf" as default;
- @import "styles.csf";
- main_window = uim.window << size="1000x1000px", istyle="aqua.window";
- dfc main(agrs < sys.log) {
- try << exec {
- @use styles
- Label1 = write(main_window, label, text="My first label in CAIS!" style="color: black", istyle="label")
- Button1 = write(main_window, button, text="Click Me!" style="color: red", action=gstarted.actions.btn1, istyle="gstarted-btn") /# Action is the name of the function that the button will run.
- }
- except StyleError {
- show << uim.style.nferror;
- else {
- show << error(sys.log);
- }
- }
Add Comment
Please, Sign In to add comment