Windev21 Aulas,Estudos e Desenvolvimento: 12/25/14

quinta-feira, 25 de dezembro de 2014

Android Primeiro programa

Android Primeiro programa

Meu Primeiro programa teste em android

entrar em criar novo projeto

Escolha Android Application

coloque o caminho sdk

escolha o aparelho

siga os proximos passos

quando abrir a tela para escolher
create a windows
windev mobile editor

escolha editor

VAmos criar primeira windows

fique em cima do windows,
botao direito, e new windows

Escolha tipo blank

coloque a vontade, botao,static,imagem

mande executar que vai aparecer o programa no celular

Agora crie outra janela

win_tecnico

e no botao da primeira tela
no botao direito do mouse
escolha prese action

escolha open a window e win_Tecnico

Pronto e funcionando

Android Instalando

Android Instalando

Baixar Android - http://developer.android.com/index.html

Instalando o Android Studio, ele ja instala o que precisa para androi, e se nao
tiver sido instalado java ele mostra link
que é esse atualmente

http://www.oracle.com/technetwork/java/javase/downloads/jdk7-downloads-1880260.html

android studio

http://developer.android.com/sdk/index.html

instalacao

C:\Android\Android Studio
C:\Android\sdk

\program files\java\jdk.1.7.0_71\

WebDev Tabela Excluir

WebDev Tabela Excluir

IF TableSelect(TABLE_Tecnico) = -1 THEN RETURN

HReadSeek(tecnico,tecnico.chave_empresa_tecnico,[gnEmpresaCodigo,TABLE_Tecnico.COL_Id_empresa_tecnico])
IF HFound(tecnico) THEN
    IF YesNo("Tem Certeza de que deseja excluir o Técnico?") THEN
        HDelete(tecnico)
        mostra_relacao_tecnico()
    END
END

WebDev Tabela Alteracao

WebDev Tabela Alteracao

Para alterar dados numa pagina

====================================================================
no botal Alterar colocar o seguinte

IF TableSelect(TABLE_Tecnico)=-1 THEN RETURN

HReadSeek(tecnico,tecnico.chave_empresa_tecnico,[gnEmpresaCodigo,TABLE_Tecnico.COL_Id_empresa_tecnico])
PageDisplay(PAGE_tecnico_cadastro)
mostra_relacao_tecnico()

====================================================================

dentro da pagina de alteracao colocar o seguinte

PAGE_tecnico_cadastro.EDT_Id_tecnico=tecnico.id_tecnico
PAGE_tecnico_cadastro.EDT_Nome=tecnico.nome

===============================================================

no botao salvar colocar o weguinte

//ler a informacao entrada
PageToFile()

IF tecnico..NewRecord = True THEN
    HAdd(tecnico)
ELSE
    //tecnico.nome=PAGE_tecnico_cadastro.EDT_Nome
    HModify(tecnico)
END

// volte para pagina
IF PreviousPage()<>"" THEN
    PageDisplay(PreviousPage)
ELSE
    PageDisplay(PAGE_relacao_tecnico)
END