Вопрос про alignment у TEdit.

← →
vegarulez © (2008-02-20 09:20) [0]

В CLX это свойство есть в VCL сечас вставил в проект TEdit и оное свойство отсутсвует. Поэтому есть Вопрос:
1. как быть в VCL?
2. как в VCL проект вставить компонент CLX? Неважно TEdit, или любой другой.

← →
vegarulez © (2008-02-21 08:13) [1]

Удалено модератором

← →
ЮЮ © (2008-02-21 09:02) [2]

> 2. как в VCL проект вставить компонент CLX? Неважно TEdit,
> или любой другой.

В Help хоть раз заглядывал?

CLX Reference VCL Reference

TEdit TEdit

Unit Unit

QStdCtrls StdCtrls

З.Ы. чтобы твой ехе-шник заработал на другои компьютере придется таскать нехилую run-time библиотеку.

Что такое TEdit, растянутый на весь экран/ пол экрана? Может тебе TMemo использовать при таких аппетитах?

← →
Johnmen © (2008-02-21 09:21) [3]

> ЮЮ © (21.02.08 09:02) [2]

Вообще-то автор говорил об Alignment, а не об Align. Разница понятна?
И о какой нехилой библиотеке речь?

> vegarulez ©

Что в этом едите предполагается едитить?

← →
vegarulez © (2008-02-21 09:25) [4]

2 ЮЮ © (21.02.08 09:02) [2]
смотреть Johnmen © (21.02.08 09:21) [3]

2 Johnmen © (21.02.08 09:21) [3]
циферки...
просто типа чтоб по правую сторону находились... так удобнее....

← →
MBo © (2008-02-21 09:42) [5]

создать наследника TEdit, в перекрытом методе CreateParams добавить ES_RIGHT

← →
Johnmen © (2008-02-21 09:45) [6]

> vegarulez © (21.02.08 09:25) [4]

Возьми что-нибудь стороннее. Напр. TCurrencyEdit из RxLib.
Другие пути тебе ещё рановато, как я понял...:)

← →
vegarulez © (2008-02-21 10:13) [7]

Johnmen © (21.02.08 09:45) [6]
да я в этом с тобой согласен )
Попробую - спасип.

MBo © (21.02.08 09:42) [5]
кинь ссылкой чтоб почитать как это реализовывается.
типа:

myEdit:Tedit;
...
myEdit:=Tedit.Create(nil);
{[а тут вставить "перекрытый метод CreateParams???"}
myEdit.Free;

или я не так тя понял? кинь чем нить, чтоб думалось в нужном направлении...
з.ы. тока не кирпичом )

> циферки...

> добавить ES_RIGHT

+ ES_NUMBER

TMyEdit = class(TEdit) private FAlignment: TAlignment; FOnlyDiget: Boolean; procedure SetAlignment(const Value: TAlignment); procedure SetOnlyDiget(const Value: Boolean); public procedure CreateParams(var Params : TCreateParams); override; published property Alignment: TAlignment read FAlignment write SetAlignment; property OnlyDiget: Boolean read FOnlyDiget write SetOnlyDiget; end; ............................... procedure TMyEdit.CreateParams(var Params: TCreateParams); const AlSt: array [TAlignment] of Cardinal = (ES_LEFT, ES_RIGHT, ES_CENTER); var St: Cardinal; begin inherited; St:=AlSt[FAlignment]; if FOnlyDiget then St:=St or ES_NUMBER; Params.Style := Params.Style or St; end; procedure TMyEdit.SetAlignment(const Value: TAlignment); begin if FAlignment <> Value then begin FAlignment := Value; RecreateWnd; end; end; procedure TMyEdit.SetOnlyDiget(const Value: Boolean); begin if FOnlyDiget <> Value then begin FOnlyDiget := Value; RecreateWnd; end; end;

Только Digit, а не Diget :)

← →
Семеныч (2008-02-28 06:56) [10]

> {RASkov}

И CreateParams - protected, а не public.
:o)

Вопрос про alignment у TEdit. Найти похожие ветки