Mehre Anweisungen, die nach nach einer If-Prüfung ausgeführt werden sollen, in einen Anweisungsblock setzen.
Also statt
if t=2 then button1.caption ('o') and t=0;
.
so
Delphi-Quellcode:
If t=2 then
begin
button1.caption ('o');
t=0;
end;
Zuweisungen mit := also entgültig dann so
Delphi-Quellcode:
If t=2 then
begin
button1.caption := 'o';
t := 0;
end;
PS: Im Quelltext-Kommentar steht ja, was er erreichen will.
PPS: Zuweisungs- und Vergleichsoperator (=, :=) und Anweisungsblöcke sind absolutes Basiswissen. Unbedingt nochmal mit den Grundlagen (Operatoren, Schlüsselwörter usw.) beschäftigen!