|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Windows)
|
|
 |
Título da Dica: Usando a Área de Transferencia
|
 |
|
|
|
Postada em 14/8/2000 por Webmaster
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.
|
|
|
|
|
