Ir para conteúdo
Fórum Script Brasil
  • 0

Opendialog


Arckyz

Pergunta

2 respostass a esta questão

Posts Recomendados

  • 0

One of the commonly used dialog box components is TOpenDialog. This component is usually invoked by a New or Open menu item under the File option on the main menu bar of a form. The dialog box contains controls that let you select groups of files using a wildcard character and navigate through directories.

The TOpenDialog component makes an Open dialog box available to your application. The purpose of this dialog box is to let a user specify a file to open. You use the Execute method to display the dialog box.

When the user chooses OK in the dialog box, the user’s file is stored in the TOpenDialog FileName property, which you can then process as you want.

The following code snippet can be placed in an Action and linked to the Action property of a TMainMenu subitem or be placed in the subitem’s OnClick event:

if OpenDialog1.Execute then

filename := OpenDialog1.FileName;

This code will show the dialog box and if the user presses the OK button, it will copy the name of the file into a previously declared AnsiString variable named filename.

Agora, traduzindo:

Um dos componentes geralmente usados da caixa de diálogo é TOpenDialog.

Este componente é invocado geralmente por um artigo de menu novo ou aberto sob a opção da lima na barra de menu principal de um formulário.

A caixa de diálogo contem os controles que o deixam selecionar grupos das limas usando um caráter do wildcard e navigate através dos diretórios.

O componente de TOpenDialog faz uma caixa de diálogo aberta disponível a sua aplicação.

A finalidade desta caixa de diálogo é deixou um usuário especificar uma lima para abrir.

Você usa o método executar indicar a caixa de diálogo.

Quando o usuário escolhe ESTÁ BEM na caixa de diálogo, a lima do usuário está armazenada na propriedade do nome de arquivo de TOpenDialog, que você pode então processar enquanto você quer.

O seguinte snippet do código pode ser colocado em uma ação e ser ligado à propriedade da ação de um subitem de TMainMenu ou ser colocado no evento de OnClick dos subitem:

se OpenDialog1.Execute então

se OpenDialog1.Execute então nome de arquivo: = OpenDialog1.FileName;

Este código mostrará a caixa de diálogo e se o usuário pressionar a tecla APROVADA, copí o nome da lima em um nome de arquivo nomeado variável previamente declarado de AnsiString.

Caro Arckyz.

O texto em ingles é do próprio Help do Delphi... basta teclar F1 e procurar OpenDialog...

Se você clicar em Localizar, verá também que o TOpenDialog aparece em inúmeros outros exemplos (de outros componentes e/ou procedures e funções)...

Caso tenha dificuldades com o ingles, pode usar uma ferramenta de tradução... no caso, simplesmente copiei o texto do help e pedi pro BabelFish traduzir...

Aqui vai outro exemplo:

procedure TForm1.Button1Click(Sender: TObject);

Var

sArquivo: String;

Begin

if OpenDialog1.Execute then

begin

sArquivo := OpenDialog1.FileName;

ShowMessage('Bom... o arquivo escolhido foi o '+sArquivo+' agora, escolha o que vai fazer com ele...');

end;

end;

end.

Ok?

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...