Spontan, ohne es getestet zu haben, wäre hier die einfachste Variante, die mir einfällt, einen globalen Classhelper für die TIniFile zu erstellen.
Delphi-Quellcode:
TIniFileHelper = class helper for TIniFile
public
procedure WriteString(const Section, Ident, Value: String);
end;
procedure TIniFileHelper.WriteString(const Section, Ident, Value: String);
begin
//hier reagieren
inherited WriteString(Section, Ident, Value);
end;
Das ganze müsste dann für jede Write-Variante gemacht werden.
Dazu sollte man sich etwas in die Classhelper einlesen:
http://docwiki.embarcadero.com/RADSt...elpers_(Delphi)
Alternativ leitest du die TIniFile-Klasse ab, und änderst alle Verwendungen.
Vielleicht gibt es auch noch andere Varianten die keinen zu großen Aufwand bedeuten, die mir aber im Moment nicht einfallen.