Fórum Listar um MainMenu em um ChechListBox #180471
07/09/2003
0
Boa noite a todos!!!
Caros colegas,
Como faço para listar em CheckListBox os itens e subitens de um menu
Ex.
No menu do sistema tem
Arquivo ->Sair
Cadastrar->cadastrar cliente
Quero listar estes 4 itens
Desde já agradeço!!!!! :evil: :roll:
Caros colegas,
Como faço para listar em CheckListBox os itens e subitens de um menu
Ex.
No menu do sistema tem
Arquivo ->Sair
Cadastrar->cadastrar cliente
Quero listar estes 4 itens
Desde já agradeço!!!!! :evil: :roll:
Kandrus
Curtir tópico
+ 0
Responder
Posts
07/09/2003
Cebikyn
Tente:
procedure TForm1.Button1Click(Sender: TObject);
var
x: integer;
begin
for x:=0 to ComponentCount-1 do
if Components[x] is TMenuItem
then
CheckListBox1.Items.Add((Components[x] as TMenuItem).Caption);
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)