Fórum Como trabalhar com componentes que tenho em uma string. #178729
31/08/2003
0
Estou tentado passar parametros para alguns itens do Menu tais como deixa-los visivel/invisivel, mas o problema é que esta relação de itens está em uma variavel String, o Delphi até compila, mas na hora de mudar o estado do item da erro.
ex:
procedure TForm1.Button1Click(Sender: TObject);
var
ItemMenu : TMenuItem;
Texto : String;
begin
Texto:=Edit1.Text;
ItemMenu:=MainMenu1.Items.Find(Texto);
ItemMenu.Visible:=False;
end;
ex:
procedure TForm1.Button1Click(Sender: TObject);
var
ItemMenu : TMenuItem;
Texto : String;
begin
Texto:=Edit1.Text;
ItemMenu:=MainMenu1.Items.Find(Texto);
ItemMenu.Visible:=False;
end;
Paulo Cesar
Curtir tópico
+ 0
Responder
Posts
31/08/2003
Adilsond
TMenuItem(FindComponent(Edit1.Text)).Visible := False;
Responder
Gostei + 0
01/09/2003
Paulo Cesar
TMenuItem(FindComponent(Edit1.Text)).Visible := False;
Obrigado Adilson, funcionou perfeitamente.... :D
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)