Revision 72
updated icons to new
Added open program option to toolbar (makes a bit more sense)
Display breakpoints on loading source file
| cDebugCJMenuItemClasses.pkg | ||
|---|---|---|
| 414 | 414 |
{ OverrideProperty=psCaption InitialValue=CS_CaptionAddBreakpoint}
|
| 415 | 415 |
{ OverrideProperty=psToolTip InitialValue=CS_ToolTipAddBreakpoint}
|
| 416 | 416 |
{ OverrideProperty=psDescription InitialValue=CS_DescAddBreakpoint }
|
| 417 |
{ OverrideProperty=psImage InitialValue="brkp_obj.ico" }
|
|
| 417 |
{ OverrideProperty=psImage InitialValue="brkp_obj_red.ico" }
|
|
| 418 | 418 |
Class cCJAddBreakpointMenuItem is a cCJDebugMenuItem |
| 419 | 419 |
|
| 420 | 420 |
Procedure Construct_Object |
| ... | ... | |
| 422 | 422 |
Set psCaption To CS_CaptionAddBreakpoint |
| 423 | 423 |
Set psToolTip To CS_ToolTipAddBreakpoint |
| 424 | 424 |
Set psDescription To CS_DescAddBreakpoint |
| 425 |
Set psImage To "brkp_obj.ico" |
|
| 425 |
Set psImage To "brkp_obj_red.ico"
|
|
| 426 | 426 |
//Set psImageDisabled To "brkpd_obj.ico" |
| 427 | 427 |
Set piShortcutKey To xtpKey_None VK_F9 |
| 428 | 428 |
End_Procedure |
| ... | ... | |
| 540 | 540 |
End_Function |
| 541 | 541 |
|
| 542 | 542 |
End_Class // cCJOpenFileMenuItem |
| 543 |
|
|
| 544 |
|
|
| 545 |
Define CS_CaptionOpenProgram For "Open Program" |
|
| 546 |
Define CS_TooltipOpenProgram For "Open executable file" |
|
| 547 |
Define CS_DescOpenProgram For "Open executable file" |
|
| 548 |
|
|
| 549 |
{ OverrideProperty=psCaption InitialValue=CS_CaptionOpenProgram}
|
|
| 550 |
{ OverrideProperty=psToolTip InitialValue=CS_ToolTipOpenProgram}
|
|
| 551 |
{ OverrideProperty=psDescription InitialValue=CS_DescOpenProgram }
|
|
| 552 |
{ OverrideProperty=psImage InitialValue="workset.ico" }
|
|
| 553 |
Class cCJOpenProgramMenuItem is a cCJDebugMenuItem |
|
| 554 |
|
|
| 555 |
Procedure Construct_Object |
|
| 556 |
Forward Send Construct_Object |
|
| 557 |
Set psCaption To CS_CaptionOpenProgram |
|
| 558 |
Set psToolTip To CS_ToolTipOpenProgram |
|
| 559 |
Set psDescription To CS_DescOpenProgram |
|
| 560 |
Set psImage To "workset.ico" |
|
| 561 |
End_Procedure |
|
| 562 |
|
|
| 563 |
Procedure OnExecute Variant vCommandBarControl |
|
| 564 |
Send doOpenProgram |
|
| 565 |
End_Procedure |
|
| 566 |
|
|
| 567 |
Function IsEnabled Returns Boolean |
|
| 568 |
Boolean bStarted |
|
| 569 |
Get HasProgramStarted To bStarted |
|
| 570 |
Function_Return (bStarted=false) |
|
| 571 |
End_Function |
|
| 572 |
|
|
| 573 |
End_Class |
|
Also available in: Unified diff