AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Decodedate(..) und IntToStr(Tag) = 0 >>> Warum?
Thema durchsuchen
Ansicht
Themen-Optionen

Decodedate(..) und IntToStr(Tag) = 0 >>> Warum?

Ein Thema von PASST · begonnen am 3. Jul 2006 · letzter Beitrag vom 3. Jul 2006
Antwort Antwort
PASST

Registriert seit: 30. Mär 2005
Ort: Krefeld
325 Beiträge
 
Delphi 7 Enterprise
 
#1

Decodedate(..) und IntToStr(Tag) = 0 >>> Warum?

  Alt 3. Jul 2006, 12:15
Hi NG.

Delphi 4 (update 3)

Ich habe mal wieder ein seltsames Problem.

Ich lese das aktuelle Datum mit DecodeDate() aus und schreibe es nachher als Text für die drei Word-Werte Jahr, Monat und Tag zurück. Allerdings erhalte ich dann für IntToStr(Tag) = 0 und nicht den aktuellen Tag. Das ist unabhängig davon ob heute eine ein- oder zweistellige Tageszahl ist. Der Word-Wert für Tag ist aber richtig. Jahr und Monat werden dabei korrekt konvertiert.
Delphi-Quellcode:
var Jahr, Monat, Tag: Word;
..
DecodeDate(Date, Jahr, Monat, Tag);
.. // hier passiert irgendwas ohne Jahr, Monat, Tag zu berühren
sJahr := IntToStr(Jahr);
sMonat := IntToStr(Monat);
sTag := IntToStr(Tag); // -> = 0
Kann mir jemand helfen?

Gruß
Peter
  Mit Zitat antworten Zitat
Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.755 Beiträge
 
Delphi 10.4 Sydney
 
#2

Re: Decodedate(..) und IntToStr(Tag) = 0 >>> Warum?

  Alt 3. Jul 2006, 12:26
Hallo Peter,

also bei mir ,Delphi6, funktioniert Dein Code.

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.142 Beiträge
 
Delphi 12 Athens
 
#3

Re: Decodedate(..) und IntToStr(Tag) = 0 >>> Warum?

  Alt 3. Jul 2006, 12:28
Ich vermute mal ganz einfach dein Tag ist außerhalb der Prozedur/Funktion definiert, welche bestimmt och noch 'ner Ereignisprozedur ist.

Tag gibt's auch als Eigenschaft (siehe OH).

also am einfachsten wird es sein die Variable Lokal zu machen, umzubenennen, oder als qualifizieren Bezeichner aufzurufen ^^
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
PASST

Registriert seit: 30. Mär 2005
Ort: Krefeld
325 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Decodedate(..) und IntToStr(Tag) = 0 >>> Warum?

  Alt 3. Jul 2006, 12:39
Argh natürlich!
Da das ganze innerhalb eines With-Statements stattfindet, wird meine Variable als Objekt-Eigenschaft verstanden.
Normalerweise habe ich auch immer ein Präfix vor jeder Variable, das den Typ der Variable erkennen lässt. Damit habe ich jetzt das Problem umgangen.

Gruß und schönen Dank für die Hilfe.

Peter
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:31 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