JsonDTO
unknown
pascal
2 years ago
1.8 kB
10
Indexable
unit JsonDTO; interface type TData = class private FtodayLowestSellPrice: integer; FtodayHighestSellPrice: integer; FyesterdayClosingSellPrice: integer; FlastBuyPrice: integer; FlastSellPrice: integer; FdailyChange: integer; FdailyChangePercentage: double; FlastUpdateDate: string; published property todayLowestSellPrice: integer read FtodayLowestSellPrice write FtodayLowestSellPrice; property todayHighestSellPrice: integer read FtodayHighestSellPrice write FtodayHighestSellPrice; property yesterdayClosingSellPrice: integer read FyesterdayClosingSellPrice write FyesterdayClosingSellPrice; property lastBuyPrice: integer read FlastBuyPrice write FlastBuyPrice; property lastSellPrice: integer read FlastSellPrice write FlastSellPrice; property dailyChange: integer read FdailyChange write FdailyChange; property dailyChangePercentage: double read FdailyChangePercentage write FdailyChangePercentage; property lastUpdateDate: string read FlastUpdateDate write FlastUpdateDate; end; type TMarket = class private FID: integer; FName: string; FDescription: string; published property id: integer read FID write FID; property name: string read FName write FName; property description: string read FDescription write FDescription; end; type TItem = class private FName: string; FCode: string; FData: TData; FMarket: TMarket; published property name: string read FName write FName; property code: string read FCode write FCode; property data: TData read FData write FData; property market: TMarket read FMarket write FMarket; end; implementation end.
Editor is loading...