Ios

Ios

O que Adriano boller Postou No Grupo

Olá,

De 1 de Fevereiro de 2015, a empresa Apple iOS requer que todos os aplicativos devem ser compilados em 32 bits e 64 bits:
https: //developer.apple.com/news / ...

Sobre WINDEV Móvel, versão 20 é necessária para compilar uma versão do aplicativo iOS 64-bit.
A partir de 2015/01/02, aplicações compiladas com versões mais antigas do WINDEV Celular deixará de ser transmitido na App Store.

Para você, o que isso faz?

- Você tem WinDev Móvel 20:
Basta recompilar seus aplicativos iOS com WINDEV Móvel 20, a fim de fornecer 32-bit de 64 bits e de seus aplicativos iOS e para continuar a disseminar a App Store após a 2015/02/01. Na verdade modo de 64 bits geração iOS é um novo recurso na versão 20 do WINDEV Mobile.

- Você tem uma versão mais antiga do WINDEV móvel:
Neste caso, entre em contato com nossa equipe de vendas rapidamente para atualizar sua versão 20 (Telefone: 04.67.032.032 / Mail: info@pcsoft.fr).
Você apenas tem que recompilar seus aplicativos iOS com WINDEV Móvel 20 a transmiti-los novamente na App Store.

Cumprimentos,

PC SOFT.

Download de Arquivos via Mobile

Download de Arquivos via Mobile

http://forum.pcsoft.fr/fr-FR/pcsoft.us.windevmobile/1097-example-download-files-via-mobile-webdev-windev-download-1098/read.awp


Uma contribuição de Adriano Boller e Marcos Roberto Carvalho

adrianoboller #1

Membre enregistré 695 messages Posté le 17 janvier 2015 - 15:12 //HTM_Download..URL="http://www.7-zip.org/a/7z920.exe" OK is boolean = HTTPRequest("http://www.7-zip.org/a/7z920.exe") IF OK = True THEN Arquivo is Buffer = HTTPGetResult(httpResult) IF InSimulatorMode() = True OK = fSaveBuffer("c:\download\7z920.exe",Arquivo) ELSE OK = fSaveBuffer("/mnt/sdcard/7z920.exe",Arquivo) END IF OK = True THEN IF InSimulatorMode() = True OK = fFileExist("c:\download\7z920.exe") ELSE OK = fFileExist("/mnt/sdcard/7z920.exe") END IF OK = True THEN Info("Download do arquivo 7z920.exe com sucesso!") ELSE Error("Nao foi possivel encontrar o arquivo do 7z920.exe. "+ErrorInfo(errMessage)) END ELSE Error("Nao foi possivel efetuar o download do 7z920.exe. "+ErrorInfo(errMessage)) END ELSE Error("URL nao encontrado para download do 7z920.exe. "+ErrorInfo(errMessage)) END

Windev Fechar / Close

Windev Fechar / Close

Windev/WindevMobile/WebDev Personalizar Janelas

Windev/WindevMobile/WebDev Personalizar Janelas

Windev Mobile Mudar Configurações

Windev Mobile Mudar Configurações

Windev Mobile Ve se é Emulador/Telefone

Windev Mobile Ve se é Emulador/Telefone


IF InAndroidSimulatorMode() = True THEN
    Info("MODO SIMULADOR")
ELSE
    Info("MODO TELEFONE")
END

Windev Mobile,Levar banco Computador p/aparelho

Windev Mobile,Levar banco Computador p/aparelho

Android Lendo Dados a Partir Servidor Externo

Android Lendo Dados a Partir Servidor Externo

Dica Pega em - http://www.windevbrasil.com.br/index.php/topic,1042.msg2372.html#msg2372

SQLite Lento Inclusão

SQLite Lento Inclusão

Dica Extraida Forum Brasil http://www.windevbrasil.com.br/index.php/topic,1279.msg3832.html#msg3832

Estruturas Tema Paletra Pedrosao

Estruturas Tema Paletra Pedrosao

De Pedrosao

http://189.113.6.131/ww_forum

Conforme havia prometido, estou disponibilizando os fontes do aplicativo sobre estruturas, tema da minha palestra do Segundo Encontro de Desenvolvedores Windev em São Paulo.
 https://www.dropbox.com/s/v8xx3gghk20yckn/palestra.zip?dl=0

 

Windev Array Ocorrencias

Windev Array

http://doc.windev.com/en-US/?2510097&name=Occurrence_P

Windev Utilitario Para Conversao de Dados

Windev Utilitario Para Conversao de Dados


http://189.113.6.131/ww_forum

https://www.dropbox.com/s/bzjs33vg5fqp4gx/conversor.zip?dl=0

Windev Internet Abrir Navegador

Windev Internet Abrir Navegador

Segue exemplo:

bStarted is boolean
sParameters is string = "http://www.arsistemas.com.br"
bStarted = ExeRun("""C:\Program Files\Internet Explorer\iexplore.exe"" " + sParameters, exeActive, exeDontWait, "C:\Program Files\Internet Explorer\")

IF ErrorOccurred THEN
    Error()
END
--------------------

Windev Estruturas

Windev Estruturas

stFILE is structure as FILENAMEprodutos

// Cria uma estrutura igual a analyse 

MyFileRecord is Record of MyAnalysisFile

// use as funções hreadxxx... para localizar record no arquivo original

//pra preehcer as estruturas com os nomes dos campos

MyfileRecord = MyAnalysisFile

MyfileRecord = MyAnalysisFile

//depois é só fazer a atribuição

algumacoisa = MyFileRecord.nomedocampo 

Windev Pdf para Texto

Windev Pdf para Texto

//Procedimento para Extrair texto de arquivos PDF com Windev

tmpArq is string

tmpArq = fImageSelect(EdtArqPdf,"","Selecione PDF...","PDFs"+TAB+"*.PDF")

IF tmpArq<>"" THEN

       EdtArqPdf = tmpArq  // mostra o nome do arquivo na tela

       ImgPDF = tmpArq            // mostra o PDF na tela

       StaTextoDoPDF =  PDFToText(tmpArq,"1") // extrai texto pg 1

END

 

 

Windev Data e Hora

Windev Data e Hora

Posix (Unix Timestamp) corresponde ao número de segundos após 01/01/1970.

 // Summary: Converte Data/Hora para Tempo Unix (Posix) = nro. de sgundos após 01/01/1970 

 // Syntax:

 //[ <Result> = ] ConvDtHo2UnixTime (<pDtHo> is datetime)

 //

 // Parameters:

 // pDtHo (datetime): data e hora a converter

 // Return Value:

 // duration: // data Posix (timestamp Unix)

 //

 // For instance:

 // tmpUnix is duration = ConvDtHo2UnixTime(tmpdtho)

 // TempoUnix = tmpUnix..InSeconds

 //

 PROCEDURE ConvDtHo2UnixTime(pDtHo is DateTime)

 tmpDtHo is DateTime = pDtHo

 tmpDtHo..Millisecond = 0

 // calcula a diferença de tempo entre 01/01/1970 e a data fornecida

 tmpDif is TO string = DateTimeDifference("19700101000000",tmpDtHo)

 // calcula a data Posix

 tmpUnix is Duration = StringToDuration(tmpDif,durationCenti)

 tmpUnix..Millisecond = 0

 RESULT tmpUnix

// Summary: Converte Tempo Unix (Posix = nro. de sgundos após 01/01/1970) para Data/Hora

 // Syntax:

 //[ <Result> = ] ConvUnixTime2DtHo (<pUnixTime> is numeric)

 //

 // Parameters:

 // pUnixTime (numeric): data Posix (timestamp Unix)

 // Return Value:

 // datetime: // data e hora

 //

 // For instance:

 // tmpUnix is numeric = TempoUnix

 // tmpDtHo is datetime = ConvUnixTime2DtHo(tmpUnix)

 //

 PROCEDURE ConvUnixTime2DtHo(pUnixTime is numeric)

 tmpMaxInt4b is int on 4 bytes = 2147483647

 tmpSegundos is int on 8 bytes

 tmpUnix is Duration

 IF pUnixTime <= tmpMaxInt4b THEN

 tmpUnix..Second = pUnixTime

 ELSE // para suportar datas após 19/01/2038 e Posix > 2147483647 (valor máximo em 4 bytes)

 tmpSegundos = pUnixTime

 LOOP

 tmpUnix..Second += tmpMaxInt4b

 tmpSegundos -= tmpMaxInt4b

 IF tmpSegundos < tmpMaxInt4b THEN

 tmpUnix..Second += tmpSegundos

 BREAK

 END

 END

 END

 tmpDtHo is DateTime = "19700101000000"

 tmpDtHo += tmpUnix

 RESULT tmpDtHo

Fonte: LIFETECH