| Autor |
Beitrag |
fisch
Hält's aus hier
Beiträge: 12
Win 95, Win XP Home
D3 Prof, D6 Pers
|
Verfasst: Mo 24.11.03 19:56
hallo,
ich hole mir die Uhrzeit so:
  Quelltext
1:
2:
3:
|
var zeit:string;
zeit:=formatdatetime('hh:nn:ss',time); |
kann man so auch auf einen hundertstel genau die Zeit anzeigen?
fisch
|
|
MSCH
 
Beiträge: 1448
Erhaltene Danke: 3
W7 64
XE2, SQL, DevExpress, DevArt, Oracle, SQLServer
|
Verfasst: Mo 24.11.03 20:14
jeap, siehe Onlinehilfe:
| fisch hat folgendes geschrieben: | hallo,
ich hole mir die Uhrzeit so:
Quelltext
1:
2:
3:
|
var zeit:string;
zeit:=formatdatetime('hh:nn:ss:zz',time); |
kann man so auch auf einen hundertstel genau die Zeit anzeigen?
fisch |
grez
msch _________________ ist das politisch, wenn ich linksdrehenden Joghurt haben möchte?
|
|
fisch 
Hält's aus hier
Beiträge: 12
Win 95, Win XP Home
D3 Prof, D6 Pers
|
Verfasst: Mo 24.11.03 21:11
hallo,
also bei mir heißt es dann statt: 20:10:47:23 20:10:47:zz. 
fisch
|
|
Klabautermann
Beiträge: 6366
Erhaltene Danke: 60
Windows 7, Ubuntu
Delphi 7 Prof.
|
Verfasst: Di 25.11.03 11:42
Hallo,
setze noch ein z dazu (dann ist die ausgabe mit führenden Nullen) oder lasse eines weg (keine führenden Nullen). Dann sollte es klappen.
Gruß
Klabautermann
|
|
fisch
Hält's aus hier
Beiträge: 12
Win 95, Win XP Home
D3 Prof, D6 Pers
|
Verfasst: Di 25.11.03 15:55
hallo,
nein, es ist immer noch ein z statt einer Zahl. 
fisch
|
|
Klabautermann
Beiträge: 6366
Erhaltene Danke: 60
Windows 7, Ubuntu
Delphi 7 Prof.
|
Verfasst: Di 25.11.03 16:20
Hi,
ich sehe gerade auch mit 2 z geht es bei mir. Gab es den Parameter zu Delphi 3 Zeiten noch nicht?
Gucke am besten mal unter FormatDateTime in der Delphi Hilfe nach.
Gruß
Klabautermann
|
|
fisch
Hält's aus hier
Beiträge: 12
Win 95, Win XP Home
D3 Prof, D6 Pers
|
Verfasst: Di 25.11.03 16:53
hallo,
ich hab nachgeschaut und nichts gefunden
gib es vielleicht noch andere möglichkeiten als formatdatetime?
fisch
|
|
smiegel
Beiträge: 992
Erhaltene Danke: 1
WIN 7
D7 Prof., C#, RAD XE Prof.
|
Verfasst: Mi 26.11.03 09:07
Hallo,
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
| function FormatZeitmitMilisekunden(const aZeit:TDateTime);
var std, min, sek, ms:Word;
begin
DecodeTime(aZeit, std, min, sek, ms);
Result:=Format('%0.2d:%0.2d:%0.2d:%0.2d', [std, min, sek, ms]);
end; |
Anwenden kannst Du die Funktion wie folgt:
Delphi-Quelltext
1:
| Label1.Caption:=FormatZeitmitMilisekunden(Time); | _________________ Gruß Smiegel
Ich weiß, daß ich nichts weiß, aber ich weiß mehr als die, die nicht wissen, daß sie nichts wissen. (Sokrates)
|
|
fisch
Hält's aus hier
Beiträge: 12
Win 95, Win XP Home
D3 Prof, D6 Pers
|
Verfasst: Mi 26.11.03 14:12
hallo,
ich hab deine function so verändert:
Quelltext
1:
| function FormatZeitmitMilisekunden(const aZeit:TDateTime):string; |
funktioniert prächtig!  danke!
fisch
|
|
