USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic    (Windows)

Título da Dica:  Usando a Área de Transferencia
Postada em 14/8/2000 por Webmaster      Clique aqui para enviar email para o autor  webmaster@vbweb.com.br
O objeto Clipboard tem algumas funções p/ copiar algo p/ a área de transferencia, como também funções p/ se recuperar o que tem nela.
Vejamos então quais são estas funções:

Comando:
Clear <- Limpa o conteúdo da área de transferencia.

Sintaxe:
Clipboard.Clear

Comando:
GetFormat <- Retorna True se um item na área de transferencia corresponde ao formato especificado. Caso contrário, ele retorna False.

Sintaxe:
Clipboard.GetFormat (format)

Parametro format: OBRIGATÓRIO. Uma constante ou valor que especifique um dos formatos de elementos reconhecidos pelo VB. Esta constante ou valor deve estar entre parênteses.
Constantes do Parametro format:

Constante      Valor      Descrição
vbCFLink      &HBF00      Informações de conversação DDE
vbCFText      1      Texto
vbCFBitmap      2      Bitmap (arquivos .BMP)
vbCFMetafile      3      Metarquivo (arquivos .WMF)
vbCFDIB      8      Bitmap independente de dispositivo (DIB)
vbCFPalette      9      Paleta de cores

Exemplo:

If Clipboard.GetFormat(vbCFText)    Then
  Text1.Text = "A área de transferencia contém um texto"
EndIf
If Clipboard.GetFormat(vbCFBitmap) Then
  Text1.Text = "A área de transferencia contém uma imagem Bitmap"
EndIf
Comando:
GetData <- Retorna um objeto gráfico (imagem) da área de transferencia.

Sintaxe:
Clipboard.GetData (format)

Parametro format: OPCIONAL. Uma constante ou valor que especifique
um dos formatos de elementos gráficos reconhecidos
pelo VB. Se format for 0 ou omitido, GetData usa
automaticamente o formato adequado. A constante
ou valor deve estar entre parênteses
Constantes do Parametro format:

Constante      Valor      Descrição
vbCFBitmap      2      Bitmap (arquivos .BMP)
vbCFMetafile      3      Metarquivo (arquivos .WMF)
vbCFDIB      8      Bitmap independente de dispositivo (DIB)
vbCFPalette      9      Paleta de cores  

Observações: Caso não exista nenhum elemento gráfico na área de transferencia corresponde ao formato especificado, nada será retornado. Se, na área de transferencia, estiver presente somente uma paleta de cores um DIB de tamanho mínimo (1 x 1) será criado.

Exemplo:
Set Pricture1.Picture = Clipboard.GetData()

Comando:
GetText <- Retorna um texto a partir da área de transferencia.

Sintaxe:
Clipboard.GetText (format)

Parametro format: OPICIONAL. Um valor ou constante que especifica um dos formatos reconhecidos pelo VB. O valor ou constante deve estar entre parênteses.
Constantes do Parametro format:

Constante      Valor      Descrição
vbCFLink      &HBF00      Informações de conversação DDE
vbCFRTF      &HBF01      RichText Format (arquivo .RTF)
vbCFText      1      (Padrão) texto

Observações: Caso não exista nenhum texto na área de transferencia corresponde ao formato especificado, será retornada um texto de comprimento zero ("").

Exemplo:
Text1.Text = Clipboard.GetText(vbCFText)

Comando:
SetData <- Coloca uma figura na área de transferencia usando o formato gráfico especificado.

Sintaxe:
Clipboard.SetData data, format

Parametro data: OBRIGATÓRIO. Imagem a ser copiada.
Parametro format: OPCIONAL. Uma constante ou valor que especifique um dos formatos de elementos gráficos reconhecidos pelo VB. Caso format for omitido, SetData
determina automaticamente o formato.
Constantes do Parametro format:

Constante      Valor      Descrição
vbCFBitmap      2      Bitmap (arquivos .BMP)
vbCFMetafile       3      Metarquivo (arquivos .WMF)
vbCFDIB      8      Bitmap independente de dispositivo (DIB)
vbCFPalette      9      Paleta de cores

Exemplo:
Clipboard.SetData Picture1.Picture, vbCFBitmap

Comando:
SetText <- Copia um texto p/ a área de transferencia.

Sintaxe:
Clipboard.SetText data, format

Parametro data: OBRIGATÓRIO. Texto a ser copiado.
Parametro format: OPCIONAL. Uma constante ou valor que especifique um dos formatos reconhecidos pelo VB.
Constantes do Parametro format:

Constante      Valor      Descrição
vbCFLink      &HBF00      Informações de conversação DDE
vbCFRTF      &HBF01      RichText Format (arquivo .RTF)
vbCFText      1      (Padrão) texto

Exemplo:
Clipboard.SetText Text1.Text, vbCFText

Atenção:
* Quando você quizer copiar algo p/ a área de transferencia, ANTES da cópia, limpe-a.
* Quando você for recuperar algo da área de transferencia com o comando GetData ou SetData, ANTES verifique qual o formato do conteúdo da área de transferencia com o comando GetFormat.
 


CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página