Dúvidas sobre fivewin

[Pedro Junior]

Olá pessoal , começei a estudar o fivewin. Estou fazendo um pequeno programinha de requisição que vai ser integrado com o meu sistema de estoque.

Gostaria de abrir um browse logo no início para que o usuário possa escolher qual a empresa que ele vai solicitar material, escolhido a empresa então abro uma outra tela para o login. Depois do login vem o menu principal.

como fazer , será que fui claro ?
[/u]

[rochinha]

Amiguinho

Dê uma olhada no diretório SAMPLES e verifique o exemplo TESTLBX3.PRG.

Ele monta um browse onde ao ser escolhido um dos elementos este é retornado em uma variavel.

@braços :?)

[Pedro Junior]

Rochinha , quando vou compilar qualquer exemplo que tenha um DIALOG ele dá esse erro abaixo.

acho que tá faltando algo. Ele não reconhece a declaração DIALOG.
É o mesmo exemplo que tem na pasta samples.


esse foi o meu problema , foi por causa disso que fiz a pergunta anterior
eu estava tentando criar um dialog e depois um listbox, mais aí dava o mesmo erro que está dando agora. Será que vc pode me ajudar ?


C:\FW\SAMPLES>clipper testlbx3
CA-Clipper (R) 5.3b (Rev. 338)
Copyright (c) 1985-1996, Computer Associates International, Inc.
Microsoft C Floating Point Support Routines
Copyright (c) Microsoft Corp 1984-1993. All Rights Reserved.
346K available
Compiling TESTLBX3.PRG
TESTLBX3.PRG(9) Error C2005 Statement not recognized, match failed at: '3'
TESTLBX3.PRG(23) Error C2005 Statement not recognized, match failed at: 'DIAL
OG'
TESTLBX3.PRG(33) Error C2005 Statement not recognized, match failed at: 'DIAL
OG'
3 errors

No code generated

[rochinha]

Amiguinho

Este é um problema relacionado ao FIVEWIN.CH.

Ele é o original, ou voce alterou algo dentro do mesmo?

Voce incluiu no .PRg alguma chamada a mais para outras .CHs?

Eu também testei compilação usando Clipper 5.3b e Blinker 7.0 e o resultado é perfeito.

Caso queira baixe http://www.softclever.com/downloads/fw192ev.zip e teste.

@braços :?)

[Pedro Junior]

Rochinha, agradeço pela sua atenção.

Ainda continuo com o mesmo problema.

Baixei a versão que vc colocou no link e fui compilar o testlbx3.prg

e dá o mesmo problema.
A versão do fivewin.ch é a que foi baixada no teu link.

não mudei nada no exemplo que vem no fivewin.

quando compilo dá erro na linha que tem os seguintes comandos

1 - SET 3DLOOK ON
2 - DEFINE DIALOG oDlg FROM 5,10 TO 24, 55 TITLE cTitle
3 - ACTIVATE DIALOG oDlg CENTERED

se é o fivewin.ch, será que vc poderia me mandar este arquivo para que eu possa fazer o teste?

Será que eu estou compilando errado ?

clipper testlbx3


// Using ListBoxes to perform simple selections

#include "FiveWin.ch"

//----------------------------------------------------------------//

function Main()

SET 3DLOOK ON

MsgInfo( MsgSelect( { "One", "two", "three" }, "two" ) )

return nil

//----------------------------------------------------------------//

function MsgSelect( aItems, cValue, cTitle )

local oDlg

DEFAULT cTitle := "Please, select"

DEFINE DIALOG oDlg FROM 5,10 TO 24, 55 TITLE cTitle

@ 1, 2 LISTBOX cValue ITEMS aItems SIZE 145, 95 OF oDlg

@ 10, 6 BUTTON "&OK" OF oDlg SIZE 40, 12 ;
ACTION oDlg:End() DEFAULT

@ 10, 14 BUTTON "&Cancel" OF oDlg SIZE 40, 12 ;
ACTION ( cValue := nil, oDlg:End() )

ACTIVATE DIALOG oDlg CENTERED

return cValue

//----------------------------------------------------------------//

[rochinha]

Amiguinho

Só uma perguntinha

Quais os comandos ou BATchs voce esta usando para compilar os exemplo, etc.

Se possivel me mostre os conteúdos deles.

@braços :?)

[Pedro Junior]

Rochinha,

estou compilando o exemplo da seguinte maneira :

clipper testlbx3
blinker fi testlbx3 @\fw\include\fivewin



caso eu venha a comentar as linhas de código que contenham o Set 3dlook on, o DIALOG e o ACTIVE DIALOG ele compilar normalmente.


Rochinha meu amiguinho, qual será o mistério ?

[Dudu_XBase]

...ta ligado o set include...
...vc não tem ..um fivewin.ch duplicado neh...por exemplo um no dir do clipper outr no do fivewin...de versões diferente...

set include=c:\clipper5\include;c:\fw\include


...ahh execute



clipper testblx3 /n