radiogroup ini

Hvis du laver nedenstående procedure i OnClick eventen for din radiogrup, får du lavet en inifil i Windowskataloget, hvor nummeret på det markerede elemenet noteres . Første element har nummer 0.

procedure TForm1.RadioGroup1Click(Sender: TObject);
//Uses Inifiles
var
  MyIniFile: TIniFile;
begin
  MyIniFile := TIniFile.Create('myapp.ini');
  MyIniFile.WriteString('Radiogroup', 'Buttonstatus', IntToStr(RadioGroup1.ItemIndex));
  MyIniFile.Free;
end;

takker, men hvordan læses ini filen, jeg ved at den skal i onclose men hvad skal i oncreate for at indlæse settings

Det kan du gøre på denne måde. Bemærk, at du ved læsning fra ini-filen læser værdien -1, hvis ét eller andet er galt med filen.

procedure TForm1.FormActivate(Sender: TObject);
var
  MyIniFile: TIniFile;
  OldValue: String;
begin
  MyIniFile := TIniFile.Create('myapp.ini');
  OldValue:=MyIniFile.ReadString('RadioGroup','Buttonstatus','-1');
  if OldValue<>'-1' then Radiogroup1.ItemIndex:=StrToInt(OldValue);
  MyIniFile.Free;
end;