Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi sortieren/Filter von String Bsp. 2003/1-2003/6 (https://www.delphipraxis.net/12570-sortieren-filter-von-string-bsp-2003-1-2003-6-a.html)

Albi 30. Nov 2003 08:45


sortieren/Filter von String Bsp. 2003/1-2003/6
 
Hallo alle zusammen,

ich habe ein kleines Problem mit dem Filtern von Strings. Der Benutzer kann in einem Form sagen von wo bis wo er einen ReNr. gefiltert haben will. Die Nummer sehen so 2003/1. Nun habe ich das Problem, das wenn man sagt er soll alle von 2003/1 bis 2003/6 ausgeben, auch alle diese mit ausgibt die eine 1 oder 6 beinhalten. Das heißt 2003/11, ../12,../13 uws. werden ebensfalls mit ausgegeben.

Wie kann man dem Prog sagen, das er genau das nicht machen soll? Ich habe es mit einer Function versucht, die mir die Zeichen nach dem "/" ausgibt aber das hat auch nicht gefunzt.

Kamil 30. Nov 2003 10:32

Re: sortieren/Filter von String Bsp. 2003/1-2003/6
 
Am einfachsten wäre es wenn du die Daten intern so speichern würdest: 2003/01, 2003/02, ..., 2003/09, 2003/10, ...

SirThornberry 30. Nov 2003 10:41

Re: sortieren/Filter von String Bsp. 2003/1-2003/6
 
du könntest 2003/1 etc. als zahl darstellen und dann mit größer kleiner abfragen
Delphi-Quellcode:
gesamt := '2003/1';
zahl := strtoint(copy(gesamt, 1, pos('/',gesamt)-1)) * 365 + strtoint(copy(gesamt, pos('/',gesamt)+1), 2) * 30;

Albi 30. Nov 2003 11:57

Re: sortieren/Filter von String Bsp. 2003/1-2003/6
 
Vielen dank ich werde es gleich mal ausprobieren.

Kamil, ich speichere die Daten ja so in der DB und genau ist ja das Problem.

Kamil 30. Nov 2003 12:03

Re: sortieren/Filter von String Bsp. 2003/1-2003/6
 
Auch mit der "0"?
2003/01

Albi 30. Nov 2003 12:33

Re: sortieren/Filter von String Bsp. 2003/1-2003/6
 
Nein Sie stehen als 2003/1 usw. in der DB. Es sind Akenzeichen und der RA will das die AZ so lauten.


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:27 Uhr.

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