antarey

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

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

  • Посещение

  • Days Won

    2

antarey last won the day on 21 января 2015

antarey had the most liked content!

О antarey

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

Информация

  • Пол
    Мужчина
  • Город
    Киев

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

306 просмотров профиля
  1. Есть вариант - на кнопку кинуть картинку, а на картинку BitmapListAnimation. Но все должно быть проще
  2. Не получается. В FloatAnimation в списке PropertyName нету ImageIndex , а ручная установка ничего не дает
  3. Добрый день. Есть кнопка,и в нее есть свойство ImageIndex. Задача - сделать мигающую иконку кнопки. Желательно без таймера. Пробовал ColorAnimation - ни в какую не хочет мигать. Добавлял ColorAnimation к самой кнопке и в стилях
  4. Переделал код. В принципе работает, только немного обрезается текст сверху и снизу. Rusland не знаю как в делфи - в си округлять не обязательно - свойство Height - float.
  5. Поставил, и на ресайз тоже. Я вроде где-то читал/слышал что в 10 добавили изменение высоты итема в свойства но в упор не нахожу такого. Зачем етот код? К сожалению не работает. У меня итем создается отдельной процедурой с пустым текстом. В другой процедуре прописывается текст.
  6. Согласно мануалу реализовал код void TfrmMain::CalculateItemHeight(TObject *Sender) { TTextLayout* FTextLayout = TTextLayoutManager::TextLayoutForClass(TTextLayoutManager::DefaultTextLayout); TListBoxItem *ListItem = dynamic_cast<TListBoxItem*>(Sender); FTextLayout->BeginUpdate(); try { FTextLayout->Text = ListItem->Text; FTextLayout->MaxSize = TPointF(ListItem->Width, 1000); FTextLayout->WordWrap = ListItem->WordWrap; FTextLayout->Font = ListItem->Font; FTextLayout->HorizontalAlign = ListItem->TextAlign; FTextLayout->VerticalAlign = ListItem->VertTextAlign; } __finally { FTextLayout->EndUpdate(); } ListItem->Height = FTextLayout->Height; } Прописал события для итема, итемы создаю в рантайме, и ничего Как автоматически подгонять высоту итема под текст? Что я не так сделал?
  7. Нда, иногда и примеры надо смотреть , спасибо за подсказку.
  8. В етом событии отображается прогресс загрузки файла
  9. ZuBy, ето я понимаю и ето все реализовано. Просто для NetHTTPClient есть событие NetHTTPClientReceiveData и оно не отрабатывается. Ето событие надо как-то подвязать через синхронизацию.
  10. TTask::Create и TTask::Run не сильно отличаются по реализации , но я так и не понял как синхронизировать событие компонента NetHTTPClient внутри задачи
  11. Как в провести синхронизацию для задачи? Есть NetHTTPClient void __fastcall TfrmMain::NetHTTPClientReceiveData(TObject * const Sender, __int64 AContentLength, __int64 AReadCount, bool &Abort) { if (AContentLength > 0) { pbMain->Value = ((float)AReadCount / (float)AContentLength) * 100.f; } else pbMain->Value = AReadCount; } //-------------------------------------------------------------------- void __fastcall TfrmMain::SpeedButton1Click(TObject *Sender) { _di_ITask tsLoadNewComp = TTask::Create([&](){ std::auto_ptr<TStream> inputStream(new TFileStream(System::Ioutils::TPath::Combine(TDirectory::GetParent(ParamStr(0)), "index.dat"), fmCreate)); NetHTTPClient->AcceptEncoding = "gzip, deflate"; NetHTTPClient->Get("..............", inputStream.get()); }); tsLoadNewComp->Start(); } Как сделать, чтобы в задаче tsLoadNewComp отрабатывалась процедура NetHTTPClientReceiveData?
  12. Проапдейтился, все нормально, заходим
  13. Ясно. Евгений Корепов, спасибо. Надо ставить апдейт