Created
October 11, 2023 00:03
-
-
Save felipebastosweb/7ea15c6afa844378cf2e860ea54be028 to your computer and use it in GitHub Desktop.
ListViewCard erro no construtor
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
unit Widgets.ListViewCard; | |
interface | |
uses System.Classes, System.Generics.Collections, System.Variants, FMX.Controls, | |
FMX.Types, FMX.ListView, FMX.ListView.Types, | |
FMX.Graphics, FMX.ListView.Appearances, FMX.ListView.Adapters.Base, FMX.Objects; | |
type | |
TListViewCard = class(TListViewItem) | |
private | |
FBitmap: TBitmap; | |
FIndexTitle: string; | |
FBody: string; | |
FButtons: TList<TRectangle>; | |
public | |
constructor Create(const AOwner: TListView); | |
destructor Destroy; override; | |
property Bitmap: TBitmap read FBitmap write FBitmap; | |
property IndexTitle: string read FIndexTitle write FIndexTitle; | |
property Body: string read FBody write FBody; | |
property Buttons: TList<TRectangle> read FButtons write FButtons; | |
end; | |
implementation | |
constructor TListViewCard.Create(const AOwner: TListView); | |
begin | |
inherited Create(AOwner); | |
FBitmap := TBitmap.Create; | |
FButtons := TList<TRectangle>.Create; | |
end; | |
destructor TListViewCard.Destroy; | |
begin | |
FBitmap.Free; | |
FButtons.Free; | |
inherited Destroy; | |
end; | |
end. |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment