오늘도 질문 드리러 왔습니다.

만약에 폼을 하나 생성한 뒤 생성한 폼 위에 버튼을 만들어서 이벤트를 만들려고 합니다.

그런데 제가 처음이라서 그런지 어떻게 해야할지 몰라서

소스는 이정도로 하고

sendbt을 눌르면 showmessage로 Label1값을 뿌리게 하려면 어떻게 해야하나요?

그럼 이만

procedure TCoCoMessage.Button1Click(Sender: TObject);
var
    recvform : TForm;
    label1 : TLabel;
    sendbt : TButton;
begin
                recvform := TForm.Create(self);
                recvform.Width := 308;
                recvform.Height := 300;
                recvform.Position := poMainFormCenter;
                recvform.show;

                label1 := TLabel.Create(self);
                label1.Parent := recvform;
                label1.Caption := '델파이 5.0';

                sendbt := TButton.Create(self);
                sendbt.Parent := recvform;
                sendbt.Top := 250;
                sendbt.Left := 40;
                sendbt.Width := 70;
                sendbt.Height := 25;
                sendbt.OnClick := sendbtclick;
end;

procedure TCoCoMessage.sendbtclick(Sender: TObject);
begin

end;