Histórico da Página
...
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#include "TOTVS.CH" user function exemplo() DEFINE DIALOG oDlg TITLE "Exemplo TBitmap" FROM 180,180 TO 550,700 PIXEL // Usando o New oTBitmap1 := TBitmap():New(01,01,260,184,,"C:\garbageTemp\TOTVS.PNG",.T.,oDlg,; {||Alert("Clique em TBitmap1")},,.F.,.F.,,,.F.,,.T.,,.F.) oTBitmap1:lAutoSize := .T. // Usando o Create oTBitmap2 := TBitmap():Create(oDlg,01,146,260,184,,"C:\garbageTemp\TOTVS.PNG",.T.,; {||Alert("Clique em TBitmap1")},,.F.,.F.,,,.F.,,.T.,,.F.) oTBitmap2:lAutoSize := .T. ACTIVATE DIALOG oDlg CENTERED Return |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas