Spexeah/Asuro
3
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

git-svn-id: https://spexeah.com:8443/svn/Asuro@643 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

Browse Source
This commit is contained in:
kieron
2018-05-01 18:35:40 +00:00
parent 6d8717a7fc
commit e8508fb22f
13 changed files with 14 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/console.pas
View File

@ -249,15 +249,15 @@ type
THooks = record
OnDraw : TDrawHook; //Implemented
OnMouseClick : TMouseClickHook;
OnMouseClick : TMouseClickHook; //Implemented
OnMouseMove : TMouseMoveHook;
OnMouseDown : TMouseDownHook;
OnMouseUp : TMouseUpHook;
OnKeyPressed : TKeyPressedHook;
OnClose : TCloseHook; //Implemented
OnMinimize : TMinimizeHook;
OnFocus : TFocusHook; //Implemented
OnLoseFocus : TLoseFocusHook; //Implemented
OnKeyPressed : TKeyPressedHook; //Implemented
OnClose : TCloseHook; //Implemented
OnMinimize : TMinimizeHook;
OnFocus : TFocusHook; //Implemented
OnLoseFocus : TLoseFocusHook; //Implemented
end;
TWindow = record

4
src/include/asuro.pas
View File

@ -3,11 +3,11 @@ unit asuro;
interface
const
VERSION = '1.0.0-634a';
VERSION = '1.0.0-642a';
VERSION_MAJOR = '1';
VERSION_MINOR = '0';
VERSION_SUB = '0';
REVISION = '634';
REVISION = '642';
RELEASE = 'a';
implementation

6
src/prog/shell.pas
View File

@ -60,6 +60,11 @@ begin
end;
end;
procedure onBaseDraw();
begin
clearWNDEx(0, console.combinecolors($01C3, $A55F));
end;
procedure init();
begin
colors:= console.combinecolors($0000, $FFFF);
@ -70,6 +75,7 @@ begin
console.setShellWindow(Handle, false);
console.registerEventHandler(Handle, EVENT_DRAW, void(@Draw));
console.registerEventHandler(Handle, EVENT_MOUSE_CLICK, void(@OnMouseClick));
console.registerEventHandler(0, EVENT_DRAW, void(@onBaseDraw));
end;
end.