When i write comments in Greek Language and then continue
writing code(in Englich of cource),the comments converts in Englich. When I highlight the comments,they converts in Greek.
The Greek Language have 25 letters and not need Unicode.
In MasmEd and in QETITOR thear is not problems.Both works OK.
But in radasm,when the Greek take turns in Englich,thear is problem.
Thanks,Manos.
Posted on 2002-05-15 13:44:36 by Anonymous
manos, there's no need to ask the same question three times. Hiroshimator already replied to your first post. I don't think there's much you can do about it, other than switching to english for your comments.

Thomas
Posted on 2002-05-15 13:54:09 by Thomas
manos, this problem has also been expressed by others and KetilO has said that much code would have to be reworked for Unicode support and there are no immediate plans for such a change.
Posted on 2002-05-15 14:03:30 by bitRAKE
This is an unfortunate behaviour of the richedit 3.0
Unicode support simply is too much work.

KetilO
Posted on 2002-06-02 07:02:27 by KetilO
Hello KetilO.

I use Radasm.It is the best.I would like make Radasm better.
For better appearance of Radasm,i suggest,the buttons in Toolbar to place in center.Now are placed in top.I have attempted and i have accomplish to center the buttons.If you want,i can send my code.

Thanks,Manos.
I am sorry for my bad English.
Posted on 2002-06-04 15:45:07 by Anonymous
Hi manos

Just post your code here and I will try to implement it in the next version.

Thanks,

KetilO
Posted on 2002-06-04 16:38:01 by KetilO
Hello KetilO.

I post my code for FlatToolbar.
My examble have 4 files:MyApp.inc,MyApp.asm,Toolbar.asm,MyApp.rc.
MyApp.rc is empty.
I have 3 suggestions.
1.In file Toolbar.asm,i create the Toolbar with CreateWindowEx,but
without TBSTYLE_FLAT in styles of window.
2.In file Toolbar.asm,after message TB_BUTTONSTRUCTSIZE,i send the
message TB_SETSTYLE with TBSTYLE_FLAT or CCS_TOP.
3.In file MyApp.asm,I put the procedure CreateTB in WinMain,
after ShowWindow and before UpdateWindow and not in WM_CREATE,as follow:
;***********Toolbar.asm*************
.code

CreateTB proc hParent:DWORD
LOCAL bSize :DWORD
LOCAL tbab :TBADDBITMAP
LOCAL tbb :TBBUTTON

invoke CreateWindowEx,WS_EX_TOOLWINDOW,ADDR tbClass,ADDR AppName,
WS_CHILD or WS_VISIBLE or \
WS_CLIPCHILDREN or WS_CLIPSIBLINGS,
0,0,0,0,hParent,NULL,hInstance,NULL

mov hToolbar,eax

invoke SendMessage,hToolbar,TB_BUTTONSTRUCTSIZE,sizeof TBBUTTON,0
invoke SendMessage,hToolbar,TB_SETSTYLE,0,TBSTYLE_FLAT or CCS_TOP
;**********************Buttons********************
mov tbab.hInst,HINST_COMMCTRL
mov tbab.nID,IDB_STD_SMALL_COLOR
;*****************Button "New"********************
mov tbb.iBitmap, STD_FILENEW
mov tbb.idCommand, IDM_FILE_NEW
mov tbb.fsState, TBSTATE_ENABLED
mov tbb.fsStyle, TBSTYLE_BUTTON
invoke SendMessage,hToolbar,TB_ADDBUTTONS,1,ADDR tbb

;*****************Button "Open"********************
mov tbb.iBitmap, STD_FILEOPEN
mov tbb.idCommand, IDM_FILE_OPEN
mov tbb.fsState, TBSTATE_ENABLED
mov tbb.fsStyle, TBSTYLE_BUTTON
invoke SendMessage,hToolbar,TB_ADDBUTTONS,1,ADDR tbb

;*****************Button "Save"********************
mov tbb.iBitmap, STD_FILESAVE
mov tbb.idCommand, IDM_FILE_SAVE
mov tbb.fsState, TBSTATE_ENABLED
mov tbb.fsStyle, TBSTYLE_BUTTON
invoke SendMessage,hToolbar,TB_ADDBUTTONS,1,ADDR tbb

;*****************Button "Separator"********************
mov tbb.iBitmap, 0
mov tbb.idCommand, 0
mov tbb.fsStyle, TBSTYLE_SEP
invoke SendMessage,hToolbar,TB_ADDBUTTONS,1,ADDR tbb

;*****************Button "Cut"********************
mov tbb.iBitmap, STD_CUT
mov tbb.idCommand, IDM_EDIT_CUT
mov tbb.fsState, TBSTATE_ENABLED
mov tbb.fsStyle, TBSTYLE_BUTTON
invoke SendMessage,hToolbar,TB_ADDBUTTONS,1,ADDR tbb

;*****************Button "Copy"********************
mov tbb.iBitmap, STD_COPY
mov tbb.idCommand, IDM_EDIT_COPY
mov tbb.fsState, TBSTATE_ENABLED
mov tbb.fsStyle, TBSTYLE_BUTTON
invoke SendMessage,hToolbar,TB_ADDBUTTONS,1,ADDR tbb

;*****************Button "Paste"********************
mov tbb.iBitmap, STD_PASTE
mov tbb.idCommand, IDM_EDIT_PASTE
mov tbb.fsState, TBSTATE_ENABLED
mov tbb.fsStyle, TBSTYLE_BUTTON
invoke SendMessage,hToolbar,TB_ADDBUTTONS,1,ADDR tbb

;**************************************************************
invoke SendMessage,hToolbar,TB_ADDBITMAP,1,ADDR tbab

mov eax,hToolbar

ret

CreateTB endp
;******************MyApp.inc***********************************
includelib \masm32\lib\masm32.lib
includelib gdi32.lib
includelib user32.lib
includelib kernel32.lib
includelib shell32.lib
includelib comctl32.lib
includelib comdlg32.lib

WinMain PROTO :DWORD,:DWORD,:DWORD,:DWORD
WndProc PROTO :DWORD,:DWORD,:DWORD,:DWORD
CreateTB PROTO :DWORD

.const
IDM_FILE_NEW equ 101
IDM_FILE_OPEN equ 102
IDM_FILE_SAVE equ 103
IDM_EDIT_CUT equ 104
IDM_EDIT_COPY equ 105
IDM_EDIT_PASTE equ 106

.data
ClassName db 'MyClass',0
AppName db 'MyApp',0
hToolbar dd 0
tbClass db "ToolbarWindow32",0

.data?
hInstance dd ?
CommandLine dd ?
hWnd dd ?

include Toolbar.asm

;********************MyApp.asm******************************
.386
.model flat,stdcall
option casemap:none

include MyApp.inc

.code
start:
invoke GetModuleHandle,NULL
mov hInstance,eax
invoke GetCommandLine
invoke InitCommonControls
invoke WinMain,hInstance,NULL,CommandLine,SW_SHOWDEFAULT
invoke ExitProcess,eax
;---------------------------------------------------------------------------
WinMain proc hInst:HINSTANCE,hPrevInst:HINSTANCE,CmdLine:LPSTR,CmdShow:DWORD
LOCAL wc:WNDCLASSEX
LOCAL msg:MSG

mov wc.cbSize,SIZEOF WNDCLASSEX
mov wc.style,CS_HREDRAW or CS_VREDRAW
mov wc.lpfnWndProc,OFFSET WndProc
mov wc.cbClsExtra,NULL
mov wc.cbWndExtra,NULL
push hInst
pop wc.hInstance
mov wc.hbrBackground,COLOR_WINDOW+1
mov wc.lpszMenuName,NULL
mov wc.lpszClassName,OFFSET ClassName
invoke LoadIcon,NULL,IDI_APPLICATION
mov wc.hIcon,eax
mov wc.hIconSm,eax
invoke LoadCursor,NULL,IDC_ARROW
mov wc.hCursor,eax

invoke RegisterClassEx,addr wc

invoke CreateWindowEx,NULL,ADDR ClassName,ADDR AppName,\
WS_OVERLAPPEDWINDOW,CW_USEDEFAULT,\
0,CW_USEDEFAULT,0,NULL,NULL,\
hInstance,NULL
invoke ShowWindow,hWnd,CmdShow

invoke CreateTB,hWnd

invoke UpdateWindow,hWnd

.while TRUE
invoke GetMessage,addr msg,NULL,0,0
.BREAK .if !eax
invoke TranslateMessage,addr msg
invoke DispatchMessage,addr msg
.endw
mov eax,msg.wParam
ret

WinMain endp
;----------------------------------------------------------------------
WndProc proc hWin:HWND,uMsg:UINT,wParam:WPARAM,lParam:LPARAM
LOCAL hdc :DWORD

mov eax,uMsg
.if eax==WM_CREATE
push hWin

pop hWnd
.elseif eax==WM_SIZE
invoke SendMessage,hToolbar,TB_AUTOSIZE,0,0
.elseif eax==WM_CLOSE
invoke DestroyWindow,hWin
.elseif uMsg==WM_DESTROY
invoke PostQuitMessage,NULL
.else
invoke DefWindowProc,hWin,uMsg,wParam,lParam
ret
.endif
xor eax,eax
ret

WndProc endp
;------------------------------------------------------------------------

end start
;*************************************************
Manos.
Posted on 2002-06-05 04:10:07 by Anonymous
Thanks manos

I will play around a little with your code to see what changes is needed.

KetilO
Posted on 2002-06-05 04:42:24 by KetilO