Good morning:
In the VW_Help (Dialogs) we have two basic dialog levels (BASIC DIALOG & BASIC DIALOG+CONTROLS)but both procedures display the same dialog (without controls).
This are the procedures. Where is/are the errors?
Thank you.
{BASIC DIALOG}
procedure CreateDialog_BD;
VAR
id: LONGINT;
result : LONGINT;
BEGIN
id := CreateLayout('Revise Layer Link', TRUE, 'Update', 'Cancel');
result := RunLayoutDialog(id,NIL);
END;
RUN(CreateDialog_BD);
{BASIC DIALOG + CONTROLS}
procedure CreateDialog_BDC;
VAR
id: LONGINT;
result : LONGINT;
BEGIN
id := CreateLayout('Revise Layer Link',TRUE,'Update', 'Cancel');
CreateStaticText(id,4,'Relink to:',-1);
CreatePulldownMenu(id,5,32);
CreateGroupBox(id,6,'Link Options',TRUE);
CreateCheckBox(id,7,'Link object is locked');
CreateCheckBox(id,8,'Name Link:');
CreateEditText(id,9,'Untitled Link',26);
result := RunLayoutDialog(id,NIL);
END;
RUN(CreateDialog_BDC);