Browse Compilado

[m@r<3|o]

Pessoal compilado um PRG
nao tem como visualizar os Brows . como em execucao

preciso informar algum set
ou é uma sintase maior nao é somente brow compilado um EXE de PRG

[Tales Ruan]

Não entendi.

[m@r<3|o]

criar um exe ....... 1 prg somente ..... comandos brow nao funciona compialdo no exe
ou falta algum set .... eait clear mostrar ... mais brow nao

preciso mostrar , uma lista das operacoes conforme se realizam

[alceu11]

CODIGO da mensagem sera que funciona no help 9 tem mais exemplo on key label mensagem
****************

Código:


close database all
SET SAFETY OFF
create table Voeste(codigo n(6), nomes c(30))
select Voeste

insert into voeste (codigo,nomes) values (1,'abobora')
insert into voeste (codigo,nomes) values (2,'PEPINO')
insert into voeste (codigo,nomes) values (3,'MANDIOCA')
ON KEY LABEL F2  EDITAR()
on key label F4  excluir()

*para sair do browse e de pois carregar uma variavel 
ON KEY LABEL ENTER KEYBOARD '{CTRL+W}'

BROWSE NORMAL NODELETE  TITLE 'F2 EDITAR O REGISTRO <Esc>Sair ENTER SELECIONA'
WAIT WINDO 'VC SELECIONOU NO VOESTE? '+ VOESTE.NOMES TIME 2
suavariavel=VOESTE.nomes
**aqui eu terminei o browse e sai
on key label ENTER

PROCEDURE EDITAR()
wait window 'vc esta entrando na exclusao' time 1
SELECT VOESTE
EDIT
BROWSE NORMAL NODELETE  TITLE 'F2 EDITAR O REGISTRO <Esc>Sair'
ENDPROC

procedure excluir()
Selec voeste
wait window 'vc esta entrando na exclusao' time 1
if 6=messagebox('deseja excluir',4+32, 'Pergunta'
delete in voeste
BROWSE NORMAL NODELETE  TITLE 'F2 EDITAR O REGISTRO <Esc>Sair'
endif
endproc


[m@r<3|o]

ola alceu testei e nao mostro nada tb !

voce consegue fazer um exe .... so com esse codigo ou com outro PRG ?

nao sei ql comando encaixa ... ta funcionando assim

1 wait clear escreve por cima ... das demais telas do XP
os outros vao para tras da tela e termina num mensagem box

tenti com o progress bar adaptar e nao consigui tb pelo mesmo motivo de nao consiguir trazer esse obejto pra tela ....

preciso fazer um form objct , para mostrar BROW e Prosgbar ?

estou precisando de um comando que faz um display no visual .....
resumindo , estou executando o processo

sem centralizacao de declar algum obejto ou algu que simule que meu programa ta pra frente qdo ta sendo executado ....


inicia.PRG

Código:

_screen.WindowState = 2
do C:\caminho\hparac
READ EVENTS


[alceu11]

Link
Clique aqui para baixar o arquivo!



So vai funcionar se fizer 1 formulario !!
c/grid aki no forum tem backup q mostra o progresso

O bROWSE SEMPRE SERA SCREEN
Clique aqui para baixar o arquivo!

[Tales Ruan]

Não entendi bem qual o problema.

No VFP 9, criei um projeto, adicionei um prg principal.

Neste Prg escrevi estas linhas:

Código:

USE ?
BROWSE

Pra abrir uma tabela e exibi-la. Funcionou bem. Pelo menos pra mim

[m@r<3|o]

hahaha , voce clicou em RUN
ai comigo tambem funciona

agora compile no builder opcao exe

[Tales Ruan]

Compilei e gerei o exe.
Funcionou

Tente fazer na sua máquina. Se não funcionar te mando o meu projeto de teste.

[m@r<3|o]

entao manda ja tentei de tudo

[Tales Ruan]

Segue o link:

[Você precisa estar registrado e conectado para ver este link.]

[m@r<3|o]

ola nao consigo puxar
se possivel envie para [Você precisa estar registrado e conectado para ver este link.]
Obrigado a atencao , estou no aguardo ...
Abraço

[Tales Ruan]

Enviado.

[m@r<3|o]

tales se voce se refere a fazer isso

Código:

CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'data\testdata')
USE customer  && Open customer table
BROWSE;
  TITLE 'My Browse Window' ;
  FIELDS phone :H = 'Phone Number' , ;
  company :H = 'Company:'

tambem nao aparece tales
o codigo funciona só que nao da o retorno na tela mostrando o brow na tela

acho que falta algum set principal ....
Como colocar um Brow por dentro do exe ... ? sem chamar Objetos só no PRG

[Tales Ruan]

Marcelo, o projeto que eu te mandei não funcionou?