problema con checked

[Cosgaya]

hola a todos
tengo problemas con mainmenu
quiero que al pinchar en un un item, se active la opcion checked para que asi a la izquierda del item aparezca "V" ( la v esa con el palo estirado ) y no se que codigo tengo que poner
yo pensaba que era este
procedure........ on click....
checked := true;
end;

pero no memlo admite
si me pueden ayudar.. gracias

[marcoszorrilla]

Pues he hecho una prueba y me va perfectamente:

Código Delphi [-]
 procedure TForm1.tes1Click(Sender: TObject);
 begin
 tes1.Checked:=Not(tes1.checked);
 end;

Con este ejemplo al pulsar sobre el item en cuestión se marca sino lo está y desmarca si lo estuviera.

UN Saludo.

[[Lepe]]

Al menos en Delphi 6 tambien tienes la propiedad Autocheck, que automáticamente hará lo mismo que el código propuesto por Marcos.

Si tienes Autocheck en true, y por código accedes a la propiedad Checked, entonces, cuando das 1 click, delphi pone la marca automaticamente y tú, por código, la estas quitando.

Un saludo