Einzelnen Beitrag anzeigen

KrasserChecker

Registriert seit: 21. Jul 2004
120 Beiträge
 
#3

Re: Terminkalender mit Listbox

  Alt 18. Aug 2004, 13:44
Hallo erstmal, probiert mal folgendes:

Zu Problem 1:
Das könnte in der der Timer-Methode stehen:

Delphi-Quellcode:
var i:Integer; d,t:String;
begin
  t :=timetostr(datetimepicker1.Time);
  d :=datetostr(monthcalendar1.Date);

  for i:= 0 to ListBox1.Items.Count-1 do begin
    if Pos(d,ListBox1.Items[i])=0 then Continue;
    if Pos(t,ListBox1.Items[i])=0 then Continue;
    ShowMessage(ListBox1.Items[i]);
  end;
end;
Zu Problem 2:
Ein Aufruf der Methoden "SaveToFile" bzw. "LoadFromFile" könnten da Linderung schaffen.
Z.B.:
Im "OnCreate"-Ereignis:
  ListBox1.Items.LoadFromFile('c:\test.txt'); Im "OnDestroy"-Ereignis:

  ListBox1.Items.SaveToFile('c:\test.txt');
  Mit Zitat antworten Zitat