Перейти к содержанию
Fire Monkey от А до Я

fnsre

Пользователи
  • Постов

    2
  • Зарегистрирован

  • Посещение

Сообщения, опубликованные fnsre

  1. Вcё, разобрался сам.

    Цитата

    Var
    i:  integer;
    sum:  real;
    Item2: TListViewItem;
    begin
       sum:=0;
       for i:=0  to ListView2.Items.Count-1  do
       begin
       sum:=sum+strtofloat(TAppearanceListViewItem(ListView2.Items).Objects.FindObjectT<TListItemText>('TxtSumma').Text);
       labelSumma.Text:=floattostr(sum);
    end;

     

×
×
  • Создать...