timerintervall

[Masa]

Hej.
Jag har ett program där man ska ändra timerintervallet och sen så ska man spara ner timerintervallet i en inifil, allt med inifil och sånt fungerar men jag får inte ner värdet i inifilen.

Tomas

[the proclaimer]

WriteInteger(Timer1.Interval) kanske?

[jt]

Antagligen dög proclaimers svar, en lite mer detaljerad lösning

var
IniFile : TIniFile;
begin
IniFile := TIniFile.Create('C:\inifile.ini');
try
IniFile.WriteInteger('Timer', 'interval', Timer1.interval);
finally
IniFile.Free;
end;

[Redigerat av jt den 02 mar 2001]

[Alpha II]

Vad är det för skillnad mellan att skriva MyIni.free och MyIni.destroy?

------------------
Alpha II med rätt att döda

[MattiasW]

Läser man Delphi manualen står det att man skall använda Free.

Free kontrollerar först att objectet inte pekar på nil. Dvs du får inget felmeddelande om objectet inte finns.

Använd MyIni.free.

[jt]

Mattias du har rätt.
Men Free sätter inte Objectet till Nil.

Om man skriver
MyIni.free;
MyIni.free;
Så genereras ett fel på andra raden.

Men detta funkar
MyIni.free;
MyIni := Nil;
MyIni.free;

I delphi 5 kan man använda
MyIni.FreeAndNil;

[Masa]

Ok tack ska ni ha...det funkade bra....
Hur gör jag för att få in värdet i timer.interval nu då??.....läser in inifilen när form1 creatas och vill ha in värdena då, men jag får bara "default" värdena i detta fall 2000 millisekunder......

Masa

[Norton]

Mera om detta står i Delphihjälpen
-----------

var
IniFile : TIniFile;
begin
inifile:=tinifile.Create('C:\inifile.ini');
try
timer1.interval:=inifile.ReadInteger('timer','interval',0);
finally
inifile:=nil;
IniFile.Free;
end;


------------------
TI

[Masa]

tack för all hjälp..nu funkar allt jättebra...

Tomas