Little log again.
I worked on the editor GUI and added many things and debugged at the same time.
I added the docking tiles panel where the tiles will be drawn later (on the grid) and some tile info (like small selected tile preview). For docking panel i used old but working component DockPanel from http://www.torry.net/pages.php?s=79
(DockPanel is a component which was originally created for the open perl IDE. This release has been modified to be substantially easier to use, requiring virtually no code to actually impliment it, and a few new features including tabposition, and Tabtype (Icon or strictly text). This produces a docking style similiar to that which is seen in Delphi, and Homesite.)
Does it's job very well and it's very easy to get up and running. Whats even better, it saves it's positions. I don't have to do anything. Also made the menu items to show and hide the side panels, including tiles panel. Made the shortcuts to work.
Messed with FormShortCut handler to handle any shortcuts or things except the 4 arrow keys. I will handle these by my own:
Code:
procedure TfrmMain.FormShortCut(var Msg: TWMKey; var Handled: Boolean);
var Key: Word;
begin
if MenuToolbar.IsShortCut(Msg) then
begin
Handled := True;
end;
Key := Msg.CharCode;
//We handle arrow keys by our own
if Key in [37..40] then
Handled := False
else
Handled := True;
end;
I need this so that arrow keys will not mess with components on the form like some Listboxes or buttons, in old versions of editor i had this problem. Arrow keys were messing up everything.
This handles the issue for me.
Also i figured out why nxPascal didn't receive a Key values in GameLoop. That was that shortcut thingy again.
Now it works and i can move my camera movement to gameloop now.
That's it for now. I must wake up early so i will go to sleep.
Bookmarks