[Delphi 7] Dúvida sobre colocar icon no "MainMenu"

[matheuzinhuvs 1]

 

Bom eu crio meu "MainMenu" mais eu queria aprender colocar esses icon do lado esquerdo do escrito como está na imagem mais nao sei como.

Alguem pode me ajudar.

[soquerogold1 7]

na aba standar em ''Mainmenu(meus)'' so clikar e colocar seus menos,pra colocar icone,voçê clika em cima do menu que deseja e procura Picture ou algo do genero,caso queria colocar esse barinha no meio e so criar um menu com isso '' - '' e pronto.Espero ter ajudado

[edoO~' 1]

apos ter criado seu menu...

clique em uma função desejada..

daí clique em "bitmap"

então carregue sua imagem!

[matheuzinhuvs 1]

valeu eu consegui, eu queria saber tbm pq eu crio um botao pra traduzir o programa dai eu nao sei traduzir as "messagembox" eu tento assim: Button1.OnClick := "messagembox" (handle............. / Button1.Click := "messagembox" (handle............. / e ja tentei tbm Button1Click := "messagembox" (handle............. mais não da certo nem um, alguem me ajuda.

Obrigado

[edoO~' 1]

if menudolaingua.checked then

messagebox na lingua

 

if menudaoutralingua.checked then

messagebox na outra lingua

[matheuzinhuvs 1]

não entendi muito edoO~'

poderia explicar mais facil pra min?

Eu fiz os botao tudo olha ai na imagem

 

mais nao sei o comando pra fazer traduzir uma "messagebox" = messagebox (handle, '-Menssagem-', '-Titulo-, mb_iconinformation);

 

pra mudar o nome de botoes eu sei é assim Button1.Caption := 'Delphi 7';

 

mais queria saber o do "messagebox"

[edoO~' 1]

faça o menu como radioitem..

ou seja, ele checa o q for escolhida..

então no botão vc coloca o código citado por mim!

[matheuzinhuvs 1]

entao nao to intendendo a parte do "if" e a do "then" message box eu coloco o codigo na mesma linha e ja tentei da de baixo mais nem vai

[soquerogold1 7]

Bom não mexo muito com delphi mais deve ser isso:

se não funfar avisa:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Bom achei isso na net pode lhe ajudar:

Olá a todos ...

 

Gente, consegui resolver da seguinte forme, ao invés de utilizar o MessageDlg eu usei o MessageBox, nele tem como você colocar todos os critérios que quiser como por exemplo título, mensagem e botões, ele usa o idioma do sistema operacional, sendo assim, os botões são convertidos para o português, segue exemplos abaixo:

 

Mensagem de confirmação:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Mensagem de Informação:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Além de resolver meu problema espero ter ajudado

 

Obrigado a todos

[edoO~' 1]

ele checa o q for escolhida..

então no botão vc coloca o código citado por mim!

 

if menudolaingua.checked then

messagebox na lingua

 

if menudaoutralingua.checked then

messagebox na outra lingua

 

 

no botão, ele verificará, se o menu de "ingles" estiver checado dá a mensagem em ingles..

e o outro código, se o menu portugues estiver checado, dá a mensagem em portugues

^^/

 

não é dificil mano, basta pensar

[matheuzinhuvs 1]

deu certo mais nao oq eu queria

 

Vou dar um exemplo com seu programa edoO~' pra ve se fica melhoor pra intender

 

 

1

 

 

2

 

Tipo na imagem 1 um eu coloquei em portugues e a 2 eu coloquei em ingles

 

Eu fiz isso no meu projeto de mudar a lingua no programa mais nao sei como fazer mudar a menssagebox o codigo pra fazer mudar agora

[edoO~' 1]

repetindo mais uma vez...

 

ele checa o q for escolhida..

então no botão vc coloca o código citado por mim!

 

if menudolaingua.checked then

messagebox na lingua

 

if menudaoutralingua.checked then

messagebox na outra lingua

 

 

no botão, ele verificará, se o menu de "ingles" estiver checado dá a mensagem em ingles..

e o outro código, se o menu portugues estiver checado, dá a mensagem em portugues

^^/

 

não é dificil mano, basta pensar

 

leia

[matheuzinhuvs 1]

ok eu entendi mais eu preciso prestar mais atenção pq eu leio mais nem pensso, vlw pela ajuda levo meu agradecimento

 

Pode da [x] Closed aqui

[MakeZero 3]

Resolvido.

 

Fechado[x]