几个菜问题?

Question

1、设置RichEdit的ScrollBars属性为ssHorizontal，并设HideScrollBars为False
2、假如想动态生成一个Button
var
  MyButton: TButton;
begin
  MyButton := TButton.Create(Self);
  MyButton.Parent := Self;
  ...
end;

Answer 1

1.设置TRichEdit控件的ScrollBars属性.2.例如:
  with TButton.Create(Self) do
  try
    Parent := Self;
    Caption := 'abc';
    Width := 100;
    Height := 30;
    Show;
    ……;
    ……;
    ……;
  finally
    Free;
  end;