Einen wunderschönen Guten Morgen an alle Delphianer,
Hab mal wieder eine Frage auf dem Herzen...
Und zwar hab ich vor ein paar Wochen ja hier schonmal Hilfe zu meinem Programm(Ausgangsbuch) erhalten, diesmal gehts um ein Urlaubsbuch ^^
Ja ich möchte eigentlich nur den höchsten und den niedrigsten Datensatz anzeigen lassen in meinen DTP-Feldern.
In meiner Tagesauswahl kann man halt sich mehrere Tage abmelden, für jeden Tag wird ein Datensatz angelegt -> dazu mein Delphi Code:
Delphi-Quellcode:
dTagVon := DTP1_Abwesenvon.date;
dTagBis := DTP2_Abwesenbis.date;
dSpeicherTag := dTagVon;
while dSpeicherTag < dTagBis
do begin
nwotag := dayofweek(dSpeicherTag);
if (nwotag > 1) and (nwotag < 7) then
begin
if sStatus = dsinsert
then begin
Tab_Ausgang.Append;
Tab_Ausgang.putfield('_Vorgang_ID',nNewVorgang);
Tab_Ausgang.putfield('AngelegtAm', now);
Tab_Ausgang.putfield('AngelegtVon', global_Benutzer);
end
else
Tab_Ausgang.findkey(strtoint(sg_urlaub.cells[0, sg_urlaub.row]));
//Tab_Ausgang.putfield('Termin_ID');
Tab_Ausgang.putfield('_MA_NR1',E_MANR.text);
Tab_Ausgang.putfield('_KZ', 1);
Tab_Ausgang.putfield('_Tab_KZ', 'A');
strGrund_ID:= DM1.Get_Name(CB_Grund.text,'_Bezeichnung','XGrund','Grund_ID');
Tab_Ausgang.putfield('_ADRESSEN_NR',strGrund_ID);
Tab_Ausgang.putfield('_Tag_Von',strtodatetime(datetostr(dSpeicherTag) + ' 07:00:00'));
Tab_Ausgang.putfield('_Tag_Bis',strtodatetime(datetostr(dSpeicherTag) + ' 16:30:00'));
Tab_Ausgang.putfield('BearbeitetAm', now);
Tab_Ausgang.putfield('BearbeitetVon', Global_Benutzer);
end;
Tab_Ausgang.post;
dSpeicherTag := dSpeicherTag +1;
end;
Zeige_Daten;
end;
Wie kann ich jetzt wenn ich im Striggrid auf ein Datensatz klicke in meinem DTP-Feld das Datum des Anfangsdatensatzes(Tag_Von) und den des Enddatensatzes(Tag_bis) anzeigen?
Hoffe auf Hilfe und verbleibe mit freundlichen Grüßen
MCFEED
PS.: Falls das Shmia lesen sollte, mein Chef hat deine und meine Beiträge gelesen, falls du dich noch erinnern kannst..Er fand deine Bemerkung nicht so prickelnd(Falscher System-Architekt)
Er is bei
DP unter Andreas Schilling!