Гиперссылка через процедуру.

[docbrain]

Доброе время суток.
Я хотел сделать в своей программе несколько гиперссылок. Гиперссылки я собирался сделать из меток TLabel. Обработка URL должна была производится в отдельной процедуре, в обработчиках событий меток ее должны были только вызывать. В целом, код должен был бы быть такой.

public
          X : String;
           Y : PChar;
            procedure Z;
 
 procedure Form2.Z; 
ShellExecute(handle, 'open', Y, nil, nil, SW_SHOW);

procedure Form2.Label1.Click;
X := 'www.mail.ru';
Y := X; 
Form2.Z;

Но в реале проект не компилируется. Пишет что-то о несовместимости типов.

[Пепел Феникса]

а зачем Y нужна?
делаем просто

ShellExecute(handle,nil,PChar(X),nil,nil,SW_SHOW);

[docbrain]

Thank you.