Fresh IDE . Check-in [bc30a1af9f]
Not logged in

This repository is a mirror!

The original is located on: https://fresh.flatassembler.net/fossil/repo/fresh
If you want to follow the project, please update your remote-url

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Code cleanup.
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:bc30a1af9faa3ce9af1bd929d95cdd138f7618e7
User & Date: johnfound 2019-05-26 14:20:18
Context
2019-05-26
14:22
Work on the examples fix. Most of the examples are actually very outdated and something have to be done with this... check-in: 278a7ae8ca user: johnfound tags: trunk
14:20
Code cleanup. check-in: bc30a1af9f user: johnfound tags: trunk
2018-12-05
11:32
More readable comments. check-in: 17292b7f38 user: johnfound tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to include/libs/gui.asm.

717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
        return

oncase SGM_AUTOSIZE

        invoke  SendMessageW, [.hwnd], TB_AUTOSIZE, 0, 0
        stdcall __ComputeToolbarSize, [.hwnd]

        OutputValue "Toolbar  width: ", eax, 10, -1
        OutputValue "Toolbar height: ", edx, 10, -1

        push    eax edx

;        invoke  SetWindowPos, [.hwnd], 0, 0, 0, eax, edx, SWP_NOZORDER



        pop     edx eax
        and     eax, $ffff
        shl     edx, 16
        or      eax, edx

        clc
        return








<
<
<
<
<
<
<
<
<
<







717
718
719
720
721
722
723










724
725
726
727
728
729
730
        return

oncase SGM_AUTOSIZE

        invoke  SendMessageW, [.hwnd], TB_AUTOSIZE, 0, 0
        stdcall __ComputeToolbarSize, [.hwnd]











        and     eax, $ffff
        shl     edx, 16
        or      eax, edx

        clc
        return

Changes to source/projmanager.asm.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uglobal
  hProjManager    dd 0  ; handle of project manager
  ptrProjectFile  dd 0  ; pointer to TOpenFile with ftProject, currently open in the project manager.
  fProjModified   dd 0  ; flag "modified" for current open project.

  poMemory       dd 0  ; The memory size for the compiler in KB!
  poBinNameAuto  dd 0  ; The flag whether the binary name will be auto created of fixed
  poBinName      dd 0  ; Handle to the binary name.
  poVarArray     dd 0  ; points to the array with environment variables for the project.

  imlCategories   dd 0  ; Image list for tree-view control

  ptrMRUProj      dd 0  ; pointer to MRU list for projects.

  hTreePopup      dd 0
  hListPopup      dd 0





|
|
|
|







1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uglobal
  hProjManager    dd 0  ; handle of project manager
  ptrProjectFile  dd 0  ; pointer to TOpenFile with ftProject, currently open in the project manager.
  fProjModified   dd 0  ; flag "modified" for current open project.

  poMemory        dd 0  ; The memory size for the compiler in KB!
  poBinNameAuto   dd 0  ; The flag whether the binary name will be auto created of fixed
  poBinName       dd 0  ; Handle to the binary name.
  poVarArray      dd 0  ; points to the array with environment variables for the project.

  imlCategories   dd 0  ; Image list for tree-view control

  ptrMRUProj      dd 0  ; pointer to MRU list for projects.

  hTreePopup      dd 0
  hListPopup      dd 0