Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.15;
Скачать: CL | DM;

Вниз

TextAlign   Найти похожие ветки 

 
Ajax ©   (2003-07-02 10:40) [0]

Почему не работает следущий код?
EditBox1.TextAlign:=taCenter;
То есть если в десигнтайм свойства ставить все хорошо, а вот во время выполнения не работает. Может нужно отдавать еще какую-нибудь команду на обновление?


 
savva ©   (2003-07-02 11:21) [1]

у меня работает.. вот динамически создаю тот самый бокс:
Edit := NewEditbox( Form,[]);
     Edit.Ctl3D := False;
     Edit.Color := clInfoBk;
     Edit.DoubleBuffered := True;
     Edit.TextAlign := taCenter;

     with Edit^ do
     begin
       Left := 10;
       Top := 10;
       Text := Value;
       SelectAll;
     end;


 
Ajax ©   (2003-07-02 21:32) [2]

А если теперь в конце вашего кода дописать
edit.TextAlign:=taLeft;
То текст останется в центре.


 
Gandalf ©   (2003-07-03 17:31) [3]

Это API таков - флаг можно установить но снять нельзя, потому работает только первая установка, для вторичной смены нужно создать новый компонент.


 
Ajax ©   (2003-07-04 12:44) [4]

А может внести в KOL такую возможность???

Initially create a single control. When the text alignment is to change, retrieve location, size, and style bits for the existing edit control.

Create a new control with the same size and in the same location, but change the style bits to reflect the new alignment.

Send the EM_GETHANDLE to each control to retrieve a handle to the memory that stores the contents. Send an EM_SETHANDLE to each control to exchange the memory used by each. Finally, destroy the original control.

Этот пример в SDK описан.


 
SPeller ©   (2003-07-04 17:21) [5]

Если вам нужно - то где-то в статьях было описано два (помоему) решения этой проблемы, и, как раз, на примере выравнивания текста в Edit.


 
Vladimir Kladov   (2003-07-04 17:47) [6]

потенциально надо бы еще "retrieve" значения, установленные SetWindowLong (а их несколько разных может быть), SetProp (а как узнать, какие - кроме "ID_SELF"?), SetAtom. Если не брать это в расчет, то все можно. Вполне обойтись и внешней функций, совсем необязательно устраивать метод. Теоретически можно и через отдельное свойство вроде ED_Options.


 
Ajax ©   (2003-07-06 21:26) [7]

>SPeller ©   (04.07.03 17:21)
Так и не смог найти, вышлите пожалуйста линк.

>Vladimir Kladov   (04.07.03 17:47)
Будет ли реализована смена флага в KOL?


 
Юрий К   (2003-07-07 15:33) [8]

">Vladimir Kladov   (04.07.03 17:47)
Будет ли реализована смена флага в KOL?"

Тоже желаю знать ответ, может это сложно сделать?


 
Ajax ©   (2003-07-09 07:27) [9]

Да/Нет


 
avs   (2004-03-12 14:35) [10]

Еще одна особенность: Если в KolMemo  в DesignTime свойство Align<>caNone,текст выравнивается независимо от свойства TextAlign по левому краю. Победить это можно изменяя свойство Align после запуска программы.



Страницы: 1 вся ветка

Текущий архив: 2004.08.15;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.065 c
3-1090410527
ViJen
2004-07-21 15:48
2004.08.15
ORA-12537


14-1091169051
Rule
2004-07-30 10:30
2004.08.15
Поздравляю всех с днем сисадмина.


3-1089896943
ZedeS
2004-07-15 17:09
2004.08.15
Paradox+ADO+Delphi - получилось медленно!!!


6-1086983867
VLoB
2004-06-11 23:57
2004.08.15
Indy (idTCPServer / idTCPClient)


4-1088780499
vajo
2004-07-02 19:01
2004.08.15
процент копирования файла