Нужно внести изменение в код компонента для исправления.
// TextAlign = Left
if STextAlign = taLeft then begin
k := wn * i + j
end
else
// TextAlign = Right
if STextAlign = taRight then begin
k := wn*i+j+(Width-(wn)*FDigits)
end
else begin
// TextAlign = Center
k := wn*i+j+(Width-(wn)*FDigits)div 2;
if STextAlign = taLeft then begin
k := wn * i + j
end
else
// TextAlign = Right
if STextAlign = taRight then begin
k := wn*i+j+(Width-(wn)*FDigits)
end
else begin
// TextAlign = Center
k := wn*i+j+(Width-(wn)*FDigits)div 2;
Редактировалось 3 раз(а), последний 2021-10-21 20:40:42
Поиск
Друзья
Администрация