怎样使delphi控件在应用程序中任意定位、放大、改变属性

Question

只是做过office的ole,呵呵.
关注中

Answer 1

可以在程序中动态的改变：控件名.属性名:=属性值
如对一button的操作：
button1。height：=‘edit1.text’；
edit1.text中是要设的值。

Answer 2

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if (key in ['0'..'9']) then
    key := key
  else if key = #13 then
    Button1.Height := strtoint(trim(Edit1.Text))
    else key := #0;
end;

Answer 3

楼上说的是怎样用。可我的问题是：
在我的应用程序中，我的控件应该象delphi控件板上的形式一样，
随时添加到窗体或image控件中，也能随时删除、改变其属性、调用其方法、
捕捉其事件。

Answer 4

//==============================================================================
//运行期拖动一个控件************************************************************
//==============================================================================
procedure DragControl(WinControl: TWincontrol);
const SC_DRAGMOVE = $F012;
begin
  ReleaseCapture;
  WinControl.Perform(WM_SYSCOMMAND, SC_DRAGMOVE, 0);
end;

Answer 5

上面说的能否再详细些，最好有完整的代码那么关于我把控件图标放到toolbar中象开发界面上一样使用呢？