Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Datum vergleichen (https://www.delphipraxis.net/28779-datum-vergleichen.html)

superstar025 30. Aug 2004 08:31


Datum vergleichen
 
Hallo
ich möchte zwei Datum vergleichen.
Das zweite muss auf jedenfall grösser sein wie das erste.

Die Daten stehen jeweils in einem Maskedit feld mit dem Format TT.MM.JJJJ

Wie kann ich das kontrollieren

mfg
superstar025

:drunken:

Matze 30. Aug 2004 08:33

Re: Datum vergleichen
 
Du kannst ein Datum so vergleichen, wie eine ganz normale Zahl. Spricht: Mit > >= <= < =


Edit: Natürlich davor mit StrToDate umwandeln.

superstar025 30. Aug 2004 08:37

Re: Datum vergleichen
 
wie sieht das denn im quelltext aus?


:dp:

himitsu 30. Aug 2004 08:38

Re: Datum vergleichen
 
Dieses ist auch verständlich, da die Datums/Zeit-Typen intern ja auch nur Zahlen-Typen sind, welche sich ja einfach vergleichen lassen.

Delphi-Quellcode:
  TDate = type Double;
  TDateTime = type Double;
  TTime = type TDateTime;

Matze 30. Aug 2004 09:01

Re: Datum vergleichen
 
Zitat:

Zitat von superstar025
wie sieht das denn im quelltext aus?

Hmm, bisschen Eigeninitiative solltest du schon zeigen, aber ich bin ja net so:

Delphi-Quellcode:
  if StrToDate(MaskEdit2.Text) > StrToDate(MaskEdit1.Text) then
  begin
    //mach was
  end;

superstar025 30. Aug 2004 09:13

Re: Datum vergleichen
 
Danke für die Arbeit

ich bin halt noch ein wenig Anfänger daher die unbekommenheit


:roll:

superstar025 30. Aug 2004 09:36

Re: Datum vergleichen
 
Hallo bei mir erscheint folgender Fehlercode beim Delphicode


[Fehler] Unit2.pas(362): Operator ist auf diesen Operandentyp nicht anwendbar


Delphi-Quellcode:
procedure TForm2.MaskEdit9Exit(Sender: TObject);
begin
if     (maskedit7.Text <> '000,000')
and    (maskedit9.Text <> '31.12.2015')
[b]and    StrToDate(MaskEdit9.Text) > StrToDate(MaskEdit8.Text)[/b]

then
begin
button11.Enabled:=true;
end;
end;

Woran kann das liegen??

mfg superstar025
:firejump:

Matze 30. Aug 2004 09:40

Re: Datum vergleichen
 
In welche zeile kommt das?

Setze mal um

Delphi-Quellcode:
StrToDate(MaskEdit9.Text) > StrToDate(MaskEdit8.Text)
Klammern

DP-Maintenance 30. Aug 2004 09:42

DP-Maintenance
 
Dieses Thema wurde von "Sharky" von "Datenbanken" nach "Object-Pascal / Delphi-Language" verschoben.
Scheint auf den ersten Blick nichts mit Datenbanken zu tun zu haben

superstar025 30. Aug 2004 09:58

Re: Datum vergleichen
 
in der letzten

hat aber nichts gebracht das umsetzen


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:54 Uhr.
Seite 1 von 2  1 2      

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