Hallo zusammen!
Ich habe folgendes Problem:
Ich möchte ein TQuery mit besonderen Eigenschaften bauen. Also TMyQuery von TQuery abgeleitet und eine neue Eigenschaft "
SQL" erstellt ( Muss aus Kompatibilitätsgründen so heissen). Im Code möchte ich allerdings auf die Original-
SQL zugreifen können. Wir mache ich das?
Delphi-Quellcode:
type
TMyQuery =
class(TQuery)
private
...
procedure SetSQL(Value:TStrings);
function GetSQL:TStrings;
...
published
...
property Sql: TStrings
read GetSql
write SetSql;
...
implementation
...
SQL.Text:='
Select * from Irgendwas' <----- Hier soll auf die Original-
SQL zugegriffen werden, nicht auf die überschriebene