Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Teile eines String in Integer umwandeln (https://www.delphipraxis.net/98444-teile-eines-string-integer-umwandeln.html)

schrimm 27. Aug 2007 14:48


Teile eines String in Integer umwandeln
 
Hi,
ich würde egrn strings aus einer listbox in integer umwandeln, um genauer zu sein z.b. das 6. bis 9. Zeichen als eine Zahl.
meine idee war folgende:
Delphi-Quellcode:
y:=strtoint(LBweck.Items[i][6..9]);
//y soll die integer werden, da das auf nehreren Zeilen passiert i als Zählvariable
das funzt aber nicht, weil der mit dem [6..9] ein prob hat
das ganze sieht in der listbox z.b. so aus:
"13.12.2007" und das 2007 will ich dann als integer haben
Ich hoffe, es gibt eine einfache lösung dafür :roll:

mkinzler 27. Aug 2007 14:49

Re: Teile eines String in Integer umwandeln
 
Einen Teilstring kannst du per Copy() extrahieren.

generic 27. Aug 2007 14:51

Re: Teile eines String in Integer umwandeln
 
mit copy ausschneiden.

Delphi-Quellcode:
y:= strtoint( copy(LBweck.Items[i], 6, 4));

marabu 27. Aug 2007 15:00

Re: Teile eines String in Integer umwandeln
 
Hier noch eine Alternative:

Delphi-Quellcode:
uses
  DateUtils; // YearOf()

var
  y: Integer;

begin
  y := YearOf(StrToDate(lbWeck.Items[i]));
end;
Freundliche Grüße

schrimm 27. Aug 2007 15:46

Re: Teile eines String in Integer umwandeln
 
danke, ging ja echt schnell :)
es hat alles gefunzt :bounce2: :dancer2:


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:37 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz