我需要一些例子如何改變FireMonkey中我的list view每行的顏色文本項目。 我嘗試類似的東西,但沒有成功。 for i := 0 to lvArtikli.ItemCount-1 do
begin
AItem := lvArtikli.Items.AppearanceItem[i];
pk := AItem.Data['txtPK'].AsS
我想在我的列表視圖中從目錄中刪除所選項目。 procedure TFContact.BtnDeleteClick(Sender: TObject);
var
SecItem, BUFPath : string;
i : Integer;
begin
if ListViewTab5.Selected <> nil then
for i := 0 to ListViewT