Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Chris P,
19. Okt 2008
Besten Dank für eure Hilfe.
Funktioniert alles wie es soll.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Chris P,
16. Okt 2008
Hab das jetzt so:
procedure TForm1.FormCreate(Sender: TObject);
begin
start := Now();
stop := getTimeRemaining(0, 0, 15);
len := stop - start;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Chris P,
16. Okt 2008
Ok, klingt logisch :-)
Aber welche Einheit hat länge?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Chris P,
16. Okt 2008
Erstmal besten Dank für deine schnelle Antwort.
Ich mache folgendes:
function getTimeRemaining(hour, min, sec: Word): TDateTime;
begin
Result := Now() + EncodeTime(hour, min, sec, 0);
end;
procedure TForm1.FormCreate(Sender: TObject);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Chris P,
16. Okt 2008
Hallo zusammen,
ich schreibe ein Programm welches mir einen Countdown runterzählt.
Gibt es ja schon zu genüge und ist auch soweit kein Problem.
Aber ich möchte den Fortschritt der Zeit zwischen Start- und Endpunkt
prozentual darstellen.
Ist der '/'-Operator auf TDateTime definiert?