Veritabanına göre uyarlanmış Hatırlatıcı Gönderen: Cturk Tarih: 02 January 2008 00:07:39
VT'nizde ; (TARIH) Field'ı ve Notlarınızı kaydecek bir Field(HATIRLAT). Açarak Birde "DateTimePicker" Form'a ekleyiniz Bir Timer'e Aşağıdaki kodu atayınız!?. Şahıs'a ait Not Kayıt Edildiği tarihte aktif olacaktır!.
procedure TForm1.Timer1Timer(Sender: TObject);
begin//Uses: DateUtils; ekle
DateTimePicker1.Date:=Now;//Bugünkü Tarih Aktif.
if DayOfWeek(Form1.IBDataSet1TARIH.AsDateTime)=DayOfWeek(DateTimePicker1.Date) then
Label1.Caption:=' '+Form1.IBDataSet1ADI.AsString+' = '+Form1.IBDataSet1HATIRLAT.AsString;
end;
......Kolay Gelsin?.