Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Zeit aus ini zurück (https://www.delphipraxis.net/115952-zeit-aus-ini-zurueck.html)

DeddyH 20. Jun 2008 14:19

Re: Zeit aus ini zurück
 
Mal ein Beispiel zur Konvertierung und Festlegung eines eigenen Formats:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var s: string;
    sep: char;
    dt: TDateTime;
begin
  //aktuelle Uhrzeit in einem String speichern
  s := FormatDateTime('HH#mm',now);
  //und ausgeben
  ShowMessage(s);
  //alten Timeseparator sichern
  sep := TimeSeparator;
  //und neu setzen
  TimeSeparator := '#';
  //String in TTime konvertieren
  dt := StrToTime(s);
  //alten Timeseparator wiederherstellen
  TimeSeparator := sep;
  //und TTime formatiert ausgeben
  ShowMessage(FormatDateTime('HH:mm',dt));
end;
Zitat:

Delphi-Quellcode:
DateTimePicker1.Time:= ReadString(EinstellungenIni,Uhrzeit,(StrToTime(0)));

Eher so:
Delphi-Quellcode:
DateTimePicker1.Time:= StrToTime(ReadString(EinstellungenIni,Uhrzeit,0));

Vjay 20. Jun 2008 14:20

Re: Zeit aus ini zurück
 
/klugscheiss
Ne ein TimeToStr fehlt, das StrToTime muss nur woanders hin :P

DeddyH 20. Jun 2008 14:22

Re: Zeit aus ini zurück
 
Zitat:

Zitat von Vjay
Ne ein TimeToStr fehlt, das StrToTime muss nur woanders hin

Wo meinst Du jetzt?

RavenIV 20. Jun 2008 14:22

Re: Zeit aus ini zurück
 
Ich klinke mich aus.
Anscheinend will der Threadersteller nicht aus den bisherigen Antworten lernen.

SaFu 20. Jun 2008 14:26

Re: Zeit aus ini zurück
 
Roterkasten

Also mal ganz ehrlich sag mir mal wo das in der Hilfe stehen soll, bezogen auf INI's aber habs ja jetzt

Delphi-Quellcode:
DateTimePicker1.Time:= StrToTime(readString(EinstellungenIni,Uhrzeit,''));


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:31 Uhr.
Seite 3 von 3     123   

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