variable zahl eintäge in tlistbox oder advsmoothlistbox

[DeddyH]

Und was ist mit dem ersten Eintrag? Und was passiert, wenn überhaupt keine Einträge vorhanden sind? Übrigens: verwende doch Delphi-Tags anstatt Code-Tags.

[edit] Aha, selber gemerkt [/edit]

[Marcoo]

sry aber was sind delphi tags und was sind code tags

[fkerber]

Hi,

[delphi][/delphi] sind die Delphi-Tags.
Das bewirkt die schöne Darstellung des Codes im Beitrag - kann auch über das Delphi-Symbol im Editor eingefügt werden.

LG, Frederic

[Marcoo]

ahhh Ok bin neu hier im forum
So oder ?

[fkerber]

Hi,

kein Problem - ja, genau so.


LG, Frederic

[Marcoo]

Aber eine sache hab ich noch selbes programm anderer punkt soll ich ein neues thema machen oder nicht
weil das programm ist ja ein Geburtstags errinerer und da mus man ja logischer weise den tag des geburtstags eintragen ich hab das nur halb hingekriegt also es geht aber nur1 mal also kann ich den 28.11.2010 eintragen aber am 28.11.2011 wird er mich nicht errinern

Delphi-Quellcode:

var
  jahr, monat, tag: Word;
begin
  DecodeDate(Date, jahr, monat, tag);
  DatePicker.Date := Date;
  DatePicker.Calendar.MinDate := Date;
  DatePicker.Calendar.MaxDate := Date + 365;

und die tage bis zu dem im datepicker angegeben tag berechnet er mit

Delphi-Quellcode:

AdvSmoothListBox1.Items[i].Notes := inttostr
(DaysBetween(strtodate(AdvSmoothListBox1.Items[i].Info), now))
+ ' Tage noch';

[fkerber]

Hi,

mach am Besten eine neue Frage auf - das erhöht die Übersichtlichkeit.


LG, Frederic