FiveTech Support Forums

Hello there!

This is my first post here so please be gentle with your replies...

I defined a dialog from workshop that looks like this:

......
CBS_DETAIL DIALOG 1, 1, 100, 100
STYLE WS_CHILD | WS_BORDER
FONT 10, "Courier"
{
}
......

then in my .prg:

......
DEFINE DIALOG oDlg RESOURCE "CBS_DETAIL";
FROM 1,1 TO oChildWnd:oWndClient:nHeight - 1, oChildWnd:oWndClient:nWidth - 2;
SIZE oChildWnd:oWndClient:nHeight - 1, oChildWnd:oWndClient:nWidth - 2;
OF oChildWnd PIXEL

          ACTIVATE DIALOG oDlg NOWAIT

......

BUT STILL I CAN'T RESIZE IT....

can anybody toss the salad for me here... it would be a great help.

-i'm using FW2.4 and xHarbour 1.0b

My regards.

Was able to SOLVED IT!

I add this:

oRect := oChildWnd:oWndClient:GETCLIRECT()

....

and this:

ACTIVATE WINDOW oChildWnd;
ON INIT ( oDlg:Move( 1,1,oRect:nRight, oRect:nBottom, .T.)

....

I hope this works with other controls too like oFolder define within dialog (as resource)

....

Is there better coding for this solution?

THANKS!

It is fine

You can also use oDlg:SetSize( nWidth, nHeight, lRepaint ) instead of Move()

Thanks so much senior Linares!

I also use oDlg:Resize(...) when I only need the dialog/object to expand.

My best regards,

Mr. Frances A. Padilla
International Elevator & Equipment, Inc.

www.iee.com.ph