Помогите новичку!

[Yury]

Доброго времени дня всем!

Недавно начал заниматься Делфи!

Столкнулся с несколькими проблемами

1. Как в TEdit на форме сделать так чтобы текст выравнивался по
центру (по правому краю)?

2. Как при выдаче отчета через FastReport использовать глобальные переменные проекта и данные из массива этого же проекта который
также объявлен глобальным.
Тоесть хотелось бы имея переменную "arhiv" и массив "arr[9,9]"
показать их данные на страничке отчета написав например
"Код для архива"+[arhiv]+" = "+[arr[2,3]]+"!!!"

Пользуюсь Делфи 7, Фаст Репорт 3.
Заранее благодарен.

[СТРАННИК]

Пункт 1.
Создай компонент и всё.
unit AlignEdit;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;

type
TAlign = (eaLeft, eaCenter, eaRight);
TAlignEdit = class(TEdit)
private
{ Private-Deklarationen }
FAlign: TAlign;
procedure SetAlign(const Value: TAlign);
protected
{ Protected-Deklarationen }
procedure CreateParams(var Params: TCreateParams); override;
public
{ Public-Deklarationen }
constructor Create(AOwner: TComponent); override;
published
{ Published-Deklarationen }
property Alignment: TAlign read FAlign write SetAlign default eaLeft;
end;

procedure Register;

implementation

constructor TAlignEdit.Create(Aowner: TComponent);
begin
inherited Create(AOwner);
FAlign := eaLeft;
end;

procedure TAlignEdit.SetAlign(const Value: TAlign);
begin
if FAlign <> Value then
begin
FAlign := Value;
RecreateWnd;
end;
end;

procedure TAlignEdit.CreateParams(var Params: TCreateParams);
begin
inherited;
case FAlign of
eaLeft: Params.Style := Params.Style or ES_LEFT;
eaCenter: Params.Style := Params.Style or ES_CENTER;
eaRight: Params.Style := Params.Style or ES_RIGHT;
end;
end;

procedure Register;
begin
RegisterComponents('DelphiComponent s', [TAlignEdit]);
end;

end.

Пункт 2. Пока без ответа.