Hallo,
ne, du hast das falsch verstanden.
Im Code steht
Query.FieldByName('Id').AsInteger
Ist
Query vom Typ TQuery (
BDE), wird intern ein TField erzeugt,
dass dann das AsInteger "macht".
Ist die
Query vom Typ TFIBQuery, ist es ein anderer Type,
er auch ein AsInteger hat.
Das soll aber meinen Code nicth interessieren,
soll also transparent sein.
Im Code steht nur
Delphi-Quellcode:
var
Query: TBaseQuery;
begin
Query.FieldByName('
Id').AsInteger
Jetzt muss ich im TBaseQuery also das FieldByName
abstrakt definieren,
dann in den abgeleiteten Klassen umbiegen.
Puh ;(
Nix mit IFDEF
Heiko