Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TLabel.Alignment [D5, WinXP]


Beckett ©   (2002-06-09 21:57:00) 

Уважаемые Мастера! В коде
procedureTfrmMain.HeadDraw;
var
HeadLabels: array [1..7] of TLabel;
i:integer;
begin
fori:=1 to 7 do
begin
HeadLabels[i]:=TLabel.Create(frmMain);
withHeadLabels[i] do begin
Parent:=frmMain;
Alignment := taCenter;
WordWrap:=True;
top:=1;
AutoSize :=true;
Color:=clGreen;
font.color:=clWhite;
end;
end;
end;


в Alignment=taCenter получаю: [Error] Unit1.pas(92): Incompatible types: "TAlignment" and "TTextAlign"

Подскажите, что делать!
Спасибо!!!


Игорь Шевченко   (2002-06-10 10:01:00) [1]

какой-то из модулей uses скорее всего, вводит свой тип, в котором есть значение taCenter...
Попробуйте Alignment := Classes.taCenter и будет вам счастье


MBo   (2002-06-10 06:47:00) [2]

у меня это работает.

если не разберешься, сделай так
Alignment :=TAlignment(2);


Наверх

Титульная страница Поиск, карта сайта Написать письмо