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

GASCHE

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

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

  • Посещение

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

    12

Весь контент GASCHE

  1. SR := TStreamReader.Create( UFileName, TEncoding.Default ); или UTF8
  2. GASCHE

    Serial port

    Там-же "Как создавать обёртки для JAVA-кода"
  3. GASCHE

    Serial port

    Тогда наверно придется добавлять jar библиотеки в проект.
  4. GASCHE

    Serial port

    Тогда следующий вопрос, а на каком чипе будет собран этот переходник? T.е. есть ли дня него драйвера под Android?
  5. GASCHE

    Serial port

    А можно уточнить, а что под Android есть последовательный порт или все же работа будет через USB или ...?
  6. Несколько не в тему. А можно каким-то образом определить параметры функции, вызываемой из библиотеки DLL, если нет ее описания?
  7. "uClock.pas" что-то в 10 "uses NamedImage" не могу найти. Не подскажите где он?
  8. Или вместо CharacterImage.Position.X := 500 - size / 2 - size mod 3; CharacterImage.Position.Y := ScreenHeight - size; как-то так CharacterImage.Position.X := ( ScreenWidth - size )/2; CharacterImage.Position.Y := ( screenHeight - size )/2; и установите CharacterImage.WrapMode := TImageWrapMode.Stretch;
  9. Нет, Native Должно быть видно "Температура охлаждающей жидкости PID"
  10. Нет, размер строки в выпадающем списке я определяю, как mItemWidth := ComboBox1.Canvas.TextWidth( ComboBox1.Items[ idx ] ), но если появляется скроллбар, то для полного определения ширины ComboBox1.ItemWidth необходимо к mItemWidth добавить его ширину, иначе строка в выпадающем списке полностью не отображается. ZuBy Не знаю почему, но при использовании DefaultScrollBarWidth = 16 строки полностью не отображаются. AlexG Наверно я что-то не понимаю, но присвоение VScrollBar := TCustomScrollBox( ComboBox1 ).VBar; не получается. ComboTest2.zip
  11. К сожалению VScrollBar не видно, и добраться до него мне не удается. ComboTest.zip
  12. Эх, еще бы ткнули носом куда конкретно смотреть. Неужели ни кто не расширял выпадающий список?
  13. Здесь книга и примеры
  14. GASCHE

    TScrollBar

    C этим разобрался в отличии от VCL здесь в процедуре, вызываемой по OnChange нельзя менять значение Value И еще. Если установить, например, SmallChange = 2 то ползунок кнопочками перемещается с дискретностью 2, а вот при перемещении или клике мышкой значение SmallChange не учитывается отсюда Value может принять любое значение не кратное SmallChange. Если это так задумано, то зачем нужно значение SmallChange и лишняя перерисовка TScrollBar?
  15. Прошу помочь. Как узнать ширину полосы прокрутки в выпадающем списке В VCL GetSystemMetrics (SM_CXVSCROLL), а в FMX?
  16. Осипов в своих примерах к книге рисует через
  17. Вячеслав, можно поподробней, а то у меня аналогичная ситуация с TscrollBar. PS О, с TTrackBar получилось, а вот с TscrollBar не получается xenon54, а подобного решения для TscrollBar нет?
  18. Пример по ссылке как раз для XE7, там чуть подправлен файл FMX.StdCtrls.pas.
  19. GASCHE

    TScrollBar

    При выполнении этой процедуры на XE7 procedure TForm1.ScrollBar1Change(Sender: TObject); begin IF ScrollBar1.Value = 0 THEN BEGIN //Trend := True; ScrollBar1.Value := 1; END ELSE BEGIN IF ScrollBar1.Value >= ScrollBar1.Max THEN BEGIN ScrollBar1.Value := ScrollBar1.Max - 1; //Trend := False; END; END; end; кнопочками на TScrollBar или из программы меняя ScrollBar1.Value все нормально, но если кликнуть мышкой в крайние значения, то положение ползунка не изменяется хотя значение ScrollBar1.Value принимает требуемое значение. Как в этом случае синхронизировать положение ползунка со значением ScrollBar1.Value?
  20. Скорее всего нет, если посмотреть это, procedure TCanvas.EndScene; begin if FBeginSceneCount = 1 then DoEndScene; if FBeginSceneCount > 0 then dec(FBeginSceneCount); end; то при одновременном открытии нескольких сцен перерисовка произойдет от последней закрытой, а какой поток ее закроет последний не ясно. Т.е. говорить о наличие потокобезопасности как-то сомнительно.
  21. Выходит, если мы рисуем на одной канве из двух потоков и у нас одновременно открыты в каждом Canvas.BeginScene, то после прорисовки по Canvas.EndScene на канве отобразиться суммарная картинка?
  22. Что-то не пойму, Canvas.DrawPolygon(const Points: TPolygon; const AOpacity: Single) где TPolygon = array of TPointF рисует созданный вами полигон, а уж с дыркой он или нет зависит от вас.
×
×
  • Создать...