Luiz Arruda (ICO)

PAULO, achei coloquei um SEEK na Func. e esta funcionando perfeitamente. muito obrigado de novo. ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

OLA PAULO. Agora esta retornando "SE.AST" em vez do nome do empregado ASSIM: Empregado: SE.AST ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

KAPIABA , Ficou deste jeito, mais nao esta retornando nada. verifique para mim se for possível. PS: ID 505 também esta no WS. que fiz p/ este propósito. Diga se é para ignora-lo, MUDEI O DBF P/ entrar direto no arquivo de cadastro. Local aGet[1] Select 1 Use PESSJAN INDEX CONTASX DEFINE DIALOG ODLG RESOURCE "LANCAMENTO" TITLE " LANCAMENTOS GENÉRICOS!" Redefine get odata var wdata ID 500 of odlg update redefine get ocont var wconta PICTURE "99.999" ID 501 OF ODLG UPDATE Redefine get onome var whistorico Picture '@!' ID 502 of odlg update REDEFINE get onomi var whistoric2 picture "@!" ID 503 OF ODLG UPDATE Redefine Get ovalor var wvalor ID 504 Picture '99,999.99' of odlg update REDEFINE GET AGET[1] VAR NCONTA PICTURE "99.999" ID 505 VALID(MOSTRA_CONTA(AGET)) WHEN(.F.) REDEFINE BUTTON ID 170 OF ODLG ACTION REGISTRAR(odlg) REDEFINE BUTTON ID 240 OF ODLG ACTION(ODLG:END()) ACTIVATE DIALOG ODLG CENTER **-----------------------------PROCURA CONTA STATIC FUNCTION MOSTRA_CONTA(AGET) SELECT 2 SEEK WCONTA NCONTA := NOME AGET[1]:REFRESH() RETURN (.T.) ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

ola. Tenho uma tela p/ lancamento em WS, gostaria de saber como faço p/ que logo depois que eu entrar com o numero da conta me voltasse o nome da mesma na frente do campo conta ou em outro lugar ja que em WS nao aceita @Say. Select 1 Use Diario DEFINE DIALOG ODLG RESOURCE "LANCAMENTO" TITLE " LANCAMENTOS GENÉRICOS!" Redefine get odata var wdata ID 500 of odlg update redefine get ocont var wconta PICTURE "99.999" ID 501 OF ODLG UPDATE Redefine get onome var whistorico Picture '@!' ID 502 of odlg update REDEFINE get onomi var whistoric2 picture "@!" ID 503 OF ODLG UPDATE Redefine Get ovalor var wvalor ID 504 Picture '99,999.99' of odlg update REDEFINE BUTTON ID 170 OF ODLG ACTION REGISTRAR(odlg) REDEFINE BUTTON ID 240 OF ODLG ACTION(ODLG:END()) ACTIVATE DIALOG ODLG CENTER ABRAÇOS... ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

VAGNER - Na mosca ficou JÓIA. brigadão ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

Bom dia Paulo. era só para dar um efeito diferente. qdo. o usuario fosse rolando no registros os dados do cadastro surgiam abaixo da janela, até a próxima. ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

IMPRESSIONANTE, todas as dicas deram certo. brigadu di novo cês sao de + Agora como que eu faço para que qdo. o registro recebe o foco(setas/mouse), na linha 26 por exemplo apareca o numero do CPF. eu preciso criar uma FUNC. ou tem outro jeito ? ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701 Editado por - ico on 08/06/2005 10:06:56

ola. Alguem pode dar uma examinada no codigo abaixo ?, FUNCTION SALDOS() local odlg, olbx USE \ADMP\CFB\PESSJAN DEFINE DIALOG ODLG FROM 06,01 TO 35,100 TITLE "SALDOS" @03,02 LISTBOX oLbx FIELDS PESSJAN->NOME, OEMTOANSI(PESSJAN->CONTA),; oemtoansi(pessjan->transporte), pessjan->debito, pessjan->credito, oemtoansi(pessjan->saldo); FIELDSIZES 65, 10, 15, 15,15,15; HEADERS " NOME ", "CONTA", "TRANSPORTE ","DEBITO","CREDITO","SALDO"; SIZE 304, 95; ON LEFT DBLCLICK SALDOS( oLbx, .F. ); OF oDlg ACTIVATE DIALOG ODLG center qdo. executo a dialog, esta aparecendo somente o NOME com sete caracteres e o resto todo fechado |T|D|C|S| qdo. abro a coluna a mesma está com caracteres extranhos ou em branco ja tentei de todo jeito até pelo WS mais nao consigo listar apenas os campos que eu quero. obrigado. ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

Marcio, obrigado ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

Ola. Como faço para que numa dialog mostre a versao do clipper e a do FiveWin como no ?version() do clipper ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

Ola. estou tentando compilar um programa no xharbour; estou seguindo exatamente como descrito no site projeto harbour hbmake -ex nome.bc hbmake -f nome.bc tudo corre bem so que nao cria o executavel, alguém sabe explicar ?? obrigado ICO - Corumba/MS iko67@ibest.com.br -> (67) 9244-0701

Ola. talves uma das solucoes seria criar um arquivo.bat excluindo variaveis de ambiente. isso funciona com o antigo foxBase abraços. ICO - Corumba/MS iko67@ibest.com.br Editado por - ico on 01/06/2005 08:59:42 Editado por - ico on 01/06/2005 11:21:00

Tudo Ok ! abraços ICO - Corumba/MS iko67@ibest.com.br

Ola. Postei um email para vendas FiveWin e ainda nao obtive respostas. ICO - Corumba/MS iko67@ibest.com.br

Bem, se são ou nao são a mesma pessoa, uma coisa e certa, ele(s) é (sao) muito(s) bom(ns) entende(m) muito de FiveWin e ajuda(m) bassssssstante neste forum. ICO - Corumba/MS iko67@ibest.com.br

Realmente este exemplo nao funciona no XP, mais outro dia peguei de alguem, compilei e funcionou, apaguei, agora quero colocar em um "SOBRE" e nao estou conseguindo. mesmo assim obrigado. tchau, vou para a avenida curtir o FAS- Festival America do SUl, que está sendo realizado aqui em Corumba, para esfriar um pouco a cuca. ICO - Corumba/MS iko67@ibest.com.br

Ola. desculpem o incomodo, outro dia vi que é possível colocar uma imagem no canto esquerdo de uma dialog, nao estou conseguindo achar o exemplo, alguem me ajuda ??. ICO - Corumba/MS iko67@ibest.com.br

Obrigado, abraços e até a próxima. ICO - Corumba/MS iko67@ibest.com.br

Ola. seria possível definir o tamanho de uma imagem.bmp, para que a mesma fique do tamanho que a gente quer na tela principal ??? exemplo; * @ 09,20 BITMAP oBmp FILENAME "\LIVRO\carros\carro8a.BMP" OF oVentPrinc ICO - Corumba/MS iko67@ibest.com.br

Ola Como que eu faço para que na tela principal do programa, alem da imagem.BMP apareça o nome da empresa selecionada ?? exemplo: NOME: Luiz Edson Arruda EMPRESA: Fazenda Agua Limpa será possivel tambem, definir o tamanho da barra de botoes até o meio da tela e estes dados da firma ao lado da barra ??? obrigado ICO - Corumba/MS iko67@ibest.com.br

Quer renomear c: ?? entre em meu computador, click (botao direito) em c:\ e entre com o novo nome. abraços ICO - Corumba/MS iko67@ibest.com.br

Ola. o exemplo que vc. me enviou por email, esta perfeito exatamente como eu queria. abraços e até a próxima ICO - Corumba/MS iko67@ibest.com.br

OLA. Enviei o DBF p/ seu email obrigadao de novo. ICO - Corumba/MS iko67@ibest.com.br

Boa Tarde infelizmente nao esta dando certo, as colunas aparecem e imprimem todas certinhas, só que sem os registros dentro. ICO - Corumba/MS iko67@ibest.com.br Editado por - ico on 20/05/2005 17:51:41

Ola. Marcelo obrigado por responder, olha seu exemplo funcionou, só que no preview e no papel aparece somente as colunas desenhadas, deixando de aparecer os lancamentos registrados no arquivo. mais uma vez obrigadão ICO Editado por - ico on 20/05/2005 09:13:29