Form1 den form2 de olan MonthCalendardan güncel tarihi almak istediğimde doğru tarihi alamıyorum, sürekli olarak properties deki yani forma monthCalendarı ne zaman eylediysem o tarih geliyor...
Bu yöntemi de denedim...
Kod: Tümünü seç
procedure TForm2.FormShow(Sender: TObject);
begin
MonthCalendar1.Date := Now;
end;
Kod: Tümünü seç
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Caption := DateToStr(Form2.MonthCalendar1.Date);
end;