krapotkin

Пользователи
  • Публикаций

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

  • Посещение

  • Победитель дней

    67

krapotkin стал победителем дня 22 апреля

krapotkin имел наиболее популярный контент!

4 Подписчика

Информация о krapotkin

  • Звание
    Продвинутый пользователь
  • День рождения 17.10.1970

Контакты

  • ICQ
    125417612

Информация

  • Пол
    Мужчина
  • Город
    Екатеринбург

Посетители профиля

1 371 просмотр профиля
  1. ListView - DynamicAppearance - header

    OnPullRefresh но это неспортивно ) надо пытаться заранее, а не когда уже всё у listView есть ScrollViewPos
  2. ListView - DynamicAppearance - header

    давно уже все говорили, что все эти биндинги плохо решают реальные задачи бесконечная прокрутка должна реализовываться как удаление итемов из направления "позади" и добавление в направление "впереди" в зависимости от направления прокрутки обработчик OnScrollViewChange. направление прокрутки определять самостоятельно при достижении некоторого индекса нужно запускать поток, который запрашивает новую порцию данных когда поток заканчивается, данные подгружать в ListView
  3. золотые слова ) мне лень было столько букв писать )))
  4. есть же шаблон сайта, который ты запускал. Сделай его просто статикой, да и все. Сколько там будет страниц 3 ? 4 ? имхо вполне как вариант
  5. ListView - DynamicAppearance - header

    а если еще подумать, то это окажется то же самое )))
  6. ListView - DynamicAppearance - header

    что ж у вас так запутанно-то всё procedure TfMain.b1Click(Sender: TObject); var li:TListViewItem; begin li := lv1.Items[0]; ShowMessage(li.text); end; procedure TfMain.FormCreate(Sender: TObject); var li:TListViewItem; begin li := lv1.Items.Add; li.Purpose := TListItemPurpose.Header; li.Text := '12345'; li.Detail :='67890'; end;
  7. насколько я понимаю, сама делфи к этому отношения почти не имеет она же рисуется стандартным GDI ?
  8. у каждого компонента есть BoundsRect. Нужно просто сравнить, не попадает ли XY в этот rect .
  9. стили они собсно не для этого. не для размещения компонентов интерфейса на листбокс вполне ложатся компоненты и так. без велосипедов программировать лучше, чем с ними
  10. ListView - DynamicAppearance - header

    а что вариант из первого ответа не?
  11. ну так и приведите пример то. циклы не могут быть сломаны. это привело бы к полному коллапсу
  12. ну дык CartList - локальная переменная. не инициализирована. её б сначала SetLength, а потом уже делать что-либо SetLength(CartList,1); if CartList<>nil then begin rz:=Length(CartList); for iio := 0 to rz-1 do begin Rec:=CartList[iio]; end; end; rz=1; цикл проходит 1 раз все штатно
  13. я тут соглашусь со Станиславским. не верю ) дайте код High - это ИНДЕКС последнего элемента массива если в массиве 1 элемент, то индекс его равен 0