POO - Bug ou erro de programacao?

ola pessoal

imaginem a seguinte classe

type
TConexao = class
private
FSqlQuery: TIBSQL;
FSQSQL: TStringList;
procedure SetSQSQL(const Value: TStringList);
public
constructor Create;
destructor Destroy; override;
procedure SQExecutar;
published
property QRSQL: TStringList read FQRSQL write SetQRSQL;
property SQSQL: TStringList read FSQSQL write SetSQSQL;
end;

constructor TConexao.Create;
begin
inherited;
FSqlQuery:=TIBSQL.Create(nil);
FSqlQuery.Database:=<ojebto IBDatabase>;
FSqlQuery.Transaction:=<objeto IBTransaction>;
FSQSQL:=TStringList.Create;
end;

destructor TConexao.Destroy;
begin
FreeAndNil(FSqlQuery);
FreeAndNil(FSQSQL);
inherited;
end;

procedure TConexao.SQExecutar;
begin
FSqlQuery.ExecQuery;
end;

procedure TConexao.SetSQSQL(const Value: TStringList);
begin
FSQSQL:=Value;
FSqlQuery.SQL:=FSQSQL;
end;

o problema nessa classe eh que o metodo SetSQSQL nunca eh executado... tanto que se vc colocar um brakpoint dentro do procedimetno SetSQSQL ele ira ficar desabilitado... como se o compiliador tivesse ignorado este procedimento..

eu ja troquei o tipo de dados do campo FSQSQLpara TStrings e no constructor instansiei como sendo TStringList e mesmo assim nao funcionou...
a unica maneira que deu certo foi quando eu troquei o tipo de dados do campo FSQSQL para string... apos ter feita essa alteracao tudo passou a funcionar corretamente...

ja olhei outros objetos do proprio delphi que tenhao propriedade do tipo TStrings ou TStringList pra ver se eles trabalhão de maneira diferente, mas nao encontrei nada que fosse fazer diferenca...

muito estranho esse erro... o mais estranho eh que todos os programadores que conheco nunca viram esse tipo de erro...

aguardo a ajuda do forum.... :cry:

obrigado