jufer

Meu caro Ladinilson, Eu também uso xDevStudio v0.72 BlackEdition, simplesmente ele crachou mas consegui reinstalar e agora está funcionando bem. Também uso Pells C (9.00.9) Fastreport ainda não experimentei. Já agora o que é que ele faz? Fiz a pergunta sobre o FIVEDIT porque não consigo trabalhar com ele porque penso que deve ser porque não estou a configurar correctamente. O FIVEDIT faz-me lembrar um editor VERCE que eu usei há muitos anos. Abraços

Bom dia, Baixei o FIVEDIT e não consigo trabalhar porque deve-me faltar qualquer elemento que não consigo verificar. Fiz as configurações todas (penso que correctamente) mas quando quero compilar surge a mensagem de erro que "ficheiro "AGENDA" não localizado. Quando baixei o FIVEDIT não encontrei as instruções. Será que não há? Alguém me poderá ajudar? Abraços JuFer

Sim, seria desse tipo. Ignoro de quem seja. Peço desculpas por não ter respondido tão rápido quanto desejava mas estive ausente e sem computador. Abraços

Estive a testar o PRG que anexo e detectei um erro quando faço um "check" no Browse. Como não tenho conhecimentos suficientes para ultrapassar a situação peço uma ajuda a algum amigo que queira ajudar-me. Antecipadamente agradeço JuFer (Portugal) //************************************************************************************************************** #Include "FiveWin.Ch" Func Main() Set Date Brit Set Cent On Set 3DLook On aHBitMaps := { LoadBitmap( GetResources(), "Check0" ), ; // BitMaps de 14 x 32 LoadBitmap( GetResources(), "Check1" ) } Define Dialog oDlg From 0,0 To 200,200 Pixel aArqLo := { {.F.,.T.,.F.,.F.,"Estou Aqui 1"},; {.T.,.F.,.F.,.F.,"Estou Aqui 2"},; {.F.,.F.,.T.,.F.,"Estou Aqui 3"},; {.F.,.F.,.F.,.T.,"Estou Aqui 4"} } bVars := {||{" "," "}} aCabe := {"1","2","3","4","Teste"} aColu := {20,20,20,20,150} oLoca := TWBrowse():New(001,003,090,095, bVars,aCabe,aColu,oDlg, , , , , , , , , , , , , ,.T.) oLoca:lMChange := .F. oLoca:Set3dStyle() oLoca:SetArray(aArqLo) oLoca:bLDblClick := { | nRow, nCol | Teste1(nRow,nCol) } oLoca:nAt := 1 oLoca:bLine := { || { aHBitmaps[Iif(aArqLo[oLoca:nAt][1],2,1)],aHBitmaps[Iif(aArqLo[oLoca:nAt][2],2,1)],aHBitmaps[Iif(aArqLo[oLoca:nAt][3],2,1)],aHBitmaps[Iif(aArqLo[oLoca:nAt][4],2,1)],aArqLo[oLoca:nAt][5] } } oLoca:Set3dStyle() oLoca:lMChange := .F. oLoca:bGoTop := { || oLoca:nAt := 1 } oLoca:bGoBottom := { || oLoca:nAt := Eval( oLoca:bLogicLen ) } oLoca:bSkip := { | nWant, nOld | nOld := oLoca:nAt, oLoca:nAt += nWant,; oLoca:nAt := Max( 1, Min( oLoca:nAt, Eval( oLoca:bLogicLen ) ) ),; oLoca:nAt - nOld } oLoca:bLogicLen := { || Len( aArqLo ) } oLoca:cAlias := "Array" // Just put something Activate Dialog oDlg Center Retu Static Func Teste1(nRow,nCol) Local nClickRow := nWRow( oDlg:hWnd, oDlg:hDC, nRow, 0 ) Local nClickCol If nClickRow == oLoca:nRowPos nClickCol = oLoca:nAtCol( nCol ) Endif For nX := 1 To 4 aArqLo[nClickRow][nX] := .F. Next aArqLo[nClickRow][nClickCol] := .T. oLoca:DrawSelect() Retu("") //*****************************************************************************

Meu caro amigo João Santos, Agradeço a sua tão rápida mensagem que veio em meu auxílio. O problema subsiste e penso que deve ser por falta do arquivo strmiids.lib e estive a ver o forum e constatei que o problema só deve ficar resolvido quando adquirir a versão FWH20.04. Um abraço Júlio Fernandes

Boa noite amigo Silva, Copiei sua programação e inclui no meu projecto mas tive que abandonar porque faltam algumas funções. No entanto tenho um programa do César E. Lozada, da Venezuela, que estava funcionando muito bem até eu ter comprado um novo computador. Não sei porque razão vejo o sinal de luz que a camera está funcionando mas na tela não aparece a imagem. Encontrei no forum uma informação para fazer as seguintes alterações no ficheiro C:\FWH\samples\build64.bat: - cl -TC -W3 -O2 -c -I%hdir%\include %1.c para cl -TP -W3 -O2 -c -I%hdir%\include %1.c e acrescentar echo strmiids.lib >> msvc.tmp só que não tenho a LIB strmiids.lib será que é por falta do ficheiro strmiids.lib que a camera não aparece na tela? Se assim for vc pode-me ceder aquele ficheiro? Abraços Júlio Fernandes (Portugal)

Faz tempo que eu não navegava neste fórum e hoje calhou ver a notícia do falecimento do meu amigo Luis Carlos Nogueira. Quando estive no Brasil em Fevereiro de 2005 o acaso não quis que me encontrasse com ele pois tinhamos marcado um encontro, se não me engano em Mogi Mirim, cidade onde vivia. Ele foi uma pessoa que me ajudou muito quando me iniciei no Fivewin for xHarbour, Falávamos via Skype e ele resolvia os meus erros informáticos e ensinou-me muito. O Luis Carlos NOgueira foi-me apresentado por um outro meu grande amigo o Luis Augusto Martins (gunafe) ambos foram muito especiais na minha iniciação no FW. Bem haja por isso. Apesar de não o ter conhecido pessoalmente posso dizer, sem dúvida alguma, que ele era uma pessoa que qualquer ser humano gostaria de o ter como amigo. Sinto-me bafejado pela sorte em ter sido ajudado por ele. Muito obrigado. Que descanse em paz, até à eternidade, meu amigo. Júlio Fernandes (jufer) - Portugal

Muito obrigado. Extraordinária ajuda. O que faltava era realmente o ficheiro adsloc32.dll na directoria \WINDOWS\SISTEM64. RESOLVIDO. Abraços

Contforme disse em outro tópico comprei um computador novo que me está a dar diversos problemas quando quero compilar e\ou executar projectos antigos que funcionavam muito bem no computador velho. Agora, quando executo o meu projecto não consegue aceder a um ficheiro que existe em determinada página. O ERRO que aparece é o seguinte: Application =========== Path and name: C:\P_FWHB\CONDOM\xDex\CONDOM.EXE (32 bits) Size: 12,661,760 bytes Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20141106) FiveWin Version: FWHX 14.12 Windows version: 6.2, Build 9200 Time from start: 0 hours 0 mins 0 secs Error occurred at: 24/05/2019, 14:18:13 Error description: Error ADSCDX/6082 Erro de abertura: ..\DATA\ArqSenha.SNH Stack Calls =========== Called from: => DBUSEAREA( 0 ) Called from: C:\P_FWHB\CONDOM\Prg\Condom.Prg => USEREDE( 1492 ) Called from: C:\P_FWHB\CONDOM\Prg\SENHA.PRG => PASSW( 27 ) Called from: C:\P_FWHB\CONDOM\Prg\Condom.Prg => ENTRADA( 1409 ) Called from: C:\P_FWHB\CONDOM\Prg\Condom.Prg => (b)MAIN( 288 ) Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 1039 ) Called from: C:\P_FWHB\CONDOM\Prg\Condom.Prg => MAIN( 288 ) System ====== CPU type: Intel(R) Core(TM) i7-8550U CPU @ 1.80GHz 2000 Mhz Hardware memory: 16232 megs Free System resources: 90 % GDI resources: 90 % User resources: 90 % Windows total applications running: 4 1 , C:\P_FWHB\CONDOM\xDex\CONDOM.EXE 2 , C:\WINDOWS\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.17134.285_none_42efceb 3 DDE Server Window, C:\WINDOWS\System32\OLE32.DLL 4 G, Variables in use ================ Procedure Type Value ========================== DBUSEAREA Param 1: L .T. Param 2: U Param 3: C "..\DATA\ArqSenha.SNH" Param 4: C "ArqSenha" Param 5: L .T. Param 6: L .F. Param 7: U Param 8: U Local 1: U Local 2: U USEREDE Param 1: C "..\DATA\ArqSenha.SNH" Param 2: L .F. Param 3: N 10 Param 4: C "ArqSenha" Local 1: N 0 PASSW Local 1: U Local 2: U Local 3: U Local 4: U ENTRADA Param 1: U Param 2: O Class: TBAR Param 3: O Class: TFONT Param 4: O Class: TBITMAP Param 5: O Class: TMDIFRAME Param 6: O Class: TTIMER Param 7: O Class: TCURSOR Local 1: U Local 2: U Local 3: U (b)MAIN Param 1: O Class: TMDIFRAME TMDIFRAME:ACTIVATE Param 1: C "MAXIMIZED" Param 2: U Param 3: U Param 4: U Param 5: U Param 6: B {|| ... } Param 7: U Param 8: B {|| ... } Param 9: U Param 10: U Param 11: U Param 12: U Param 13: U Param 14: U Param 15: U Param 16: U Param 17: B {|| ... } Param 18: U Param 19: U Param 20: L .F. Local 1: O Class: TMDIFRAME Local 2: U Local 3: U MAIN Local 1: O Class: TICON Local 2: O Class: TCURSOR Local 3: O Class: TBAR Local 4: U Local 5: U Local 6: U Local 7: U Local 8: N 11842740 Local 9: U Local 10: U Local 11: U Local 12: U Local 13: U Local 14: U Local 15: U Local 16: O Class: TFONT Local 17: O Class: TBTNBMP Local 18: U Local 19: O Class: TBRUSH Linked RDDs =========== ADS ADT ADSVFP ADSCDX ADSNTX DBF DBFFPT DBFCDX DBFBLOB DBFNTX DataBases in use ================ Classes in use: =============== 1 ERROR 2 HASHENTRY 3 HBCLASS 4 HBOBJECT 5 TBRUSH 6 TWINDOW 7 TCONTROL 8 TICON 9 TCURSOR 10 TFONT 11 TMDIFRAME 12 TMENU 13 TMENUITEM 14 TMRU 15 TINI 16 TMDICLIENT 17 TBAR 18 TRECT 19 TBTNBMP 20 TTIMER 21 TBITMAP 22 TMSGBAR 23 TMSGITEM 24 TREG32 Memory Analysis =============== 1306 Static variables Dynamic memory consume: Actual Value: 0 bytes Highest Value: 0 bytes

Penso que está resolvido uma vez que aquele erro deixou de aparecer. Aparece um outro erro que vou postar em outro lugar para pedir ajuda. Um muito obrigado a todos.

E como se faz isso? Run as administrator?

O computador é novo e é o windows Pro

Muito obrigado. Já consegui baixar e reinstalar o xDev que vc me enviou. Só que quando quero abrir o projecto dá um erro "Property webframework does not exist". Alguma burrada da minha parte ou falta alguma configuração?

Aqui não consegui baixar porque pede para registar.

Tentei sim, mas continua o mesmo erro.