Problema con then!

[THACKER]

Hola, pues e aqui mi problema:

Tengo un boton en el cual tengo este codigo:

procedure TForm1.Button1Click(Sender: TObject);
begin
if tAccount.Text := ('AdminSystem') then
messagebox (handle, 'Thanks, you! We have send you a letter to your depot and you will get changes in 3 days.', 'Done', mb_iconinformation);
timer.Enabled := false
end;

end.

No veo error hay?
pero me da el siguiente error al tratar de correr la aplicasion:

[Error] Unit1.pas(169): Type of expression must by BOOLEAN

AVER QUIEN ME AYUDA!

[dec]

Hola,

Estás usando el operador de asignación (":=") en lugar del operador de igualdad ("=").

[THACKER]

@Up

Wow ! Muchas gracias la verdad no tenia idea de que delphi usaba (=) me ayudaste un monton!!! Gracias!

[donald shimoda]

Empezado por THACKER

@Up

Wow ! Muchas gracias la verdad no tenia idea de que delphi usaba (=) me ayudaste un monton!!! Gracias!

Solo por curiosidad, existe algun lenguaje que use para comparar := ?
Ninguno que yo conozca.

[[Delphius]]

THACKER, si me lo permites, quisiera hacer una observación.
Los paréntesis que incluístes están de más. Al ser una condición simple se pueden obviar. En caso de que la condición a evaluar fuera compleja y se necesitaran de mayores variables si se podría contemplar su uso.

Saludos,