errorcalc / freeesvclcomponents

Free ErrorSoft Components for Delphi (VCL) & EsVclCore lib

Всем привет 👋

Если у вас есть интересная работа для меня - пишите в телегам: @errorsoft

---

Hi there 👋

If you have an interesting job for me - write to telegram: @errorsoft

freeesvclcomponents's Issues

Entry point error

While installing design time package (after building all) it fails with an error about some entry point in bpl. (Delphi Rio)
The same happens with EsGroupBar!

Won't compile under XE2

Switch and ImagesTest demos won't compile under XE2 because System.Actions is new in XE3 and System.ImageList was previously Vcl.ImgList

Won't install Delphi 11

Please see the attached registration error. Help!

Мерцание не исчезает если использовать Custom Styles (скины грубо говоря)

Собственно вся суть в названии темы, без скинов всё работает, ставишь скин всё мерцает при ресайзе.

Проблема с установкой в XE2

ES.Core.Classes
Конструкции языка, которых не было в XE2

constructor TFileVersion.Create(const VersionStr: string);
var
  A: TArray<string>;
begin
  Major := 0;
  Minor := 0;
  Release := 0;
  Build := 0;

  A := VersionStr.Split(['.']);
  try
    if High(A) >= 0 then
      Major := A[0].Trim.ToInteger;
    if High(A) >= 1 then
      Minor := A[1].Trim.ToInteger;
    if High(A) >= 2 then
      Release := A[2].Trim.ToInteger;
    if High(A) >= 3 then
      Build := A[3].Trim.ToInteger;
  except
    on EConvertError do ;
  end;
end;

EsVCLComponentst

[DCC Error] ES.Labels.pas(80): E2147 Property 'StyleElements' does not exist in base class

TEsSwitch (Looks like Windows 10 XAML control!)

Спасибо за набор, на VCL это просто незаменимая штука 👍

Такой вопрос: у тумблера на Windows 11 немного изменились UI/UX (бордюр в 1px + новые реакции на вхождение и нажатие) — возможно ли допилить TEsSwitch до такого же состояния?

EsActivityBar does not update while application is busy

Tried the \ErrorSoftVCLComponents-4.1.0-11\Samples\ActivityBar example in Alexandria. Works well while application is idle but:

procedure TMainForm.ckbActiveClick(Sender: TObject);
begin
  EsActivityBar.Active := TCheckBox(Sender).Checked;

  // EsActivityBar does not update while looping:
  if EsActivityBar.Active then
  begin
     for var i := 1 to 100000 do
       Self.Caption := FormatDateTime('YYMMDDHHSSZZZ', Now);
  end;
end;

Needs threading. Can you implement threading?

TEsImageControl

А как вообще работает TEsImageControl?

Пытаюсь показать полупрозрачный круг:

Вроде всё выставлено как надо, но круг не прозрачный (я ожидал, что кнопку будет видно):

Проблема с установкой в Delphi XE8

Не получается установить в Delphi XE8

Все делаю согласно инструкции:
0. Полностью удалите предыдущую версию!

1. Добавьте путь к папке "Source" в search path (Tools->Options->Delphi Options->Library->Library path)
2. Если вы планируете установить компоненты одновременно в нескольких версиях Delphi на компьютере, то запустите
   "Packages\PackagesGenerator.exe" и выберите соответствующие сгенерированные файлы проекта.
3. Откройте группу проектов "ErrorSoftGroup.groupproj"
4. Сделайте билд(Build) "EsCore.bpl"
5. Сделайте билд(Build) "EsVclCore.bpl"
6. Сделайте билд(Build) "EsVclComponents.bpl"
7. Проинсталлируйте(Install) "EsVclComponentsDesign.bpl"

Но на шаге "Проинсталлируйте(Install) "EsVclComponentsDesign.bpl" возникает ошибка:
Access violation at address 68A687D1 in module "bds.exe". Read of address 00000010

При попытке установить "EsVclComponentsDesign.bpl" через Component \ Install Packages, возникает аналогичная ошибка.