closed

Loginbox

Please enter your username and password into the following fields to log in.


  • Username:
  • Password:
  •  
  • Auto log in on every visit.


  •  

Ein paar Delphi-Fragen



Harry offline
PowerUser
Avatar
Gender: male
Location: GERMANY  zwischen Augsburg und Ulm
Age: 54
Posts: 1473
Registered: 03 / 2003
Private message
Subject: Ein paar Delphi-Fragen  -  Posted: 25.12.2018 - 12:37   -  
Hallo,

ich habe hier eine Unit mit einer Procedure, die wohl in Delphi geschrieben wurde und ein paar Fragen dazu (ich hab früher mal Turbo Pascal benutzt, aber danach setzt es aus).

- ich vermute mal, daß der Datentyp Double unserem Fix64 entspricht, oder?
- was ist der Dateityp TDateTime?
- was machen die Proceduren DecodeDate und EncodeDate?

In der mir im Quellcode vorliegenden Unit wurden die Delphi-Units SysUtils und Math importiert.

Vielleicht kann mir ja einer die Fragen beantworten, ich möchte das in einem AVRCo-Prog verwenden.

Gruss
Harry
Elektronik arbeitet mit Rauch - wenn man den Rauch raus läßt, funktioniert es nicht mehr.
Electronics works with smoke - if you let the smoke out, it works no longer.
go down go up
rh offline
Administrator
Avatar
Gender: male
Location: GERMANY  Germany
Age:
Posts: 5415
Registered: 03 / 2002
Homepage Private message
Subject: Re: Ein paar Delphi-Fragen  -  Posted: 25.12.2018 - 18:30   -  
Hallo Harry,
Double ~ Fix64. Beide sind 64bit Typen.
Der erstere ist halt Floating point, der zweite Fixed point.
In den allermeisten Fällen kann man davon ausgehen dass diese "kompatibel" sind.

Diese Date und Time Funktionen sind Delphi Spezial. Man kann sowas
im AVRco nur nachbilden mit einer RTC. Oder mit einer Internet Zeit......

rolf
Cars don't buy cars -- Autos kaufen keine Autos.
Henry Ford
This post has been edited 1-times. Last edit: 25.12.2018 - 18:31 by rh.
go down go up
Harry offline
PowerUser
Avatar
Gender: male
Location: GERMANY  zwischen Augsburg und Ulm
Age: 54
Posts: 1473
Registered: 03 / 2003
Private message
Subject: Re: Ein paar Delphi-Fragen  -  Posted: 26.12.2018 - 10:59   -  
Hallo Rolf,

ok danke. Ich habe inzwischen selber noch was heraus gefunden: DecodeDate wandelt ein Datum (das als TDateTime-Variable gespeichert ist) in Tag, Monat und Jahr um, EncodeDate ist das Gegenteil. Die TDateTime-Variable ist ein 64-Bit Typ, bei dem im Vorkomma-Teil das Datum und im Nachkomma-Teil die Uhrzeit steht. Das Datum wird dabei als vergangene Tage seit dem 30.Dezember 1899 gespeichert.

Da bei meiner Unit mit dieser Funktion nur der Tag-des-Jahres errechnet wird und ich das auch auf anderem Wege machen kann, spielt es keine Rolle.

Gruss
Harry
Elektronik arbeitet mit Rauch - wenn man den Rauch raus läßt, funktioniert es nicht mehr.
Electronics works with smoke - if you let the smoke out, it works no longer.
go down go up
Harry offline
PowerUser
Avatar
Gender: male
Location: GERMANY  zwischen Augsburg und Ulm
Age: 54
Posts: 1473
Registered: 03 / 2003
Private message
Subject: Re: Ein paar Delphi-Fragen  -  Posted: 26.12.2018 - 12:22   -  
Ist sowas in Delphi echt erlaubt?
Code
Function RMod(X,Y:Double):Double;
  Begin
    Result := X - Int(X/Y) * Y;
  End;

Also Kommazahl - Integer * Kommazahl?

Rechnet Delphi eigentlich von sich aus Punkt vor Strich?

Harry
Elektronik arbeitet mit Rauch - wenn man den Rauch raus läßt, funktioniert es nicht mehr.
Electronics works with smoke - if you let the smoke out, it works no longer.
go down go up
Merlin offline
Schreiberling
Avatar
Gender: male
Location: UNITED KINGDOM 
Age:
Posts: 853
Registered: 03 / 2005
Private message
Subject: Re: Ein paar Delphi-Fragen  -  Posted: 26.12.2018 - 13:56   -  
In Delphi the function is legal. '*' and '-' apply to both double and integer, and you may multiply a double by an integer. If you are trying to transfer to AVRCo you must be careful to add extra brackets to remove ambiguity. The 'precedence of operators' is not the same.
Merlin.

:magic:

Software is a black art.
go down go up
rh offline
Administrator
Avatar
Gender: male
Location: GERMANY  Germany
Age:
Posts: 5415
Registered: 03 / 2002
Homepage Private message
Subject: Re: Ein paar Delphi-Fragen  -  Posted: 26.12.2018 - 16:05   -  
Hallo Harry,

soweit ich weiss ergibt Int(double) in Delphi kein Integer sondern
den ganzzahligen Wert von double aber wiederum als Double.
Macht der AVRco genauso.

rolf
Cars don't buy cars -- Autos kaufen keine Autos.
Henry Ford
This post has been edited 2-times. Last edit: 26.12.2018 - 16:08 by rh.
go down go up
 


Registered users in this topic
Currently no registered users in this section

Delete cookies of this forum  •  FAQ / Help  •  Team page  •  Imprint   |  Local time: 21.03.2019 - 09:21