Visual LISP, AutoLISP and General Customization
cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 

dcl design

11 REPLIES 11
Reply
Message 1 of 12
Anonymous
305 Views, 11 Replies

dcl design

Hello -

I keep running into the same problem when designing dialog boxes (in dcl,
for AutoLISP routines). I have a text_part to the left of another element,
and I can't push them tightly together (if the text_part is to the right,
they seem to be jammed together by default and there's no problem!).

I pulled some elements out of one of my dialogs to make a simple example:

test: dialog
{
label = "Test";
key = "title";

: row
{
: text_part
{
label = "Permanent scale:";
key = "pscaledesc";
width = 16;
fixed_width = true;
}
: popup_list
{
key = "pscalepop";
edit_width = 10;
fixed_width = true;
}
}
ok_button;
}

A bmp of this dialog is attached.

In this particular example the space between the text_part and the
popup_list doesn't look too bad, but I would still like to know how to push
them closer together! I've tried putting them in a narrow column, etc., but
I haven't found the trick.

Thanks -

Chuck
11 REPLIES 11
Message 2 of 12
BillZ
in reply to: Anonymous

Chuck,
Try putting:<<<<<<<<<<<<<<
: row
{
fixed_width = true;>>>>>>>>>>> for the row widget. That way the row should only take up as much space as needed.


Bill
Message 3 of 12
Anonymous
in reply to: Anonymous

Thanks Bill, I just tried fixed_width = true; within the row in my example,
with and without width = various values.

I find that I can make the dialog wider with a large value for width, but it
won't get any narrower than it already was.

There's got to be some trick to pushing these tiles together. I even tried
putting them in separate columns and giving the columns fixed widths. So
far, nothing works. This problem has plagued me for years!

Chuck


BillZ wrote in message
news:f10a2fc.0@WebX.maYIadrTaRb...
Chuck,
Try putting:<<<<<<<<<<<<<<
: row
{
fixed_width = true;>>>>>>>>>>> for the row widget. That way the row
should only take up as much space as needed.
Bill
Message 4 of 12
BillZ
in reply to: Anonymous

Chuck,
I can't see the BMP that you posted.
I know the dialog label requires a certain amount of space at the top of the dialog box. This can determine how "narrow" you can get the main box to become.
Can you email me the BMP?

Bill
Message 5 of 12
BillZ
in reply to: Anonymous

On second try, I think you have run into a limitation of DCL that is an annoiance. Unless someone else can make me look like a Fnark and come up with a way to do it, I would say it can't be done.

Bill
Message 6 of 12
Anonymous
in reply to: Anonymous

If so, I guess I'll have to keep limping along making dialogs with an excess
of whitespace between descriptions and the other tiles to their right. I
just wonder how dcl decides how big to make that space.

Thanks for giving it some thought.

BillZ wrote in message
news:f10a2fc.3@WebX.maYIadrTaRb...
On second try, I think you have run into a limitation of DCL that is an
annoiance. Unless someone else can make me look like a Fnark and come up
with a way to do it, I would say it can't be done.
Message 7 of 12
Anonymous
in reply to: Anonymous

Chuck

put the text in a column and right justify it,
you can use text too...or
can mix with paragraphs etc,




test: dialog
{
label = "Test";
key = "title";

: row
{
: column {
: text_part
{
label = "Permanent scale:";
key = "pscaledesc";
width = 16; alignment=right;
fixed_width = true;
} }
: popup_list
{
key = "pscalepop";
edit_width = 10;
fixed_width = true;
}
}
ok_button;
}


HTH
matk


"Chuck Wheat" wrote in message
news:3F6217D41E32CC716A5499F5DD87CD2D@in.WebX.maYIadrTaRb...
> Hello -
>
> I keep running into the same problem when designing dialog boxes (in dcl,
> for AutoLISP routines). I have a text_part to the left of another
element,
> and I can't push them tightly together (if the text_part is to the right,
> they seem to be jammed together by default and there's no problem!).
>
> I pulled some elements out of one of my dialogs to make a simple example:
>
> test: dialog
> {
> label = "Test";
> key = "title";
>
> : row
> {
> : text_part
> {
> label = "Permanent scale:";
> key = "pscaledesc";
> width = 16;
> fixed_width = true;
> }
> : popup_list
> {
> key = "pscalepop";
> edit_width = 10;
> fixed_width = true;
> }
> }
> ok_button;
> }
>
> A bmp of this dialog is attached.
>
> In this particular example the space between the text_part and the
> popup_list doesn't look too bad, but I would still like to know how to
push
> them closer together! I've tried putting them in a narrow column, etc.,
but
> I haven't found the trick.
>
> Thanks -
>
> Chuck
>
>


----------------------------------------------------------------------------
----
Message 8 of 12
Anonymous
in reply to: Anonymous

can do some refinements ...
was this what you were looking for?



test: dialog
{
label = "Test";
key = "title";

: row
{
: column { spacer_0;
: text
{
label = "Permanent scale:";
key = "pscaledesc";
width = 16; alignment=right;
fixed_width = true;
} }
: popup_list
{
key = "pscalepop";
edit_width = 10;
fixed_width = true;
}
}

: spacer { height=1;}
ok_button;
}



"Chuck Wheat" wrote in message
news:3F6217D41E32CC716A5499F5DD87CD2D@in.WebX.maYIadrTaRb...
> Hello -
>
> I keep running into the same problem when designing dialog boxes (in dcl,
> for AutoLISP routines). I have a text_part to the left of another
element,
> and I can't push them tightly together (if the text_part is to the right,
> they seem to be jammed together by default and there's no problem!).
>
> I pulled some elements out of one of my dialogs to make a simple example:
>
> test: dialog
> {
> label = "Test";
> key = "title";
>
> : row
> {
> : text_part
> {
> label = "Permanent scale:";
> key = "pscaledesc";
> width = 16;
> fixed_width = true;
> }
> : popup_list
> {
> key = "pscalepop";
> edit_width = 10;
> fixed_width = true;
> }
> }
> ok_button;
> }
>
> A bmp of this dialog is attached.
>
> In this particular example the space between the text_part and the
> popup_list doesn't look too bad, but I would still like to know how to
push
> them closer together! I've tried putting them in a narrow column, etc.,
but
> I haven't found the trick.
>
> Thanks -
>
> Chuck
>
>


----------------------------------------------------------------------------
----
Message 9 of 12
Anonymous
in reply to: Anonymous

I had gotten as far as your first post (ie right aligning the text), but
hadn't figured out how to push the text down ... thanks. Only thing is, the
extra whitespace is still there, just moved over to the left of the text.

There would be times when this would work, like if the text and edit box
were both to the right of something else, and the text didn't need to align
with anything above and below it.

It's probably worth noting that if you give the edit box an equivalent label
rather than placing text next to it, you get the same excess whitespace:

test: dialog
{
label = "Test";
key = "title";
: popup_list
{
key = "pscalepop";
label = "Permanent scale:";
edit_width = 10;
fixed_width = true;
}
ok_button;
}

Too bad it doesn't work to just put it in a column and give the column a
fixed width to squeeze them together! It sure sounds like it should work
...
Message 10 of 12
Anonymous
in reply to: Anonymous

Chuck

i have found out by experience, there is always a way,
maybe not what you expect, but something similar...
and sometimes nicer. try the code below, remove the
label and add the following to your lisp code...
(set_tile "pscaledesc" "Permanent scale:")

BTW the spaces are sometimes necessry, but if you
realy have to, you can try to concatenate text_parts
without spaces.

mark

test: dialog { label = "Test"; key = "title";
: spacer { height=0;}
: row { alignment=left;
: column { alignment=top; fixed_height=true;
: spacer {height=0; }
: text_part { // label = "Permanent scale:";
key = "pscaledesc"; width=14; alignment=right; } }
: popup_list { key = "pscalepop"; edit_width = 10;} }
: spacer { height=0.5;} ok_button; }





"Chuck Wheat" wrote in message
news:7456305B21088252D6F242A485091994@in.WebX.maYIadrTaRb...
> I had gotten as far as your first post (ie right aligning the text), but
> hadn't figured out how to push the text down ... thanks. Only thing is,
the
> extra whitespace is still there, just moved over to the left of the text.
>
> There would be times when this would work, like if the text and edit box
> were both to the right of something else, and the text didn't need to
align
> with anything above and below it.
>
> It's probably worth noting that if you give the edit box an equivalent
label
> rather than placing text next to it, you get the same excess whitespace:
>
> test: dialog
> {
> label = "Test";
> key = "title";
> : popup_list
> {
> key = "pscalepop";
> label = "Permanent scale:";
> edit_width = 10;
> fixed_width = true;
> }
> ok_button;
> }
>
> Too bad it doesn't work to just put it in a column and give the column a
> fixed width to squeeze them together! It sure sounds like it should work
> ...
>
>
Message 11 of 12
Anonymous
in reply to: Anonymous

Fabulous! I'm attaching another bmp for anyone that might follow this
thread. It was generated with this code:
test: dialog
{
label = "Test";
key = "title";
: row
{
: text_part
{ // label = "";
key = "pscaledesc";
width=14;
fixed_width = true;
}
: popup_list
{
key = "pscalepop";
// label = "";
edit_width = 10;
fixed_width = true;
}
}
ok_button;
}

Notice that I took the right alignment and spacer out and it still works.

Having to drive the text tile is no problem at all because half the time I
do it anyway. Thank you very much indeed for digging into this!
Message 12 of 12
Anonymous
in reply to: Anonymous

Chuck
you are welcome...
you might have to keep the right alignment...
because as soon as the text is something
shorter than "Permanent Scale:" then you will
find yourself same place you started last year...
the width=14 is controlling the size... but i guess
you know enough now to manipulate anything.
mark

"Chuck Wheat" wrote in message
news:E2BF55AD3FA89567C0F50AF9CDA32DA2@in.WebX.maYIadrTaRb...
> Fabulous! I'm attaching another bmp for anyone that might follow this
> thread. It was generated with this code:
> test: dialog
> {
> label = "Test";
> key = "title";
> : row
> {
> : text_part
> { // label = "";
> key = "pscaledesc";
> width=14;
> fixed_width = true;
> }
> : popup_list
> {
> key = "pscalepop";
> // label = "";
> edit_width = 10;
> fixed_width = true;
> }
> }
> ok_button;
> }
>
> Notice that I took the right alignment and spacer out and it still works.
>
> Having to drive the text tile is no problem at all because half the time I
> do it anyway. Thank you very much indeed for digging into this!
>
>


----------------------------------------------------------------------------
----

Can't find what you're looking for? Ask the community or share your knowledge.

Post to forums  

Autodesk Design & Make Report

”Boost