Hallo Fabian,
einer erste Verbesserung dürftest du erreichen, wenn du 'TIniFile' durch 'TMemIniFile' ersetzt. Siehe dazu auch
diesen Beitrag von
marabu.
Die 4 IF-Abfragen in der Methode
FromCreate könntest du durch das folgende Codestück ersetzen:
Delphi-Quellcode:
None1.Checked := (iVis = 0);
Oscilloscope1.Checked := (iVis = 1);
SpectrumLines1.Checked := (iVis = 2);
SpectrumSolid1.Checked := (iVis = 3);
Warum schließt du eigentlich das TIniFile, wenn du es anschließend direkt wieder öffnest?
Das Einlesen der Parameter für die Komponenten (Methode
DrawSkin) solltest du überdenken. Vielleicht wäre es sinnvoller, die Werte einmalig vor der Schleife zu lesen, anstatt sie für jede Komponente erneut aus der INI-Datei zu holen.
StringToColor arbeitet mit einer Suchschleife und ist somit relativ langsam.
Gruß Hawkeye