Luiz Arruda (ICO)

Pessoal Como faço para excluir uma resposta duplicada neste novo forum ?? até ja virei o micro de cabeça pra baixo pra ver se ele cai mais não adiantou ...

Boa tarde... veja se ajuda um pouco http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=11186 abraços..

.

Acho que não vai ter jeito mesmo, vou o que eu não queria, disparar para uma function mesmo da maneira que o Erciley postou, no lugar das MsgInfo() teno que ir para uma function, e é exactamente isso que eu não queria, minha vontade era executar o delete no click algo assim ; DEFINE MSGITEM ABABA OF oWnd:oMsgBar PROMPT " Dados" ; SIZE 150 BITMAP "..\lembre\question.bmp" ; ACTION If MsgYesNo("Deseja excluir os dados ?", "..::Dados")) ; Acesso->dbdelete(),.t., ; ToolTip "Dados" Center Mas isso nem passa na compilação Obrigado a quem respondeu...

Não é isso baby .. eu quero simular If MsgYesNo() no Action sem disparar para uma Function Tipo assim ; If MsgYesNo("Deseja Sair") Quit Endif So que executando direto no Action, do mesmo jeito que abre o sim,não DEFINE MSGITEM oRow OF oWnd:oMsgBar ; PROMPT "Acesso &Acc" SIZE 160 ; ACTION (Listagem(MsgYesNo("Data e Hora em que o Computador foi ligado"+CRLF+CRLF+"Limpar dados ?","..::Dados"))) .. será que é possivel ?

Bom dia Pessoal Como faço uma condição If ser disparada no exemplo abaixo DEFINE MSGITEM oRow OF oWnd:oMsgBar ; PROMPT "Acesso &Acc" SIZE 160 ; ACTION (Listagem(MsgYesNo("Data e Hora em que o Computador foi ligado"+CRLF+CRLF+"Limpar dados ?","..::Dados"))) tentei com IIF mas sem sucesso!! Obrigado...

Desculpe.. mais qual a finalidade disso ??? .. Abraços..

è preciso viver o sonho e certeza que tudo vai mudar..Feliz ano novo a Todos... Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Boa tarde.. tb. nao entendi mas vai uma dica.. tente alterar o Size do controle .. Abraços Feliz ano Novo...id=size4>id=blue> Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Boa Tarde .. Não entendi, o que seira o "Focar" na dialog ? Eu sempre usei e uso dialog dentro da window, e semnpre que aciono a dialog o cursor já cai dentro dos controles... seria isso ?? Abraços Feliz Ano novo .. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Essa noticia ai mudar o mundo... Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Bom dia .. O que está pegando ??, vc já conseguiu fazer alguma coisa usando FiveWin ? Caso nao tenha conseguido fazer nada, me manda seu MSN e a hora que posso te chamar que em poucos minutos vc estará fazendo alguma coisa... PS: devido a correria de fim de ano, posso demorar uns 4 a 5 dias pra responder.. Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Bom dia .. Tente disparar o timer no On Init da Dialog.. Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Bom dia .. Não entendi. na minha pasta da SQLLIB tem a LIB sqllib_xHB_v1.2.1id=red>_Rev.6406.LIB datada de 13/05/2009, inclusive eu andei fazendo uns testes e cheguei a gerar um sisteminha de controle de garantias de baterias sem problemas com essas ferramentas + xDev, pena que o pen que estava foi pro pau e nem tenho como re-gerar para testar novamente ... e nunca na vida eu recompilei e nem tive interesse em recompilar as LIBs do FWH. Interessante vcs não estarem conseguindo.. Abraços e Feliz Natal. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04id=size3>id=red> xHarbour PellesC Bcc. Editado por - ico on 24/12/2012 09:50:52

Pô Kapiaba.. até eu já uso o PellesC a muito tempo e vc nada ?? Nunca precisei refazer nada. só converti os arquivos RC ou DLL do WS para o RES e depois foi só abrir no PellesC, facim facim Não desista.. se eu consegui você consegue .. MAURICIO /id=blue> MARCIANOid=red> pelo WS abra seus arquivos e salve como RES, depois abra normalmente pelo PellesC. Não tem falhas nos arquivos RES, mas se converter para RC vai dar alguns erros sim, mas mesmo assim são faceis de altera-los pelo seu editor de texto. Mas aconselho a ir dereto para o RES. Mauricio, você já tem alguma coisa em WS ?? se não tem vai logo para o PellesC.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 10/12/2012 16:32:27

TRAGÉDIA MINEIRAid=size4> O Mineiro trabalha num frigorífico há muitos anos. Certo dia, confessa à esposa que tem uma compulsão terrível: uma vontade louca de enfiar o pinto na cortadeira de salame. A esposa sugere -vá ver um psicólogo: "esses homi que acunseia a gente." Mas ele não foi, e um dia ele chega em casa cabisbaixo. Sua mulher percebe que há algo errado e pergunta: - O que foi homi? - Lembra que eu comentei cocê que tava com uma vontade danada de meter o pinto na cortadeira de salame? - Ah não! , ocê num feiz isso, feiz ? - Diz a mulher - Sim, eu fiz! - Meu Deus! O quê se assucedeu? - Fui despedido,fuiu pru oio da rua e agora tô disimpregado - Mas... E a cortadeira de salame ? - Coitadinha da moça, foi despedida também... id=code>id=code>Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

O Install Creator é muuuuuuuuuuuuuuuito mais fácil. simples pra chuchu.. qualquer guri consegue usar sem problemas. pra vc ter uma idéia até meus trabalhos que levo pra casa eu faço um instalador da pasta e mando pro pen. Em casa é só meter o pen no buraco (do micro) e executar o instalador Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Ou Define Brush oBrush File("SuaImagem.bmp") Define Dialog oDlg Resource "#1065" Title cTitle ; Icon oIco PIXEL Brush oBrush TRANSPARENT id=code>id=code> Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 06/11/2012 15:50:54

Marido e mulher estão tomando cerveja num barzinho. Ele vira pra ela e diz: - Você está vendo aquela mulher lá no balcão, tomando whisky sozinha? Pois eu me separei dela faz sete anos! Depois disso ela nunca mais parou de beber. A mulher responde: - Não diga bobagens. Ninguém consegue comemorar durante tanto tempo assim! ---------------------------------------- No concerto de um grande pianista no Teatro Municipal, um homem que não entendia porra nem uma de música clássica pergunta ao vizinho: — O senhor conhece música? — Mais ou menos — responde o outro, meio sem jeito. — O que ele está tocando? Nessa hora, o homem dá um sorriso confiante estufa o peito e responde com firmeza e ar de inteligência: — Piano... id=code>id=code>Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Gostei dos exemplos... lindo, um must.. Só falta eu achar os #includes.CH para eu tentar implementar Assim que eu consrguir acha-los eu volto e reporto o resultado.. #harupdf.ch Abraços Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 24/10/2012 11:47:14

Bom dia desculpe ai.. esqueci uma parte FUNCTION xSTRU(PPCAMPO,aESTRUCT) FOR S = 1 TO LEN(aESTRUCT) IF aESTRUCT[s,1] == PPCAMPO RETURN(.T.) ENDIF NEXT RETURN(.F.) id=code>id=code>Isto aqui vai renomear o nnnnn.dbf para FAZ.DBF com os dados existente dentroid=red> id=code>id=code>a Transferencia para a nova nnnnnn.dbf vai ser pelo append From como mostrado acima.. Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 Editado por - ico on 24/10/2012 11:29:14

Surpresa com o que viu, a visita pergunta ao dono da mansão: — Mas por quê o senhor guarda este par de tênis enorme nesta caixa de cristal ? — Bem, você sabe que eu fiquei rico porque numa das minhas muitas viagens ao Oriente Médio eu encontrei um gênio que me concedeu três desejos. O problema é que o fdp era meio surdo e me deu saúde, dinheiroid=blue> e esse TÊNISid=blue> enorme ai… id=code>id=code>Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 19/10/2012 15:40:10

Boa Tarde.. Renomeia o arquivo antigo, crie outro igual com as alterações e dá um append do renomeado Select nnnnnid=red> xVerStru := DBSTRUCT() If .Not. xStru("NIRF",xVerStru) MsgiNFO("A tebela nnnnn Será Alterada","..::Tabelas - NIRF") fRename("&oxCampo\nnnnn.dbfid=red>", "&oxCampo\FAZ.DBFid=blue>" ) Faestru:={} Aadd(Faestru, {"NIRF", "C", 014,000 }) DbCreate("\pasta\empresas\∝\&wano\nnnnn.DBFid=red>", faestru) Use nnnnnid=red> exclusive Append from \pasta\empresas\∝\&wano\Fazid=blue> ENDIF id=code>id=code>PS: o &eoxCampo que usei é meu Path Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 19/10/2012 15:07:12

Ainda no aguardo... ZZZZZZZZZZZZZZzzz zzz Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.