Jump to content

TUnimDBGrid auto size column to available space


Mehmet Emin

Recommended Posts

On 7/12/2020 at 2:36 AM, Mehmet Emin said:

I want my last column to fit  available space.

Hello,

Can you try this approach?

procedure TMainmForm.UnimFormReady(Sender: TObject);
begin
  with UnimDBGrid1 do
    JSInterface.JSCall('setFlex', [1], Columns[Columns.Count-1].JSColumn);
end;

 

Link to comment
Share on other sites

  • 10 months later...

in Build 1549, If you want to forcefit equal width colums,  this is not functional :

procedure TMainmForm.UnimFormReady(Sender: TObject);
begin
  UnimDBGrid1.JSInterface.JSCall('setFlex', [1], Columns[0].JSColumn);
  UnimDBGrid1.JSInterface.JSCall('setFlex', [1], Columns[1].JSColumn);
end;

Use instead this :

procedure TMainmForm.UnimFormReady(Sender: TObject);
begin
   UnimDBGrid1.JSInterface.JSConfig('width', ['50%'], dbg.Columns[0].JSColumn);
   UnimDBGrid1.JSInterface.JSConfig('width', ['50%'], dbg.Columns[1].JSColumn);
end;

 

Link to comment
Share on other sites

  • 3 weeks later...
On 7/16/2020 at 12:58 PM, Sherzod said:

Hello,

Can you try this approach?


procedure TMainmForm.UnimFormReady(Sender: TObject);
begin
  with UnimDBGrid1 do
    JSInterface.JSCall('setFlex', [1], Columns[Columns.Count-1].JSColumn);
end;

 

For cbuilder:

 

void __fastcall TMainmForm::UnimFormReady(TObject *Sender)

{

UnimDBGrid1->JSInterface->JSCall("setFlex","1",UnimDBGrid1->Columns->Items[UnimDBGrid1->Columns->Count-1]->JSColumn)   ;

}

Link to comment
Share on other sites

×
×
  • Create New...