134
sTrend.Visible := cbHideTrend.Checked;
end;
procedure TfRointers.cbHideValuesClick(Sender: TObject);
begin
//
mValues.Visible := cbHideValues.Checked;
Splitter1.Visible := cbHideValues.Checked;
Splitter1.Left := 10;
end;
procedure TfRointers.DBGrid2TitleClick(Column: TColumn);
begin
dbgTitleClick (Column);
end;
procedure TfRointers.FormCreate(Sender: TObject);
begin
//
cbHideSmoothingClick(cbHideSmoothing);
cbHideTrendClick(cbHideTrend);
cbHideDataClick(cbHideData);
cbHideResultClick(cbHideResult);
cbHideValuesClick(cbHideValues);
end;
end.