Es fehlt ein ZEIT Literal

[QuickAndDirty]

OK, ich habe Delphi 7 im Einsatz.
Und es kotzt mich mittlerweile an das ich immer sowas in der art schrieben muss.
If Zeitdatum1-zeitdatum2 >= [i][b]Strtotime[/b][/i]('00:02') then Ich benutze javaFX das kennt zeit literale da sind 2h 7min 2s absolut einfach zu gebrauchen.

Ab welcher Version hat Delphi Zeitliterale ?
Und wenn keine das hat, dann bitte ich die jenigen die mit dem Entwicklerteam einen gewissen Kontakt pflegen
doch bitttttte den Tipp einzureichen das Zeitliterale in dem NEUEN COMPILER berücksichtigt werden sollten.

[Sherlock]

Zitat von QuickAndDirty:

OK, ich habe Delphi 7 im Einsatz.
Und es kotzt mich mittlerweile an das ich immer sowas in der art schrieben muss.

Buh, was für eine Ausdrucksweise


If Zeitdatum1-zeitdatum2 >= [i][b]Strtotime[/b][/i]('00:02') then 1) geht das auch auch einfacher und schneller (Beispiel folgt)
und b) unterstützen die Delphitags hier keine Formatierungen (was glaubst Du wie lange ich gerätselt habe, was [i] in dem Zusammenhang soll.

If ((Zeitdatum1-zeitdatum2) >= (2* 1/86400)) then // Lieber einmal zu viel geklammert als einmal zu wenig Aber es gibt übrigens auch in den DateUtils MinutesBetween. Damit ist es ganz einfach.
If MinutesBetween(Zeitdatum1,zeitdatum2) >= 2 then // WOW!

Zitat von QuickAndDirty:

Ich benutze javaFX das kennt zeit literale da sind 2h 7min 2s absolut einfach zu gebrauchen.

Mit vermutlich vernachlässigbarer Performance...im Sinne von "Reden wir lieber nicht drüber "


Sherlock

[mjustin]

Zitat von Sherlock:

Mit vermutlich vernachlässigbarer Performance...im sinne von "Reden wir lieber nciht drüber "

Kommt drauf an - wenn beide Schreibweisen der Konstanten (also auch bei Verwendung von StrToTime) schon vom Compiler ausgewertet werden können, ist der Laufzeitunterschied praktisch null.

Cheers,

[QuickAndDirty]

Zitat von Sherlock:

Zitat von QuickAndDirty:

OK, ich habe Delphi 7 im Einsatz.
Und es kotzt mich mittlerweile an das ich immer sowas in der art schrieben muss.

Buh, was für eine Ausdrucksweise

Du solltest mal meine Bezeichner sehen....

Zitat von Sherlock:

If Zeitdatum1-zeitdatum2 >= [i][b]Strtotime[/b][/i]('00:02') then 1) geht das auch auch einfacher und schneller (Beispiel folgt)
und b) unterstützen die Delphitags hier keine Formatierungen (was glaubst Du wie lange ich gerätselt habe, was [i] in dem Zusammenhang soll.

XD . OK . Wann wird dieser Fehler von VBulletin geändert? (Ich liebe die Kundenperspektive!)

Zitat von Sherlock:

If ((Zeitdatum1-zeitdatum2) >= (2* 1/86400)) then // Lieber einmal zu viel geklammert als einmal zu wenig

SUPER, ich bekomme kein ZEITLITERAL sonder ne Aufforderung mit Bruchteilen von Tagen zu RECHNEN.
Mann, Mann, Mann Du.

(2* 1/86400) das ist NICHT
Strtotime('00:02') SONDERN
Strtotime('00:00:02') Danke für die Demonstration der totalen Untauglichkeit dieser Methode Zeitliterale zu imitieren.
Wie du sicher selbst zugeben musst, ist dieser Weg recht FEHLERANFÄLLIG.

Zitat von Sherlock:

Aber es gibt übrigens auch in den DateUtils MinutesBetween. Damit ist es ganz einfach.
If MinutesBetween(Zeitdatum1,zeitdatum2) >= 2 then // WOW!

Toll. Denkst du es geht mir ausschließlich um Minuten?

Zitat von Sherlock:

Zitat von QuickAndDirty:

Ich benutze javaFX das kennt zeit literale da sind 2h 7min 2s absolut einfach zu gebrauchen.

Mit vermutlich vernachlässigbarer Performance...im Sinne von "Reden wir lieber nicht drüber "

Die Performance wird vom Literal nicht beeinflusst. Und du musst zu geben das es im Hinblick auf einen "lesbaren" Quellcode
mehr Sinn macht als
(2*1/24)+(7*1440)+(2*1/86400) GIB ES ZU!!! *Pistole auf die Brust setzt*

[Laufi]

Hallo!

Du kannst ja einfach schlau sein und sagen

Delphi-Quellcode:

const
  h = 1/24;
  min = h/60;
  s = min/60;

Dann kannst du immer schreiben
2*h + 7*min + 2*s

Liebe Grüsse
Laufi

[QuickAndDirty]

@Laufi:
Schon klar. Mir gefällt es aber deutlich besser ohne *+*+*
Und wenn Überhaupt dann müssten diese Konstanten Global(System Unit)definiert sein.

Das 2. Problem ist das,
es als Bezeichner die Funktion
MATH.MIN
überschreibt

bzw.

h und s als oft als lokale Hilfsvariablen verwendet werden.

2h
oder
3s

dagegen kann nichts anderes als ein Literal sein.


Wie dem auch sei. Es wäre schön wenn sich irgendwer für eine elegante Lösung im nächsten Kompiler von
Borland/Inprise/Codegear/Embarcadero einsetzt.
Ich weiß nicht mehr wer es war aber irgendjemand hier aus dem Forum hat soweit ich das mal mitbekommen habe
ab und zu mal Kontakt zu einem der Entwickler...

[Sherlock]

Zitat von QuickAndDirty:

Zitat von Sherlock:

Zitat von QuickAndDirty:

OK, ich habe Delphi 7 im Einsatz.
Und es kotzt mich mittlerweile an das ich immer sowas in der art schrieben muss.

Buh, was für eine Ausdrucksweise

Du solltest mal meine Bezeichner sehen....

Zitat von QuickAndDirty:

Zitat von Sherlock:

Aber es gibt übrigens auch in den DateUtils MinutesBetween. Damit ist es ganz einfach.
If MinutesBetween(Zeitdatum1,zeitdatum2) >= 2 then // WOW!

Toll. Denkst du es geht mir ausschließlich um Minuten?

Diese Funktion hat viele Geschwister, die sich alle um die jeweiligen Zeitabschnitte kümmern können von YearsBetween bis MillisecondsBetween ist alles da.

Zitat von QuickAndDirty:

Zitat von Sherlock:

Zitat von QuickAndDirty:

Ich benutze javaFX das kennt zeit literale da sind 2h 7min 2s absolut einfach zu gebrauchen.

Mit vermutlich vernachlässigbarer Performance...im Sinne von "Reden wir lieber nicht drüber "

Die Performance wird vom Literal nicht beeinflusst. Und du musst zu geben das es im Hinblick auf einen "lesbaren" Quellcode
mehr Sinn macht als
(2*1/24)+(7*1440)+(2*1/86400) GIB ES ZU!!! *Pistole auf die Brust setzt*

Ja doch

Laufis Lösung ist doch gut...einfach entsprechende Konstanten definieren und fertig.

Sherlock

[WInfo]

Wie wäre es mit einem überladenen Record, in welchem die Konvertierung implizit vorgenommen wird? Dann kannst du Problemlos schreiben

Delphi-Quellcode:

if dt1 - dt2 < '00:00' then
if dt1 - dt2 < '20s' then
if dt1 - dt2 < '20m' then
...

Wäre dies nicht ein Vorschlag?

[QuickAndDirty]

@WInfo:
Das geht sicher nicht unter delphi 7 oder?

Ansonsten, wie würde das aussehen? Es muss halt zu TDatetime zuweisungskompatibel sein.

[mikhal]

Vielleicht helfen dir auch die Bibliotheksroutinen aus SysUtils weiter: DecodeDate, EncodeDate, FormatDateTime...

Grüße
Mikhal