Using PwrDev for non-PwrDev projects

[Edwin Knoppert]

This topic on my board explains how you can use PwrDev for non-PwrDev projects.
This means you can prepare DDT dialogforms for another programmer or maybe for a project which is not maintained with PwrDev at all.

The following link simply explains the menu's to choose and what it results in:

http://www.hellobasic.com/cgi-bin/forum/YaBB.pl?board=announce;action=display;num=1255900536

The following code is the final generated code but the hex part was excluded to keep it small.
In practise, that hex part should be maintained in the target module and is 'dead code' for the compiler (excluded with #if 0 / #endif)

[color=#007F00]' Code generated with PwrDev v2.0.3.0, 2009-10-18, 23:12[/color]

[color=#0000FF]#Compile[/color] [color=#0000FF]Exe[/color]
[color=#0000FF]#Dim[/color] [color=#0000FF]All[/color]
[color=#0000FF]#Include[/color] "win32api.inc"

[color=#007F00]'# PwrDev embedded forms, PART1_BEGIN[/color]
[color=#7F007F]%ID_FORM1_CHECKBOX1[/color] = 100
[color=#7F007F]%ID_FORM2_BUTTON1[/color] = 100

[color=#0000FF]Function[/color] Form1_Load( [color=#0000FF]Optional[/color] [color=#0000FF]ByVal[/color] hWndParent [color=#0000FF]As[/color] [color=#0000FF]Long[/color], [color=#0000FF]ByVal[/color] bShowModal [color=#0000FF]As[/color] [color=#0000FF]Long[/color] ) [color=#0000FF]As[/color] [color=#0000FF]Long[/color]
    [color=#0000FF]Local[/color] hDlg [color=#0000FF]As[/color] [color=#0000FF]Long[/color], hr [color=#0000FF]As[/color] [color=#0000FF]Long[/color]
    [color=#0000FF]Dialog[/color] [color=#0000FF]New[/color] hWndParent, "Form1",,,293,106,282001408,0, [color=#0000FF]To[/color] hDlg
    [color=#0000FF]If[/color] hDlg = 0 [color=#0000FF]Then[/color] [color=#0000FF]Exit[/color] [color=#0000FF]Function[/color]
    [color=#0000FF]Control[/color] [color=#0000FF]Add[/color] "Button", hDlg, 100, "CheckBox1", 16, 10, 65, 20, [color=#7F007F]%WS_CHILD[/color] [color=#0000FF]Or[/color] [color=#7F007F]%WS_TABSTOP[/color] [color=#0000FF]Or[/color] [color=#7F007F]%WS_VISIBLE[/color] [color=#0000FF]Or[/color] [color=#7F007F]%BS_AUTOCHECKBOX[/color] [color=#0000FF]Or[/color] [color=#7F007F]%BS_LEFT[/color] [color=#0000FF]Or[/color] [color=#7F007F]%BS_VCENTER[/color] [color=#0000FF]Or[/color] [color=#7F007F]%BS_MULTILINE[/color], 0
    [color=#0000FF]If[/color] bShowModal [color=#0000FF]Then[/color] [color=#0000FF]Dialog[/color] [color=#0000FF]Show[/color] [color=#0000FF]Modal[/color] hDlg [color=#0000FF]Call[/color] Form1_Proc [color=#0000FF]To[/color] hr [color=#0000FF]Else[/color] hr = hDlg
    [color=#0000FF]Function[/color] = hr
[color=#0000FF]End[/color] [color=#0000FF]Function[/color]

[color=#0000FF]Function[/color] Form2_Load( [color=#0000FF]Optional[/color] [color=#0000FF]ByVal[/color] hWndParent [color=#0000FF]As[/color] [color=#0000FF]Long[/color], [color=#0000FF]ByVal[/color] bShowModal [color=#0000FF]As[/color] [color=#0000FF]Long[/color] ) [color=#0000FF]As[/color] [color=#0000FF]Long[/color]
    [color=#0000FF]Local[/color] hDlg [color=#0000FF]As[/color] [color=#0000FF]Long[/color], hr [color=#0000FF]As[/color] [color=#0000FF]Long[/color]
    [color=#0000FF]Dialog[/color] [color=#0000FF]New[/color] hWndParent, "Form2",,,282,130,282001408,0, [color=#0000FF]To[/color] hDlg
    [color=#0000FF]If[/color] hDlg = 0 [color=#0000FF]Then[/color] [color=#0000FF]Exit[/color] [color=#0000FF]Function[/color]
    [color=#0000FF]Control[/color] [color=#0000FF]Add[/color] "Button", hDlg, 100, "Button1", 17, 10, 67, 21, [color=#7F007F]%WS_CHILD[/color] [color=#0000FF]Or[/color] [color=#7F007F]%WS_TABSTOP[/color] [color=#0000FF]Or[/color] [color=#7F007F]%WS_VISIBLE[/color] [color=#0000FF]Or[/color] [color=#7F007F]%BS_NOTIFY[/color] [color=#0000FF]Or[/color] [color=#7F007F]%BS_CENTER[/color] [color=#0000FF]Or[/color] [color=#7F007F]%BS_VCENTER[/color] [color=#0000FF]Or[/color] [color=#7F007F]%BS_MULTILINE[/color], 0
    [color=#0000FF]If[/color] bShowModal [color=#0000FF]Then[/color] [color=#0000FF]Dialog[/color] [color=#0000FF]Show[/color] [color=#0000FF]Modal[/color] hDlg [color=#0000FF]Call[/color] Form2_Proc [color=#0000FF]To[/color] hr [color=#0000FF]Else[/color] hr = hDlg
    [color=#0000FF]Function[/color] = hr
[color=#0000FF]End[/color] [color=#0000FF]Function[/color]

[color=#007F00]'# PwrDev embedded forms, PART1_END[/color]

[color=#0000FF]CallBack[/color] [color=#0000FF]Function[/color] Form1_Proc() [color=#0000FF]As[/color] [color=#0000FF]Long[/color]
[color=#0000FF]End[/color] [color=#0000FF]Function[/color]

[color=#0000FF]CallBack[/color] [color=#0000FF]Function[/color] Form2_Proc() [color=#0000FF]As[/color] [color=#0000FF]Long[/color]
[color=#0000FF]End[/color] [color=#0000FF]Function[/color]


[color=#0000FF]Function[/color] [color=#0000FF]PbMain[/color]() [color=#0000FF]As[/color] [color=#0000FF]Long[/color]

    [color=#0000FF]Local[/color] hr [color=#0000FF]As[/color] [color=#0000FF]Long[/color]

    hr = Form1_Load( 0, 1 )

[color=#0000FF]End[/color] [color=#0000FF]Function[/color]

The part between the remarks is the part which can be updated by PwrDev.
That means the form load procedures and the updated hex part (which is not shown here)