Páginas filhas
  • LoadBitmap - Nome da imagem do repositório

Função: LoadBitmap - Nome da imagem do repositório

A função LoadBitmap() carrega o nome da imagem do repositório no objeto.Utilizado normalmente para exibir imagens em objetos do tipo lista.

LoadBitmap - Nome da imagem do repositório ( [ uParam1], [ cNome] ) --> oObjeto

NomeTipoDescriçãoObrigatórioReferência
uParam1NuloCompatibilidade. Parâmetro nulo.
cNomeCaracterNome da imagem no repositório.
    oObjeto(objeto)
  • Retorna o objeto carregado com o nome da imagem.

A utilização do comando GetResources()  dado no exemplo abaixo, este não realiza nenhuma ação, somente retorna nil:

LoadBitmap( GetResources(), "LBOK" )

 

User Function LoadBMP()Local oOK := LoadBitmap( nil, "LBOK" )  Local oNO := LoadBitmap( nil, "LBNO" )  Local oList Local aField := {}Private aBotoes := {}DEFINE MSDIALOG oDlgTeste FROM 00,00 TO 179,350 TITLE "TESTE" MsgAlert(oOK:cName) // exibe o nome da imagemaadd(aField,{.T.,"CAMPO1"})@ 010, 010 LISTBOX oList FIELDS HEADER "","Campo" PIXEL OF oDlgTeste oList:SetArray(aField)oList:bLine := {|| {If(aField[oList:nAt][1],oOK,oNO),aField[oList:nAt][2]}}oList:bLDblClick := {|| aField[oList:nAt][1] := !aField[oList:nAt][1], oList:Refresh() }ACTIVATE MSDIALOG oDlgTeste ON INIT EnchoiceBar(oDlgTeste,{||nOpcao:=1,oDlgTeste:End()},{||oDlgTeste:End()},,aBotoes )                   Return ""
Protheus 10

  • Sem rótulos