Forum: Netzwerke
Delphi
by DeddyH,
18. Dez 2008
Das ist mit ein Grund dafür, dass man Komponenten vernünftig benennen sollte. Bei dtpDate und dtpTime hätte man bereits im Code gesehen, was was ist ;)
Forum: Netzwerke
Delphi
by DeddyH,
17. Dez 2008
In der Tat merkwürdig, warst Du mal durchgesteppt? Normalerweise merkt man das dabei recht schnell, wenn etwas nicht ausgeführt wird oder eine Variable den falschen Wert hat.
Forum: Netzwerke
Delphi
by DeddyH,
17. Dez 2008
Hast Du Dir Startzeit zur Kontrolle mal ausgeben lassen? Außerdem genügt es ja, diese im Button1 einmalig zu setzen.
Es könnte auch etwas anderes sein. Lass Dir doch einfach eine Message ausgeben, statt die Farbe umzustellen.
Bei mir (Delphi 5) funktioniert das einwandfrei.
Forum: Netzwerke
Delphi
by DeddyH,
17. Dez 2008
Wenn ich das richtig verstanden habe, hast Du 2 DateTimePicker, die musst Du erst zusammenpfriemeln, sonst stimmt entweder die Zeit oder das Datum nicht.
StartZeit := Trunc(DateTimePickerDate.Date) + Frac(DateTimerPickerTime.Time);
Forum: Netzwerke
Delphi
by DeddyH,
16. Dez 2008
Beinahe, ich würde das eher so machen:procedure TForm1.Timer1Timer(Sender: TObject);
begin
//Timer1.Interval:= 1000; einmal reicht doch
if Systemzeit >= Versende_Zeit then
begin
Timer1.Enabled := false; //den Timer brauchen wir nicht mehr
Zeitversetzt_Senden;
end;
end;
Forum: Netzwerke
Delphi
by DeddyH,
16. Dez 2008
Das wird so wahrscheinlich nicht funktionieren, Du solltest auf größer oder gleich abfragen.
Forum: Netzwerke
Delphi
by DeddyH,
16. Dez 2008
Musst Du doch gar nicht. Wie schon beschrieben, merk Dir die "Startzeit" und schau im Timer nach, ob sie erreicht ist.
Forum: Netzwerke
Delphi
by DeddyH,
16. Dez 2008
In 15 Minuten -> Timer.Interval := 15000, zu einer bestimmten Uhrzeit könntest Du im Timer die aktuelle Zeit pollen und vergleichen (natürlich mit einer gewissen Toleranz).