TFDCommand : Überschreiben von Properties der Elternklasse

[bernhard_LA]

unsere Anwendung wurde unter Windows und dem DB Framework ADO entwickelt, wir benötigen jetzt auch Support der Plattform UNIX, und dem DB Interface FireDAC.
Wir wollen deshalb beide DB Interfaces über Compiler Switches unterstützen aber nur eine Code Variante bereitstellen/pflegen/weiterentwickeln .....
Wir haben deshalb eine "Vermittler Klasse " eingeführt, die entweder von TAdoCommand oder TFDCommand erbt.


unit FireDAC.Comp.Client;

Delphi-Quellcode:

  TFlexCommand = class(TFDCommand)
  private
    procedure SetCommandText(const Value: string);

  public

    property CommandText : string  write SetCommandText;
  end;



procedure TFlexCommand.SetCommandText(const Value: string);
var tempLst : TStringList;
begin
    tempLst := TStringList.Create;
    try
        tempLst.CommaText := Value;

       //  Self.SetCommandTextStrs (tempLst);   (1)

      //   FCommandText.SetStrings(tempLst)    (2) 

    finally
         tempLst.Free
    end;

end;

CommandText ist bei ADO ein String bei Firedac eine Stringliste.
Ich will jetzt die Property CommandText ind meiner neuen Klasse als als String haben und dann als Stringliste an die Eltern-Klasse TFDCommand übergeben,
meine beiden Versuche (1) und (2) lassen sich aber leider nicht compilieren, welchen Fehler mache ich ?