Spillet Travian

Hvad er spørgsmålet ?

Hvordan jeg stadig får de 100 træ hvert time selv om jeg ikke har programmet igang. :)

Kan du ikke gemme tidspunktet når programmet lukkes og så hente tidspunktet igen når programmet startes, nu har du så den tid der er gået.

Kan evt. gemmes i reg.basen eller i en ini fil.

har du evt en kode jeg kan bruge, så ville det bare være kanon. :)

Hvis det f.eks. skal være en ini fil:

//gemme tiden
var
  Inifile : TInifile;
begin
Inifile:=TIniFile.Create(Extractfilepath(Paramstr(0))+'minfil.ini');
SystemData.WriteTime('Log','Logger af',now);
end;

//du kan så hente tiden med
var
Tiden : TDateTime;
begin
Tiden:=SystemData.ReadTime('Log','Logger af',now);
end;

Takker men den skriver fejl ved Inifile : TInifile. :/
[Error] Unit1.pas(30): Undeclared identifier: 'TInifile'

hele teksten:
[Error] Unit1.pas(30): Undeclared identifier: 'TInifile'
[Error] Unit1.pas(32): Missing operator or semicolon
[Error] Unit1.pas(32): Incompatible types: 'TComponent' and 'String'
[Error] Unit1.pas(33): Undeclared identifier: 'SystemData'
[Error] Unit1.pas(33): Missing operator or semicolon
[Error] Unit1.pas(41): Undeclared identifier: 'SystemData'
[Error] Unit1.pas(41): Missing operator or semicolon
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

Du skal tilføje Inifiles til din uses som det også fremgår af hjælpen

Og så er der en fejl i SystemData (SystemData.WriteTime('Log','Logger af',now);). :/

Det var da ikke så godt, ud fra din fejl beskrivelse så tror jeg det er fordi .........

SystemData skal self. være Inifile eller også skal du skrive
SystemData:=TIniFile.Create(Extractfilepath(Paramstr(0))+'minfil.ini');

Det der SystemData skal det være en memo eller label, eller hvad? :)

Nej det skal være en TIniFile som det også fremgår af koden:
SystemData:=TIniFile.Create(Extractfilepath(Paramstr(0))+'minfil.ini');

Jaa undskyld vis jeg ikke forstår. Men får stadig fejl i "SystemData:=TIniFile.Create(Extractfilepath(Paramstr(0))+'minfil.ini');" hvor "SystemData" er udpeget.

fejl kode:
[Error] Unit1.pas(30): Undeclared identifier: 'SystemData'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

Inifile : TInifile; skal være SystemData : TInifile;

Stadig fejl. har du overhovedet selv prøvet den.? :)

Ja jeg har brugt løsningen med at gemme info i ini filer i over 10 år i faktisk alle mine programmer så koden er i orden.

//gemme tiden
var
  SystemData : TInifile;
begin
SystemData:=TIniFile.Create(Extractfilepath(Paramstr(0))+'minfil.ini');
SystemData.WriteTime('Log','Logger af',now);
end;

//du kan så hente tiden med
var
Tiden : TDateTime;
begin
Tiden:=SystemData.ReadTime('Log','Logger af',now);
end;