Q&A

  • 폼 재사용하는 방법
maskedit 에서 날짜를 입력 받을때  달력폼에서 마우스 클릭으로 날짜를 입력받게 하는데

입력,조회 등 여러 기능에서 날짜를 입력 받을시 달력폼 하나로 모든 기능에서

폼을 재사용하고 싶은데 방법이 없을까요

고수님들 한수 부탁 드려요!

procedure TForm13.BitBtn1Click(Sender: TObject);
var
  wDate : TDate;
begin
  wDate := StrToDate(Edit1.Text+'-'+Edit2.Text+'-'+ inttostr(Calendar1.Day));
  Form2.DBEdit1.Text := datetostr(wdate);
  Form2.DBEdit2.SetFocus;
  Close;
end;

0  COMMENTS