Re: Помощь по Delphi
и дальше:
implementation
Const
link = clBlue; //цвет ссылки
alink = clRed; //цвет ссылки в момент нажатия
vlink = clPurple; // цвет посещеной ссылки
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.font.Color:=link;
end;
procedure...