PC Toledo

grande quintas;
Não sei se wvt_DrawImage() tem parâmetro pra resource, senão vai procurar o arquivo "AppImagem1" no disco.
as vezes a resposta esta na nossa cara e não conseguimos ver;

ainda sem sucesso, mas agora estou fazendo testes assim:

no .rc
101 BITMAP "Imagem1.bmp"

no executável ...

colegas, bom dia;

por gentileza, vocês poderiam me orientar;

estou tentando jogar para dentro do executável uma imagem (para que o usuário não possa modifica-la), para depois exibi-la;
na compilação e execução não apresenta erro, mas a imagem não aparece;

no arquivo .rc:
AppImagem1 BITMAP ...

bom dia rochinha;
agradeço suas sugestões;
meu intuito na publicação foi de tornar publico para a comunidade que existe uma incompatibilidade no letodb;
o problema eu contornei retirando o dbf antes de executar ordSetFilter;


cfilter:= "dbf->campo = dado"
cfilter:= AtRepl( dbf() + "->", cfilter ...

pessoal, creio que esbarrei em um possível bug do letodb;
a função dbSetFilter() falha utilizando o letodb quando declaramos o nome do banco de dados no bloco de codigo;
não apresenta erro utilizando o somente o harbour ou o netio;



cfilter:= "dbf->campo = dado"
dbSetFilter( &("{|| " + cfilter ...

fui dar uma olhada no puxadinho e encontrei varias delas guardadas, tinha até me esquecido delas...

senhores bom dia;

asimões, agradeço sua pronta resposta;

quintas, brinco de programação desde que eu tinha um msx, lá pela década de 80, hoje aposentado, faço uns programinhas para os amigos, pois amigos não se encontra nas esquinas, com citava uma velha canção;

compilar em 64bits é a necessidade ...

asimões;
como ficou a compilação em 64bits, você conseguiu gerar as libs?
utilizei a versão 2.20, gerei as libs, mas ao executar o programa com estas libs aparece a mensagem de aplicativo não reconhecido.

bom dia colegas;
instalei a nova versão do mingw 32/64 bits e não estou conseguindo compilar o harbour em 32 bits, por default o sistema compila em 64 bits;
no arquivo readme do mingw existe a indicação de utilizar -m32 ou -m64 mas não estou conseguindo aplicar esta diretriz;
algum colega pode em ...

Marcos, agradeço sua colaboração;
alterei os fontes seguindo sua orientação e consegui o resultado esperado;


exemplo modificado
********************************
Static Function SysEntra( cTitleWin )

local oMsg, oSay01, oSay02, oSay03, cMsg01, cMsg02, lRet

oMsg = JanelaMsg( cTitleWin ...

pessoal, bom dia;

modifiquei o exemplo da postagem anterior, conseguindo alguns resultados;
o que ainda não consegui resolver é que quando apresenta na janela o "Ok", o "Ok" anterior é apagado;

exemplo modificado

********************************
Static Function SysEntra( cTitleWin )

local ...

pessoal bom dia;
como faço para criar uma janela que apresente o nome de alguns processos e após apresente o resultado dos processos e ao final fechar esta janela;

estou partindo do exemplo abaixo:
INIT DIALOG oDlg TITLE cTitleWin AT 20,20 SIZE 350,170 FONT HFont():Add( "Georgia",0,-15,,204 ...

quanto ao problema inicial deste post ou seja a visualização do arquivo ao modificar um registro utilizando a função BROWSE(), entendo que encontrei o problema;

como por segurança, a modificação do arquivo é feita sobre um arquivo copia do original, acrescentei depois da cópia a função HB_FCOMMIT ...

toledo,
entendi perfeitamente a sua reserva de privacidade e você me convenceu a respeito da conexão pelo endereço;

toledo,
baixei sua postagem, executei seu aplicativo teste e deixei meu nome registrado, perfeito;
agradeço sua pronta atenção;

mas também compilei seu demoletodb.prg e não obtive conexão?

janio,
agradeço sua atenção;
aparentemente o amigo jaime acertou, ou seja a utilização do comando dbCommit() após a criação do banco de dados e do arquivo de index;
no teste.prg, que reproduzo novamente abaixo, com algumas alterações, sem esta função, a atualização não é automática e com ela o ...