Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Walter Landwehr,
23. Apr 2023
Danke an alle habe es hinbekommen. Anzeige im OnShow und dann im AfterScroll.
OnShow der Form
Geburtstagheute := False;
.
Im AfterScroll
if CalcBirthday(Patient1Qry.FieldByName('GEBURTSDATUM').AsDateTime) and (Geburtstagheute = False) then
begin
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Walter Landwehr,
23. Apr 2023
Hallo, ich möchte beim Aufruf einer kundenform und Wechsel des Kunden angezeigt bekommen das dieser Kunde Geburtstag hat. In welschen Ereignis sollte die Abfrage stehen. Auf jeden Fall sollte erst das Formular angezeigt werden und dann die Geburtstagsmeldung. Beim Wechsel vom Kunden sollte die Anzeige auch kommen wenn er Geburtstag hat aber nur einmal.
if...