Einzelnen Beitrag anzeigen

chiller4fun1990

Registriert seit: 26. Dez 2009
23 Beiträge
 
#34

AW: Timer offline laufen

  Alt 17. Aug 2011, 18:43
Da du geschrieben hast ich soll mein Timer Event Korrigieren was is da dran falsch?
kann den fehler grad nicht finden.
Und jetzt wenn ich das Programm starte wird eig. nur die Aktuelle Uhrzeit ausgegeben ohne runterzählen ect.
Habs vorhin schon in OnCreate reingepackt.

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject); // FormCreate verwenden
var
  ini: TIniFile;
  filename: String;
begin
  filename := ExtractFilePath(ParamStr(0)) + 'zeit.ini';
  ini := TIniFile.Create(filename);
  try
    if ini.ReadDateTime('Daten','Zielzeit',Zielzeit) < now then
    begin
      timer1.Enabled:=true;
    end;
  finally
    ini.Free;
  end;
end;
  Mit Zitat antworten Zitat