Re: Grid Control: getting original checkbox state
- Posted by Dan Moyer <DANIELMOYER at prodigy.net> Feb 10, 2003
- 500 views
Jonas, That's ok, and you got it exactly right. I realize the Grid Control is intended more for spreadsheet apps, I was just wondering if it could be generalized to include optional "other" looks. And I can use it just fine just like it is, too. Dan ----- Original Message ----- From: "Jonas Temple" <jktemple at yhti.net> To: "EUforum" <EUforum at topica.com> Sent: Monday, February 10, 2003 8:13 AM Subject: RE: Grid Control: getting original checkbox state > > Dan, > > Sorry to butt in on the conversation. > > I think I understand what you're wanting. You're wanting the grid > control itself to be no larger than the actual size of the rows/columns > within the control. Then the control size would expand as more data > rows were added, eventually showing a scroll bar when the control > reached it's maximum size. Is that about right? > > I believe the current behavior of EuGrid is consistent with other > "commercial" grid controls out there. Most grid controls will have > "grey space" to fill the controls size when the rows/columns don't fill > the entire control. > > It's my opinion that this behavior shouldn't be added to EuGrid. > However, one approach might be to use Don Phillip's xControls to > dynamically change the size of the grid control. Phil has done a nice > job of making sure EuGrid and xControls are compatible. > > HTH, > > Jonas > Dan Moyer wrote: > > Hi Phil, > > > > Well, that's close but not exactly what I meant; refer to the demo > > following > > this (& if it's a poor way to do what I'm trying to do, by all means > > make > > corrections!). > > > > Consider when a Grid Control is created: it shows up as a rectangle of > > x-y > > dimensions, even though it could be *empty* to begin with. Then add > > *one* > > row of data: the row shows up, but inside an otherwise *empty* > > rectangle. > > If you then add additional rows of data, eventually it will have to > > vertically scroll, which it does. > > > > What I am suggesting is that when it *originally* shows, if it has no > > data, > > just the top legends should (optionally) show; then, if *one* row is > > added, > > *just that row* would show under the legends, *not* the whole empty grid > > rectangle. And then, as now, when enough rows are added so there's not > > enough space for them, scroll bars obtain. > > > > Dan Moyer > > > > <code follows:> > > > > -- code generated by Win32Lib IDE v0.14.2 > > > > include Win32lib.ew > > without warning > > > > -------------------------------------------------------------------------- -- > > > > ---- > > -- Window Window1 > > constant Window1 = createEx( Window, "Grid Control with CheckBoxes", 0, > > Default, Default, 600, 300, 0, 0 ) > > constant PushButton2 = createEx( PushButton, "Select File", Window1, > > 484, > > 20, 88, 28, 0, 0 ) > > constant PushButton3 = createEx( PushButton, "Process Data", Window1, > > 484, > > 72, 88, 28, 0, 0 ) > > --------------------------------------------------------- > > -------------------------------------------------------------------------- -- > > > > ---- > > include eugrid.ew > > atom void > > > > integer aGrid, colFileName, colCB1, colCB2, colFileDir > > > > -- Create grid, create parms=(parent, x, y, width, height, show_window) > > aGrid = EGW_CreateGrid( Window1, 10, 15, 450, 200, True ) > > > > -- no row header > > void = EGW_SetGridProperty( aGrid, EGW_ROW_HEADER_WIDTH, 0) > > > > > > -- Filename column - static text, left-aligned by default > > colFileName = EGW_AddColumn( aGrid, "FileName", 200, EGW_LAST, > > EGW_STATIC, > > 1 ) > > void = EGW_SetColumnProperty(aGrid, colFileName, EGW_COL_ALIGN, > > EGW_CENTER) > > --void = EGW_SetColumnProperty( aGrid, colFileName, EGW_COL_WIDTH, 75 > > ) > > > > -- checkbox columns: > > colCB1 = EGW_AddColumn(aGrid, "Action1", 100, EGW_LAST, EGW_CHECKBOX, 2 > > ) > > void = EGW_SetColumnProperty(aGrid, colCB1, EGW_COL_ALIGN, EGW_CENTER) > > colCB2 = EGW_AddColumn(aGrid, "Action2", 100, EGW_LAST, EGW_CHECKBOX, 3 > > ) > > void = EGW_SetColumnProperty(aGrid, colCB2, EGW_COL_ALIGN, EGW_CENTER) > > > > -- file directory column: > > colFileDir = EGW_AddColumn( aGrid, "FileDirectory", 400, EGW_LAST, > > EGW_STATIC, 4 ) > > void = EGW_SetColumnProperty(aGrid, colFileDir, EGW_COL_ALIGN, > > EGW_CENTER) > > -------------------------------------------------------------------------- -- > > > > ---- > > procedure PushButton2_onClick (integer self, integer event, sequence > > params)--params is () > > seq fName, dirName, fullPathName, temp > > seq newRow > > int row, posBS -- posBS is position of back-slash in file name > > > > temp = {} > > > > -- get a file name > > fName = getOpenFileName( Window1, current_dir() & "\\", "" ) > > -- entered a file name? > > if length( fName ) = 0 then > > return > <snip> > > > > TOPICA - Start your own email discussion group. FREE! >