Delphi Eingabe von hh:min > 24h

Thema durchsuchen

Ansicht

Themen-Optionen

Eingabe von hh:min > 24h

Ein Thema von hoika · begonnen am 31. Jan 2009 · letzter Beitrag vom 1. Feb 2009

Vorheriger Beitrag

Nächster Beitrag

FAlter

Registriert seit: 21. Jul 2004
Ort: Ostfildern
1.096 Beiträge

FreePascal / Lazarus

Re: Eingabe von hh:min > 24h

31. Jan 2009, 16:42

Hi,

Normales Edit nehmen und dann einfach per Hand umwandeln...

Ungefähr so

markieren

Delphi-Quellcode:

			Str := TimeEdit.Text;

p := pos(':', Str);

if p > 0 then

  TheTime := StrToFloat(Copy(Str, 1, p-1)) / HoursPerDay +

    StrToFloat(Copy(Str, p+1, length(str)) / MinsPerDay

else

  TheTime := StrToFloat(Str) / HoursPerDay;

Mfg
FAlter

Felix Alter

Zitat

« Vorheriges Thema | Nächstes Thema »

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.

Es ist dir nicht erlaubt, auf Beiträge zu antworten.

Es ist dir nicht erlaubt, Anhänge hochzuladen.

Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.

Smileys sind an.

[IMG] Code ist an.

HTML-Code ist aus.

Trackbacks are an

Pingbacks are an

Refbacks are aus

Foren-Regeln

Gehe zu: