Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.90/48: Рейтинг темы: голосов - 48, средняя оценка - 4.90
0 / 0 / 0
Регистрация: 11.09.2013
Сообщений: 28

Выравнивание текста в TEdit

06.02.2015, 13:28. Показов 17118. Ответов 17
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
День добрый.

Вопрос.
Есть Edit1, Edit2 в них текст. Требуется выровнять текст
1. по правой стороне Edit1,
2. по центру в Edit2

Вариант с BiDiMode не работает.

Спасибо за помощь.


PS ответа на форуме не нашел, если такой есть, ткните носом.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
06.02.2015, 13:28
Ответы с готовыми решениями:

Выравнивание текста в ячейке по вертикали в зависимости от высоты текста
Подскажите, есть ли возможность прорисовывать текст в ячейке грида, в зависимости от её высоты. Видимо пересчитывать как то с помощью ...

Выравнивание текста в ячейке грида при вводе текста
Вечер добрый. Не подскажите, у меня выравнивание работает (по вертикале и 5 пикселей от левого края по горизонтали) int x,y; x =...

Изменение цвета текста Label в зависимости от TEdit
имеется два поля tedit по нажатии button, происходят некоторые вычисления и в tedit выводятся значения нужно сделать так, чтобы если...

17
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33195 / 21491 / 8233
Регистрация: 22.10.2011
Сообщений: 36,880
Записей в блоге: 12
06.02.2015, 13:32
У Edit-а есть свойство Alignment, прямо в Object Inspector-е выставь первому в taRightJustify, второму - в taCenter
0
0 / 0 / 0
Регистрация: 11.09.2013
Сообщений: 28
06.02.2015, 13:35  [ТС]
такого свойства у Edit-а нет. (PS С++ Builder 6)
Название: 1.png
Просмотров: 490

Размер: 6.9 Кб
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33195 / 21491 / 8233
Регистрация: 22.10.2011
Сообщений: 36,880
Записей в блоге: 12
06.02.2015, 13:37
Цитата Сообщение от varkan Посмотреть сообщение
С++ Builder 6
В мусор.

Тысячу раз говорил - хотите решать задачу - берите современные средства разработки, хотите изобретать костыли, необходимые чтобы потом начать решать задачу - берите Билдер 5 или 6. Ты свой выбор сделал, а я костылями не занимаюсь...
0
0 / 0 / 0
Регистрация: 11.09.2013
Сообщений: 28
06.02.2015, 13:39  [ТС]
спасибо за помощь.

еще варианты?
0
Почетный модератор
Эксперт С++
 Аватар для SatanaXIII
5851 / 2862 / 392
Регистрация: 01.11.2011
Сообщений: 6,906
06.02.2015, 13:47
Цитата Сообщение от varkan Посмотреть сообщение
еще варианты?
C++
1
2
int EditWidth = Edit1->Width ;
int EditTextWidth = this->Canvas->TextWidth( Edit1->Text );
Развлекайтесь.

Цитата Сообщение от volvo Посмотреть сообщение
У Edit-а есть свойство Alignment
Оно наверное внутри тоже относительно канвы просто смещает текст, да?
0
0 / 0 / 0
Регистрация: 11.09.2013
Сообщений: 28
06.02.2015, 13:52  [ТС]
а можно весь текст программы?
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33195 / 21491 / 8233
Регистрация: 22.10.2011
Сообщений: 36,880
Записей в блоге: 12
06.02.2015, 13:56
Лучший ответ Сообщение было отмечено varkan как решение

Решение

SatanaXIII, ну я для кого про перехватчики писал?

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
// в Header-файле, перед описанием класса формы
namespace Aligned_Edit
{
    class TEdit : public Stdctrls::TEdit
    {
    private:
        int FStyle;
        void MySetStyle(int AStyle)
        {
            if(AStyle != FStyle)
            {
                FStyle = AStyle;
                RecreateWnd();
            }
        }
 
    protected:
        virtual void __fastcall CreateParams(Controls::TCreateParams &Params)
        {
            Stdctrls::TEdit::CreateParams(Params);
            Params.Style |= FStyle;
        }
 
    public:
        __fastcall virtual TEdit(Classes::TComponent* AOwner)
            : Stdctrls::TEdit(AOwner)
        {
            FStyle = ES_LEFT;
        }
        __property int MyAlignment = { read=FStyle, write=MySetStyle };
    };
};
#define TEdit Aligned_Edit::TEdit
 
// Дальше - класс формы, как обычно
class TForm1 : public TForm
, изменять очень просто:
C++
1
2
    Edit1->MyAlignment = ES_RIGHT;
    Edit2->MyAlignment = ES_CENTER;
Оно надо, такие велосипеды писать? Мазохизм какой-то просто...
4
0 / 0 / 0
Регистрация: 11.09.2013
Сообщений: 28
06.02.2015, 13:59  [ТС]
Спасибо большое!

Все работает!

Тема закрыта.
0
Почетный модератор
Эксперт С++
 Аватар для SatanaXIII
5851 / 2862 / 392
Регистрация: 01.11.2011
Сообщений: 6,906
06.02.2015, 15:16
volvo, перехватчик да, как работает стиль? При отрисовке эдита он сдвигает текст в середину канвы этого же эдита? Или там какая-то магия?
0
Я Фоюмчанин ? дааааа)
 Аватар для ivan.-94
213 / 204 / 23
Регистрация: 02.06.2012
Сообщений: 1,424
Записей в блоге: 12
06.02.2015, 15:49
SatanaXIII, Если я правильно понимаю volvo у эдита создал какой то объек Param и у него значение Style меняется.
Тогда судя по всему, если я правильно понимаю, как происходит отрисовка знает только билдер - в нем это реализовано.
0
Я Фоюмчанин ? дааааа)
 Аватар для ivan.-94
213 / 204 / 23
Регистрация: 02.06.2012
Сообщений: 1,424
Записей в блоге: 12
06.02.2015, 16:01
На доквики эмбаркадеро тишина по TCreateParams.
volvo, а я вот тут посмотрел TEdit и подумал - а может можно было проще?
0
Я Фоюмчанин ? дааааа)
 Аватар для ivan.-94
213 / 204 / 23
Регистрация: 02.06.2012
Сообщений: 1,424
Записей в блоге: 12
06.02.2015, 16:07
Хотя нет я не прав
C++
1
2
3
4
5
6
7
8
9
namespace Aligned_Edit
{
    class TEdit : public Stdctrls::TEdit
    {
    public:
        using Stdctrls::TEdit::Alignment;
    };
};
#define TEdit Aligned_Edit::TEdit
Не работает
А ну я сглупил)))
На Embarcadero ведь справка для 2010 версий компилятора и ++
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33195 / 21491 / 8233
Регистрация: 22.10.2011
Сообщений: 36,880
Записей в блоге: 12
06.02.2015, 16:08
Цитата Сообщение от SatanaXIII Посмотреть сообщение
При отрисовке эдита
Нет, не при отрисовке, а при создании окна. Окно Edit-а создается с нужным стилем, задающим выравнивание. При смене стиля окно просто пересоздается заново, "всего и делов то" (С) "Осенний марафон"

Цитата Сообщение от ivan.-94 Посмотреть сообщение
На доквики эмбаркадеро тишина по TCreateParams
Просто CreateParams, TCreateParams, где ж тишина?
1
Я Фоюмчанин ? дааааа)
 Аватар для ivan.-94
213 / 204 / 23
Регистрация: 02.06.2012
Сообщений: 1,424
Записей в блоге: 12
06.02.2015, 16:22
volvo, просто я искал:
Но все норм если искать Vcl.Controls и у него TCreateParams
0
-4 / 1 / 0
Регистрация: 15.01.2014
Сообщений: 25
19.02.2025, 11:25
C++
1
2
3
DWORD h = GetWindowLong(Ed2->Handle, GWL_STYLE);
   SetWindowLong(Ed2->Handle, GWL_STYLE, h | ES_CENTER | ES_NUMBER);
   Ed2->Refresh();
Не благодарите.
0
Злостный нарушитель
 Аватар для Verevkin
10242 / 5670 / 1260
Регистрация: 12.03.2015
Сообщений: 26,265
19.02.2025, 11:50
Цитата Сообщение от id866999 Посмотреть сообщение
Не благодарите.
И не собирались.
Спустя 10 лет это уже неактуально. Выравнивание текста давно добавили в TEdit.
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33195 / 21491 / 8233
Регистрация: 22.10.2011
Сообщений: 36,880
Записей в блоге: 12
19.02.2025, 11:53
Цитата Сообщение от id866999 Посмотреть сообщение
Не благодарите.
За это по шее надо давать, а не благодарить. При наличии возможности написания 64-битных приложений (меня BCB6 не интересует от слова совсем, если что, я уже 10 лет назад об этом написал, а вот зайти сейчас и взять твой г...код может любой) использовать Get/SetWindowLong? Про ...Ptr-версии ничего не слышал, уникальных TCP пакетов писатель?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
19.02.2025, 11:53
Помогаю со студенческими работами здесь

Drag&Drop выделенного текста между компонентами TMemo, TListBox и TEdit
Здраствуйте. У меня такое вот задание: Используя Drag&Drop, сделать возможным перетягивание выделенного текста между компонентами TMemo,...

Как оставить нетронутым выделение текста в Tedit при нажатии курсорных клавиш?
Всем здравствуйте. В окне с именем Edit1 по умолчанию находится текст "Edit1". Делаем так, чтобы текст всегда оставался выделенным: ...

Выравнивание текста в TRichEdit
На форме два компонента. TRichEdit и TSpinEdit. Нужно чтобы при изменении значения в TSpinEdit-е изменялся отступ текста в TRichEdit-е....

ListBox выравнивание текста
может у кого есть код переноса текста на новую строку если текст не влазит(вариант нужен без hint,scroll,сторонних компонентов)

RichEdit - выравнивание текста
Прива, пацпны как можно запрограмировать кнопку виравнивание таекста "С лева"?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
18
Ответ Создать тему
Новые блоги и статьи
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru