기본적으로 Form에 버튼들을 올려놓고 사용하는데...
Form이 실행했을때 개발자가 컴퍼넌트를 Button을 클릭했을때
TSpeedButton을 생성을 해서 원하는 위치에 원하는 크기에 맞는
SpeedButton을 보이게 할수는 없는것인지요!!
-form-----------
(Close)
---------------- Close라는 글은 새로생성한 버튼이고 Caption이겠죠!
한마디로 화면에는 버튼들이 하나도 없는데.. 코딩만으로 화면에 버튼이 보이
게할수있는 방법을 문의하는것입니다..... 고수님들의 답변을 기다리겠습니다.
uses Buttons;
...
private
SpeedBtn: TSpeedButton;
...
procedure TForm1.FormCreate(Sender: TObject);
begin
SpeedBtn := TSpeedButton.Create(Self);
SpeedBtn.Parent := Form1;
SpeedBtn.Caption := 'Close';
SpeedBtn.Font.Size := 8;
SpeedBtn.SetBounds(100, 20, 80, 20);
// (Left, Top, Width, Height)
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
SpeedBtn.Free;
end;
이러면 되겠죠?