Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Função: Capital - String - Maiúsculo/Minúsculo
Descrição:
Programa Fonte: MSLIB.PRW Sintaxe: Capital - String - Maiúsculo/Minúsculo ( cString ) --> cReturn Retorno:
Exemplos #include "protheus.ch"User Function TestCapital()Local oDlgLocal oGet Local cGet := Space(50)Local oSay1 Local cCapitalDEFINE MSDIALOG oDlg TITLE "Teste Capital" From 000,0 TO 100,300 PIXEL@ 12, 05 SAY oSay1 VAR "Texto: " OF oDlg PIXEL @ 12,30 GET oGet VAR cGet OF oDlg SIZE 100,009 PIXEL @ 25, 30 BUTTON "Capital" PIXEL SIZE 40,12 OF oDlg ACTION (If(!Empty(AllTrim(cGet)), (cCapital := Capital(AllTrim(cGet)), ApMsgInfo(cCapital)), ))@ 25, 80 BUTTON "Fechar" PIXEL SIZE 40,12 OF oDlg ACTION oDlg:End()ACTIVATE MSDIALOG oDlg CENTEREDReturn Parâmetros:
|