gleiche anweisungen für zwei klassen - aber wie?

[Marco Steinebach]

Hallo zusammen,
ich habe
fIni: TIniFile
und fMemIni: TMemIniFile.
Wie kann ich denn, abhängig von einer Variable, eine der beiden Variablen ansprechen.
also:

Delphi-Quellcode:

if MemoryAktiv then
  with fMemIni do
  begin
    x := readstring (bla...);
  else // also nix memory
  with fIni do
  begin
   // ... gleiche anweisungen wie oben, eben nur für fIni.

kann man das irgendwie machen, ohne die Anweisungen zwichen with-end doppelt schreiben zu müssen?
Vielen Dank imn voraus
Marco