Bu sorunu hallettim dedim ama tarihi 6 ay sonrasına aldığımda sıfır değerini döndürüyor arkadaşlar bi el atın şundan kurtulayım.Komut satırları aynen şöyle;
Procedure TForm1.Button22Click(Sender:TObject);
Var
Yil,ay,Gun:Word;
Aktar:String;
Begin
DecodeDate(Date,Yil,Ay,Gun);
Aktar:=DateToStr(Ay);
If Aktar=DateToStr(Date) Then
Begin
ShowMessage('Bu ay bakım yapılması gereken müşteriler var!');
Form22.Show;
end
else
ShowMessage(DateToStr(Date));
ShowMessage(Aktar);
Form22.Show;
end;
form a girerken ay karşılaştırması yapmam gerekiyor. Fakat bu ay içinde birçok müşteri olacağından sadece Ay için mesaj vermem gerekiyor.
"6 ay için bakım yapılması gereken müşteriler mevcuttur" diye bir mesaj verdirmem gerekiyor dolayısıyla ayı bulmam gerekiyor bu konuda yardım ederseniz çok sevinirim.
