Alex7wrt

По клику на TText, в котором текст центрован по вертикали, этот текст отображается в TMemo и его можно редактировать. Вот здесь желательно, чтобы и в TMemo тоже текст был центрован по вертикали, чтобы внешний вид текста совпадал. Я вот думаю, если в TMemo нельзя отцентровать текст во вертикали, то может быть выбрать у него Align = VertCenter по отношению к родителю. И при появлении новой строки увеличивать высоту TMemo на высоту строки. Но это подойдет при свойстве WordWrap = False. Если же оно True, то количество строк в Tmemo так не узнаешь. А мне бы хотелось, чтобы WordWrap было активно. В старой версии FMX было свойство GetPositionPoint(ACaretPos : TCaretPosition): TPointF для определения координат любого символа, но в новых его нет. Поэтому вот не знаю, как решить вопрос с центровкой по вертикали. UPD. Только что заметил, что даже при WordWrap=False слова все равно переносятся на новую строку при достижении границ TMemo. И новая Line при этом не добавляется. Поэтому вышеописанный способ с WordWrap=False не сработает.

Думаю, все же должен быть какой-то способ. Может быть и программный.

В XE7 для TEdit есть стиль TransparentEdit. В XE10 еще есть стиль TransparentMemo.

Здравствуйте. Интересует, как выставить в TMemo вертикальное выравнивание текста по центру. В ObjectInspector этого свойства нет. В RunTime оно есть, но не работает. StyledSettings сброшены, при TextSettings.VertAlign:=TTextAlign.Center; текст все равно выравнивается по верху.

Точно, не знал, что у компонентов есть свойство Cursor. Большое спасибо!

Для формы все работает нормально, курсор меняется, для компонента нет. В обоих обработчиках OnMouseMove (формы и компонента) присваивается один и тот же курсор (например crSQLWait) при передвижении мышью по форме курсор меняется, при наведении на область контрола снова приобретает вид стандартной стрелки.

Это опечатка, уже исправил. С Form5 не работает

Я назначаю курсор в обработчике OnMouseMove компонента procedure TForm5.leftMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Single); begin TRectangle(Sender).Stroke.Thickness:=TRectangle(Sender).Stroke.Thickness+0.5; Form5.Cursor := crSQLWait; end; Первая строка работает (ширина границы увеличивается при движении мыши), вторая строка - нет

А нет, каюсь, для формы код работает. Но для контролов, например, TRectangle, нет. В их обработчике курсор не меняется.

Странно, но у меня не работает. XE7 Нет

Здравствуйте. Интересует, как в FM можно менять вид курсора мыши. При использовании кода Form1.Cursor:=crSizeWE; В обработчике OnMouseMove ничего не происходит.

Нашел решение в другой теме. http://fire-monkey.ru/topic/504-neskolko-okon-prilozheniia-v-paneli-zadach/

Здравствуйте. В приложении есть две формы. Та, которая Application.Mainform, при сворачивании отображается на панели задач. А другая при сворачивании отображается в необычном виде над панелью задач в нижнем левом углу экрана (пример во вложенном изображении). Можно ли сделать средствами FM так, чтобы у нее тоже был полноценный значёк на панели задач?

Точно! Спасибо.

Попробуйте в свойствах формы выставить Quality = HighQuality

Здравствуйте. Интересует такой вопрос - как в FM отображать разные формы приложения на разных мониторах? Интересует реализация под Windows, но в FM. Например, в приложении есть несколько форм, и я хочу, чтобы при определенных действиях в одной форме, результат отображался в другой форме на другом мониторе. В VLC можно так Form5.Left:= Screen.Monitors[i].Left; Но в FM Нет свойства Screen.Monitors, есть Screen.Displays, но там как-то не так.

Вычислил проблему - оказалось, что в XE10 это происходит при наличии на форме компонента TBannerAD. Если его нет, проблема не наблюдается. В XE7, этот же проект, проблемы нет с этим компонентом. Напомню суть проблемы: Это глюк самой среды или что-то нужно настроить? Галочка Admob в настройках стоит.

Спасибо. Буду пробовать.

Тогда прошу подсказать, что выложить? Обработку каких событий? OnResize я отключил. OnCreate разве происходит при разворачивании приложения из фона? OnShow, OnActive у меня нет и ничего другого тоже. Про логи очень интересно. А как узнать, что пишется в логах? Никогда раньше этого не делал.

<?xml version="1.0" encoding="utf-8"?> <!-- BEGIN_INCLUDE(manifest) --> <manifest xmlns:android="http://schemas.android.com/apk/res/android" package="%package%" android:versionCode="%versionCode%" android:versionName="%versionName%" android:installLocation="%installLocation%"> <!-- This is the platform API where NativeActivity was introduced. --> <uses-sdk android:minSdkVersion="%minSdkVersion%" android:targetSdkVersion="%targetSdkVersion%" /> <%uses-permission%> <uses-feature android:glEsVersion="0x00020000" android:required="True"/> <application android:persistent="%persistent%" android:restoreAnyVersion="%restoreAnyVersion%" android:label="%label%" android:debuggable="%debuggable%" android:largeHeap="%largeHeap%" android:icon="%icon%" android:theme="%theme%" android:hardwareAccelerated="%hardwareAccelerated%"> <%application-meta-data%> <%services%> <!-- Our activity is a subclass of the built-in NativeActivity framework class. This will take care of integrating with our NDK code. --> <activity android:name="com.embarcadero.firemonkey.FMXNativeActivity" android:label="%activityLabel%" android:configChanges="orientation|keyboard|keyboardHidden|screenSize" android:launchMode="singleTask"> <!-- Tell NativeActivity the name of our .so --> <meta-data android:name="android.app.lib_name" android:value="%libNameValue%" /> <intent-filter> <action android:name="android.intent.action.MAIN" /> <category android:name="android.intent.category.LAUNCHER" /> </intent-filter> </activity> <%activity%> <%receivers%> </application> </manifest> <!-- END_INCLUDE(manifest) -->

Я даже не знаю, какой участок кода выложить. Ведь зависание происходит даже когда нет обработки события OnResize формы. А что еще может влиять при повторном разворачивании приложения? Обработки событий изменения активности формы нет, обработки OnShow, OnActivate формы также нет. Изменение положения происходит в обработке события OnResize формы. Но даже если не обрабатывать это событие, то есть не менять положение контролов, то проблема остается. Насколько я понимаю, это значит, что не в изменении положений контролов дело, и вообще ни в чем том, что написано в обработчике OnResize.

Здравствуйте. Есть следующая проблема: в приложении реализована смена отображения контролов при повороте экрана. Все работает нормально, то есть экран поворачивается и контролы меняют свои позиции. Однако, если свернуть приложение, после чего повернуть экран, а затем снова развернуть приложение, то ничего не отображается (точнее отображается черный экран) и приложение зависает. Это происходит если в свернутом режиме повернуть экран не в ту ориентацию, в которой он был до сворачивания. Если же поворачивать экран много раз, а в конце вернуть в эту же ориентацию, то приложение нормально запускается. Проблема не исчезает, если убрать обработку события OnResize формы. Среда XE10. Прошу подсказать, в чем может быть проблема.

Большое спасибо за подробный ответ!

Здравствуйте. Интересует вопрос, каким образом выводить числа со степенями в TLabel или TText. Среди символов знаю только ² и ³. А мне нужна произвольная целочисленная степень, в том числе отрицательная. Самый очевидный для меня вариант на данный момент - это сделать AutoSize=True у основного текста. Измерять его ширину, и после этого текста в нужной позиции по горизонтали и вертикали вставлять другой TText, у которого размер шрифта и позиция по вертикали определяются размером шрифта основного текста. Но такой способ мне представляется не удобным. Если меняется длина основного текста, то при AutoSize=True он может отобразиться не в строчку, а в колонку и к тому же его длина не всегда точно вычисляется. Прошу подсказать, может есть более простой вариант вывода чисел со степенями.

Большое спасибо!