Fórum Incompatible Types: ´ShortString´ and ´PChar´ #240286

:shock:

Bom dia..

Estou tendo um probleminha aqui... é o seguinte:

Tenho um form... no activate dele eu tenho o seguinte código:

procedure TForm2.FormActivate(Sender: TObject);
var
t, totalx: string [10];
begin
randomize;
x := random (300);
if (x mod 2 <> 0) then
x:=x+1;
total:= (x div 2);
t:= inttostr (x);
totalx:= inttostr (total);
Application.MessageBox (´Pense em um número...´, ´Diego Nunes Meira´, MB_OK+MB_ICONHAND);
Application.MessageBox (´Multiplica este número por dois´, ´Diego Nunes Meira´, MB_OK+MB_ICONHAND);
Application.MessageBox (´Soma ´+ t, ´Diego Nunes Meira´, MB_OK+MB_ICONHAND);
Application.MessageBox (´Divide o resultado por 2´, ´Diego Nunes Meira´, MB_OK+MB_ICONHAND);
Application.MessageBox (´Diminui pelo número que vc pensou´, ´Diego Nunes Meira´, MB_OK+MB_ICONHAND);
Application.MessageBox (´O Resultado de toda essa matemática foi = ´+totalx, ´Diego Nunes Meira´, MB_OK+MB_ICONHAND);
Inttostr (Total)
end;

Quando eu jogo uma variável na msg da o erro de incompatibilidade...

Alguem pode sanar essa dúvida?

Desde já agradecido...

Diego