请写一段delphi语文实现 Cardview控件
时间: 2023-03-09 12:05:08 浏览: 207
CardView示例
5星 · 资源好评率100%
Delphi代码实现Cardview控件: var cardView1: TCardView; begin cardView1 := TCardView.Create(Self); cardView1.Parent := Self; cardView1.Align := alClient; cardView1.Color := clWhite; cardView1.Font.Name := 'Arial'; cardView1.Font.Size := 8; cardView1.BorderStyle := bsNone; cardView1.ViewStyle := vsIcon; cardView1.OnDrawItem := CardView1DrawItem; end;
阅读全文