Ich weiss zwar immer noch nicht was du machen willst, aber ich bin mir sicher, dass es mit deinem Code nicht funktioniert.
Code:
sl:=TStringList.Create;
if (RadioButton2.Checked = true) or (RadioButton3.Checked = true) then begin
sl.Add('exec Netsettings.cfg');
sl.SaveToFile(Label16.Caption + '\autoexec.cfg');
end else if (RadioButton2.Checked = true) or (RadioButton3.Checked = true) and (Label16.Caption +'\autoexec.cfg' = 'false') then begin
sl.LoadFromFile(Label16.Caption +'\autoexec.cfg');
if pos('exec Netsettings.cfg', sl.Text)=0 then begin
sl.Add('exec Netsettings.cfg');
sl.SaveToFile(Label16.Caption + '\autoexec.cfg');
end;
1. Es fehlt ein end; am Ende. Vielleicht hast du es ja nur kopieren vergessen.
2. Die Stringliste solltest du am Ende wieder freigeben: s1.Free;
3. Bei der If-Abfrage kannst du niemals ins else kommen, weil die ersten beiden Terme der Else-Bedingung nur wahr sind, wenn das if schon wahr ist. Der letzte Term kann niemals wahr sein.
Wenn in Label16 nichts steht vergleichst du '\autoexec.cfg' mit 'false'. Ich hab keinen Plan wieso, aber es kann nur falsch sein.
Wenn du mir sagst was du machen willst, sag ich dir wie es geht
grüße, daniel