Teile eines String in Integer umwandeln

[marabu]

Hier noch eine Alternative:

Delphi-Quellcode:

uses
  DateUtils; // YearOf()

var
  y: Integer;

begin
  y := YearOf(StrToDate(lbWeck.Items[i]));
end;

Freundliche Grüße