4D v14.3GET ICON RESOURCE |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D v14.3
GET ICON RESOURCE
|
GET ICON RESOURCE ( resNum ; resDados {; resArquivo} ) | ||||||||
Parâmetro | Tipo | Descrição | ||||||
resNum | Inteiro longo |
![]() |
Número do ID de resouce ícone | |||||
resDados | Imagem |
![]() |
Campo ou variável imagem para receber o ícone | |||||
![]() |
Imagem resultante | |||||||
resArquivo | DocRef |
![]() |
Número de referência de arquivo de recursos ou todos os arquivos de recursos abertos, se omitido | |||||
O comando GET ICON RESOURCE retorna no campo ou a variável imagem resDados, o ícone guardado no recurso ícone (“cicn”) cujo número de identificação se passa em resNum.
Se não for encontrado o registro, o parâmetro resDados não muda e a variável sistema OK toma o valor 0 (zero).
Se passa um número de referência de arquivo de recursos válido em resArquivo, o recurso é procurado nesse arquivo unicamente. Se não passa resArquivo, se retorna a primeira ocorrência do recurso encontrada na cadeia dos arquivos de recursos.
O comando [#descv]devolve no campo ou a variável imagem resDados, o ícone guardado no recurso ícone (“cicn”) cujo número de identificação se passa em resNum.[#/descv]
Se não for encontrado o registro, o parâmetro resDados não modifica e a variável sistema OK toma o valor 0 (zero).
Se passa um número de referência de arquivo de recursos válido em resArquivo, o recurso é procurado nesse arquivo unicamente. Se não passa resArquivo, se retorna a primeira ocorrência do recurso encontrada na cadeia dos arquivos de recursos.
O exemplo a seguir carrega em um array de tipo imagem os ícones cor localizados na aplicação 4D ativa:
If(On Windows)
$vh4DResArquivo:=Open resource file(Replace string(Application file;".EXE";".RSR"))
Else
$vh4DResArquivo:=Open resource file(Application file)
End if
RESOURCE LIST("cicn";$alResNum;$asResNom;$vh4DResArquivo)
$vlNbIcons:=Size of array($alResNum)
ARRAY PICTURE(ag4DIcon;$vlNbIconos)
For($vlElem;1;$vlNbIconos)
GET ICON RESOURCE($alResNum{$vlElem};ag4DIcon{$vlElem};$vh4DResArquivo)
End for
Quando tiver executado este código, o array se verá desta forma quando é mostrado em um formulário:
A variável sistema OK toma o valor 1 se for encontrado os recursos, do contrário toma o valor 0 (zero).
Produto: 4D
Tema: Recursos
Número
517
Criado por: 4D v6
Manual de linguagem 4D ( 4D v12.4)
Manual de linguagem 4D ( 4D v11 SQL Release 6)
Manual de linguagem 4D ( 4D v14 R3)
Manual de linguagem 4D ( 4D v14 R2)
Manual de linguagem 4D ( 4D v13.5)
Manual de linguagem 4D ( 4D v14.3)
Manual de linguagem 4D ( 4D v14 R4)