Einzelnen Beitrag anzeigen

Tpercon

Registriert seit: 7. Jun 2002
638 Beiträge
 
Delphi 5 Professional
 
#23

Re: ShowMessage mit Hilfe von Datum in ListView

  Alt 5. Sep 2003, 10:45
Wo liegt dann dein Problem?
Den Code von mir mit Yheeky's Idee verknüpft ergibt das:
Delphi-Quellcode:
procedure Tfrm_terminplaner_main.Timer2Timer(Sender: TObject);
var
  i: integer;
begin
    for i:=0 to lv_eintraege.Items.Count - 1 do begin
      if (StrtoDate(lv_eintraege.Items[i].SubItems[1])=date) and (StrtoTime(lv_eintraege.Items[i].SubItems[2])=time) then begin
        ShowMessage('Ihr Termin ('+lv_eintraege.Items[i].SubItems[0]+') beginnt!');
      end;
    end;
end;
Das müßte doch funktionieren?
  Mit Zitat antworten Zitat