Key edit control sequences in a dialog Edit Control

[ssimop]

Could you please advise, how can I key edit controls (ie Select All - Ca) in the Edit control of the following dialog :

Function SESInputDialog

Code:

Copy      Help

;\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages
;Get help in : DialogWithMenu
str controls = "3"
str e3
if(!ShowDialog("SESInputDialog" &SESInputDialog &controls 0 0 0 0 0 0 0 "$user profile$\My Documents\Local Settings\sysman\Ico\SESGroup1.ICO" "SESInputDialog")) ret
mes e3

;BEGIN DIALOG
;0 "" 0x10CF0A44 0x100 0 0 382 172 "SES-Multiline Input"
;3 Edit 0x54231044 0x200 0 0 382 194 ""
;END DIALOG
;DIALOG EDITOR: "" 0x2030307 "*" "" ""

ret
;messages
sel message
,case WM_INITDIALOG
,__Font-- f
,f.Create("Tahoma" 11 0)
,f.SetDialogFont(hDlg "3")

,
,case WM_SIZE
,RECT r; GetClientRect(hDlg &r)
,siz r.right r.bottom id(3 hDlg)
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,;menu items:
,case 106  DT_Ok hDlg
,
,case 103
,key Cc
,
,case 104
,key Ca
,
,case IDOK
,case IDCANCEL DT_Cancel hDlg
ret 1


;BEGIN MENU
;>&Edit
,;&Copy : 103 0 0 Cc
,;-
,;&Paste : 105 0 0 Cv
,;-
,;Select &All : 104 0 0 Ca
,;<
;E&xit : 106 0
;END MENU

Do I have to change any of the Edit control styles?

Thanks in advance

Simos