if not Edit1.Text := 'Text' thenDu bruger
:= til at sammenligne med, og det kan man ikke. := betyder tildeling. Du skal blot bruge et enkelt = tegn.
Du må heller ikke have et semikolon foran else, derved kommer en if..then.else til at se således ud:
If <betingelse> Then
<kode>
end
else
begin
<kode>
end;
</pre>
Hele din kode bliver således:
begin
if not Edit1.Text = 'Text' then
begin
ShowMessage('Der står ikke "Text" i Edit1');
end
else
begin
ShowMessage('Der står "Text" i Edit1');
end;
end;
Mvh,
Thomas Nielsen[Redigeret d. 09/02-03 15:45:52 af Thomas (Darkstar)]