Delphi Encurtando links com o Borland Delphi 7

[lsh]

Não sei se sera util mais gosto de ajudar os iniciantes em Delphi

alera, este tutorial refere-se a um programa no qual vocês desejam encurtar os links, por exemplo, eu coloquei o do google, e ele encurtou da seguinte forma: Apenas usuários registrados e ativados podem ver os links., Clique aqui para se cadastrar...

O que você vai precisar:

2 Labels
2 Edits
1 Button

Tutorial:

lique duas vezes no form, e vá até as USES e adicione:
IdHttp
Após ter feito isso, organize e renomeie do jeito que preferir todos os componentes, clique no Button e adicione o seguinte código:

var
idh : TIdHttp;
begin
idh := TIdHttp.Create(form1);
Edit2.Text:=idh.Get('http://*********/api.txt?url='+Edit1.Text);
idh.Free;


Bom, viram que ficou Apenas usuários registrados e ativados podem ver os links., Clique aqui para se cadastrar..., substitua os ******* por migre . me (tudo junto)

Porque mudar os *******?
Simples, a maioria do forums não aceita colocar links nas barras de código, por isso estou mostrando o que deve ser feito.