Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Datum aus Listbox verwenden (https://www.delphipraxis.net/157553-datum-aus-listbox-verwenden.html)

Tow1994 16. Jan 2011 11:25

Delphi-Version: 5

Datum aus Listbox verwenden
 
Also: Die Aufgabe besteht darin: Mit dem DateTimePicker zwei Datum in die Listbox einlesen (was funktioniert) das sieht dann so aus: 14.01.2011 12:24 und von dem Datum, das ausgewählt wird muss ich mit DecodeDate weiterarbeiten können. Wie mache ich das?
DELPHI VERSION 2006!!

Die Muhkuh 16. Jan 2011 11:29

AW: Datum aus Listbox verwenden
 
Delphi-Quellcode:
einString := ListBox.Items[0]; // Erstes Item der Listbox in einen String auslesen
Den String kannst Du nun beliebig weiterverwurschteln.

hans ditter 16. Jan 2011 11:31

AW: Datum aus Listbox verwenden
 
ähm, also ich kann dir jetzt nicht so richtig folgen, wo jetzt eigentlich das Problem ist. Du nimmst deinen TDateTime-Wert und schreibst folgendes:
Delphi-Quellcode:
DecdeDate(deinDateTime,y,m,d);
wobei deinDateTime der TDateTime-Wert ist und y,m,d Variablen (die du vorher deklarieren musst) vom Typ Word sind.

Ich hoffe, ich hab das Problem jetzt richtig verstanden.
Ach ja: in den Variablen y,m,d werden dann Jahr(=y), Monat(=m) und Tag(=d) gespeichert. Heisst auf die kannst du wieder zugreifen und dann damit weiterrechnen.

LG, hans ditter

Tow1994 16. Jan 2011 11:34

AW: Datum aus Listbox verwenden
 
Wow, danke ihr beiden. Hat sich schon erledigt, ich habe im DecodeDate(StrtoDatetime()) verwendet und das hat nicht funktioniert. So habe ich eine Hilfsvariable H:=StrtoDatetime(), Decodedate(H, Jahr, Monat, Tag) gemacht und es hat funktioniert.:-D Außerdem war es noch die Reihenfolge der Befehle. Tut mir leid, ist mein erstes Semester in Turbo Delphi.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:55 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