hjhahne

hjhahne

Erstellung einer Klasse für StorableObjects

Erstellen einer Tabellen-Klasse: [SOTable('CUSTOMER')] // Name der Tabelle in der Datenbank TCustomer = class(TStorableObject) private sName : String; public [SOField('CUS_ID', ftAutoInc, 0, 'ID', [sflPrimaryKey])] property ID; // Ist bereits in der Basisklasse TStorableObject deklariert und muss nur veröffentlicht werden. …