Mit ProjectOptions.Save(LazProject); werden die After-Parameter aktualisiert.
Dies dies geschehen ist, beweist das ShowMessage. Auch wen ich den Dialog nochmals aufrufe ist der wert geändert.
Aber wen ich F9 drücke wird Avrdude noch mit den alten Parametern aufgerufen.
Rufe ich "Project --> Projecteinstellungen auf" und klicke anschliessend auf "Abrechen" ohne sonst irgendwo reinzuklicken. Und Wen ich dann nochmals F9 drücke, dann geht es.
Ich habe es mit LazProject.Modified := True; probiert, aber dies hat nicht geholfen.
Jemand eine Idee ?
Code: Alles auswählen
procedure ShowAVROptionsDialog(Sender: TObject);
var
LazProject: TLazProject;
Form: TProjectOptionsForm;
begin
Form := TProjectOptionsForm.Create(nil);
LazProject := LazarusIDE.ActiveProject;
ProjectOptions.Load(LazProject);
Form.AVR_Project_Options_Frame1.LoadDefaultMask;
Form.AVR_Project_Options_Frame1.ProjectOptionsToMask;
if Form.ShowModal = mrOk then begin
Form.AVR_Project_Options_Frame1.MaskToProjectOptions;
ProjectOptions.Save(LazProject);
ShowMessage(LazProject.LazCompilerOptions.ExecuteAfter.Command); // Als Test
LazProject.Modified := True; // Hilft leider nicht
end;
Form.Free;
end;