Em Delphi o código é executado linha a linha logo se tiver o seguinte código:

    A := 5;
    B := A;
    showmessage('A=' + IntToStr(A) + '; B=' + IntToStr(B));

> Mensagem: A=5; B=5

Está a atribuir o mesmo valor de **A** á variavel de **B**.<br>
Para **B** ter um valor diferente de **A** basta para isso remover a atribuição da mesma "`B := A;`" exemplo de código:

    A := 10;
    //B := A;
    B := 62;
    showmessage('A=' + IntToStr(A) + '; B=' + IntToStr(B));

> Mensagem: A=10; B=62

Não sendo a opção mais correta (dependendo dos casos) pode ainda reatribuir o valor da variavel **B**, exemplo:

    A := 10;
    B := A;
    showmessage('A=' + IntToStr(A) + '; B=' + IntToStr(B));

> Mensagem: A=10; B=10

    B := 62;
    showmessage('A=' + IntToStr(A) + '; B=' + IntToStr(B));

> Mensagem: A=10; B=62

Existe ainda uma ultima opção que é atribuir um novo valor a **A** da seguinte forma, exemplo:

    A := 5;
    B := A;
    A := 10;
    showmessage('A=' + IntToStr(A) + '; B=' + IntToStr(B));

> Mensagem: A=10; B=5