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

dnekrasov

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

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

  • Посещение

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

    52

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

  1. 4 часа назад, Slym сказал:

    А руками

    
    uses FireDAC.Phys.Oracle;
    TFDPhysOracleDriverLink.Create(form);

    не? все мышкой привыкли...

    Для того, чтобы это работало нужна FireDACOracleDriver25(6)0.bpl. Не факт что она идёт вместе с Trial (в Community её точно нет).

  2. Вы используете LyContent.AddObject а этот метод добавляет только в LyContent.Children. Для того, чтобы добавить в LyContent.Components надо создавать фрейм с AOwner = LyContent или использовать LyContent.InsertComponent. 

    А вообще - не надо заморачиваться с Components. Управляйте отображением фреймов с помощью Parent, а за временем жизни пусть следит Ваш TFramesFactory

  3. 2 минуты назад, лёля сказал:

    Возможно по индесу из TImageList брать ?

    ImageList1.Bitmap(Size, Index). Для уточнения - читайте Help. Не знаете английский - изучайте или словарём пользуйтесь (заодно и учитесь Help-ом пользоваться). Ещё раз повторюсь - здесь не кружок "юный Delphi-программист"

  4. Это уже не смешно - здесь не кружок "юный Delphi-программист" и программированию не обучают.

     

    А по сути вопроса - зачем Вам вообще ImageList если нужны png-файлы. Используйте ресурсы (Project->Resources and Images), а загрузить в TBitmap можно так:

    function LoadBitmapFromResourceName(const AResName: string; AResType: PChar = RT_RCDATA): TBitmap;
    var
      RS: TResourceStream;
    begin
      RS := TResourceStream.Create(hInstance, AResName, AResType);
      try
        Result := TBitmap.CreateFromStream(RS);
      finally
        FreeAndNil(RS);
      end;
    end;

     

  5. В 22.04.2019 в 19:15, лёля сказал:

    в TImageList есть картинки котрые может отобразить  TImage в зависимоти от ситуации необходимо братьтуили иную картинку в TImageList и вставлять  в TImage

    Хм... Я смотрю Help совсем популярностью у Вас не пользуется...

    TImageList.Bitmap(...)
    TImageList.BitmapExists(...)
    TImageList.BitmapItemByName(...)

  6. 1 минуту назад, лёля сказал:

    Превый item нормально а вот MetropolisUIListBoxItem ведет себя несовсем корректно также не показыает поле текст тест который в поле  MetropolisUIListBoxItem.text

    Он показывает только Title, SubTitle и Description - увидеть это можно посмотрев исходники.

  7. 1 час назад, лёля сказал:

    Для первой строчки стиль [fsBold,fsItalic] шрифт Swis721 BT размер 20

    Я имел ввиду FMX-стиль (тот, который в StyleBook загружается). Привыкайте, что если хотите изменить внешний вид контрола, то надо менять его в стиле.

    Начёт MetropolisUIListBoxItem. За Title и Description отвечает элемент стиля с названием griditemtitlelabel. За SubTitle - griditemsubtitlelabel. Открываете Style Designer и меняете TextSettings для этих элементов.

    1111111111.png.c7e17474926e9bc6456c0b672e2a89b1.png

  8. 6 часов назад, лёля сказал:

    Нужно в   List box у  MetropolisUIListBoxItem но сделать разный текст сверху один снизу другой.

    Какой стиль используете?

    А лучше скиньте исходники тестового проекта

  9. 15 часов назад, лёля сказал:

    непоняла почему

    Сначала указываем точку, из которой будем начинать рисовать (MoveTo) - затем указываем точку (или несколько), которые описывают рисуемую фигуру (для LineTo это точка в которою надо провести линию)

  10. 22 минуты назад, лёля сказал:

    Спасибо очень многие приемы корые были доступны для VLC недоступны в firemonkey

    Просто надо привыкнуть к новому подходу к некоторым вещам. Зато возможностей побольше, чем в VCL. Да и удобнее, когда привыкнешь. ИМХО

  11. 29 минут назад, лёля сказал:

    то теперь не совсем понятно  как подчеркивание выражено в коде

      Label1.StyledSettings := Label1.StyledSettings - [TStyledSetting.Style];
      Label1.TextSettings.Font.Style := Label1.TextSettings.Font.Style + [TFontStyle.fsUnderline]

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