Hallo,
Zitat:
Hoffe Ihr seht durch [...]
Na, eigentlich nicht wirklich.
Zitat:
Ich schaffe es einfach nicht, das er bei jedem weiteren Eintrag eine Spalte tiefer schreibt und dann in die richtigen Zeilen (die Zeilen sind nciht das prob, ich schaffe es nicht in eine weitere Spalte automatisch eintragen zu lassen)
Öhm, ich vermute mal - aber das ist reines Raten -, dass Du dem Stringgrid weitere Zeilen/Spalten hinzufügen möchtest; wenn dem so ist, dann macht man das über RowCount/ColCount - einfach den aktuellen Wert + 1.
Zitat:
Nun ist ein weiteres Problem aufgetreten:
Anhand des Geburtsjahres wird die Altersklasse festgelegt (soweit klappt es), jedoch muss ich nun noch beachten das der 28.04.2014 der Stichtag für die altersklassen ist.
Such mal in der
OI nach (DateUtils) YearsBetween
Ein
ShowMessage (IntToStr (YearsBetween (EncodeDate (2014, 2, 28), EncodeDate (1975, 4, 1))))
gibt Dir hier 38 aus.
Damit könntest Du z. B. mit:
Delphi-Quellcode:
case YearsBetween (Date1, Date2) of
30..34 : s := '30-34';
35..39 : s := '35-39';
40..44 : s := '40-44';
end;
StringGrid1.Cells [ACol, ARow] := s + ' Jahre'
die entsprechenden Inhalte füllen - wobei Date1 = Stichtag, Date2 = EncodeDate (mit den Daten aus den Eingabefeldern)
Gruß