Luiz Arruda (ICO)

Ola. Tente fazer dois programinhas p/ testes ******** *TESTE.PRG ********* CLS @10,10 SAY "Consegui..." quit Compile apenas assim CLIPPER TESTE RTLINK FI TESTE Veja se vai compilar normalmente. Agora copie o codigo abaixo e compile assim CLIPPER TESTE2 RTLINK FI TESTE2 LIB VL2_52 id=red> A VL2_52 INKEY.CH E VISUAL2.CHid=blue> , COLOQUE NA MESMA PASTA DO APLICATIVO PARA EVITAR DE FICAR MEXENDO COM SETs INCLUDES ETC... Se nao compilar tente reinstalar seu clipper ou verifique se as lib existem ou nao foram corrompidas. ******************* *TESTE2.PRG ******* #include "inkey.ch" #include "visual2.ch" id=blue> desktop(" Compilando...","W+/N*") sET KEY K_F3 TO CLOCK() SET KEY K_F10 TO VLEXIT() SETKEYmOUSE( K_F5, {}) SetKeyMouse( K_F2, { 24, 24, 08, 13 } ) //VL-Associa tecla de fun‡Æo … uma SETKEYmOUSE( K_F3, { 24, 24, 16, 23 } ) SETKEYMouse( K_F4, { 24, 24, 24, 28 } ) SetKeyMouse( K_F10, { 24, 24, 72, 79 } ) //regiao da tela - uso do mouse SETKEYmOUSE( K_F9, { 20, 20, 46,75 } ) DrawFn(1,"Ajuda") DrawFn(2,"Sobre") DrawFn(3,"Relogio") DrawFn(10,"Saida") mbar := NewBarMenu() mSai := NewBarMenu() AddBaritem(mbar, "Sair","Sair do Sistema",msai) AddBarItem(mBar, "S&obre","Sobre",{||sobre()}) AddDownItem(msai,"Sair","Saida",{||vlexit()}) while .t. BarMenu( mBar ) endd FUNCTION SOBRE msgbox3d1({"2004 - Luiz Edson R. Arruda ",; "Avenida General Rondon, 921",; "Centro - Corumba/MS",; "Tel:(67) 231/4537 / 9987-5743",; "Email: efbfaz@terra.com.br"},; "Sobre ") ************ Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal :: FW 2.4 Clipper 5.2 . Editado por - ICO on 15/07/2005 15:12:33

Boa Tarde. Tente isto DEFINE MSGITEM OF OWND:OMSGBAR; prompt "Nome do Usuário " Eu uso assim também SET MESSAGE OF OWND; TO " Luiz Edson R. Arruda " color "b+/w"; KEYBOARD; CLOCK; DATE Nao sei se tem outra forma. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal :: FW 2.4 Clipper 5.2 . Editado por - ICO on 14/07/2005 18:00:28

E se falando em sugestões lá vai; H:)- Que as respostas sejam dadas com mais clareza, as vezes é muito dificíl entender a resposta de um programador mais avançado. as vezes a mesma resposta é colocada mais de uma vez até que juntamos as partes p/ entender-mos. I:)- Ao indicar um link p/ resposta, indicar apenas o que mostrou a solução. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal :: FW 2.4 Clipper 5.2 .

Ola. Gilmer fwversion 2.4 As bwcc.dll e a ctl3d.dll nao devem ser colocadas em SET RESOURCES TO " " ???. para que serve a ctl3d.dll e bwcc.dll ? Abraços Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal :: Editado por - ICO on 14/07/2005 15:00:02 Editado por - ICO on 14/07/2005 15:40:31

Ola. Estou carregando assim; SET RESOURCES TO "BORDLGS.DLL","CTL3D.DLL","BWCC.DLL","LED67.DLLid=blue>" hBorland:=loadlibrary("BWCC.DLL") a bwccid=red> nao foi alterada as DIALOGs dentro da LED67.DLLid=blue> nao são executadas e a menssagem que dá é canott create dialog box resource id=blue> Abraços. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Bom dia Uso FW Abralos Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Bom dia. Gostaria de saber como faço p/ usar minhas próprias DLLsid=red>, as mesmas ja estão declaradas em SET RESOURCE TO id=blue> e mesmo assim nao consigo usar as dialogs. desde Já Obrigado. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Ola. Clipper tutor01 /n /m coloque; FI TUTOR01 OUT TUTOR01.EXE DENTRO DO SEU FIVEWIN.LNK Abraços. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Bom Dia Diga como esta tentando compilar e como está seu LNK. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Tudo Bem... mais que funciona, funciona.. he! he! (só faço deste jeito) Abraços até a próxima Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Do jeito que coloquei, usa apenas uma linha... mais valeu. abraços. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Boa Tarde Copie e Compile o codigo abaixo em um tst.prg veja se nao é isto q vc quer. #include "fivewin.ch" static ownd function main() local obmp Define window oWnd from 1,1 to 22,75 TITLE "Teste Plano de Fundo " @ 04,03 bitmap oBmp FILENAME "SEU.bmp"id=blue> Size 950,600 OF ownd ADJUST ACTIVATE WINDOW oWnd MAXIMIZED Abraços. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Tente retirar o define bitmap, e entrar diretamente com @ 04,03 BITMAP oBmp FILENAME "IMAgem.bmp" Size 950,600 OF ownd ADJUST, ou retire o adjust da sua linha define Bitmap oBmp file("c:\almowin2\images\fundo.bmp") adjust;id=red> oWnd:bPaint = {|hDC |PalBmpDraw(hDC, 0, 0, oBmp:hBitMap)} Abraços Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal :: Editado por - ico on 12/07/2005 14:50:16

Ola. Isto nao resolveria seu problema ? @ 04,03 BITMAP oBmp FILENAME "IMAgem.bmp" Size 950,600 OF ownd ADJUST colocado antes do activate window Abraços. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal :: Editado por - ico on 12/07/2005 12:04:51

verifique as pastas, OBJ/INCLUDE/LIB Tente compilar sem usar o arquivo.BAT Abra a pasta do programa; clipper /parametros RTLINK FI LIB Se der certo verifique seu blinker Abraços. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal :: Editado por - ico on 12/07/2005 11:45:22

Bom dia Eu sempre usei a vl2_51 para criar telas gráficas mouse etc com a visual lib. creio que esta, vl2_52 tenha a mesma funcao, seu programa tem acesso a mouse ?, possui telas gráficas e cx. de dialogo ? etc.., se não tiver pode retirar essa lib, pois ela vem junto com a VISUAL LIB. e é usada junto com a VISUAL2.CH para criar tais telas. Sendo que ela faz parte da VISUAL LIB, nunca irá funcionar com o FW. Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Ola. Nao se vou falar besteira, mais vai lá. Se nao me engano, essa lib serve para criar telas tipo 3d , cx. de dialog. tipo win etc no clipper, pelo menos a vl2_51 serve. (visual lib). Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal :: Editado por - ico on 11/07/2005 17:54:36

Ola. Tente criar um arquivo BAT p/ compilar ex: c.bat com os parametros/variaveis amb. do clipper SET include=C:\CLIP53\INCLUDE SET lib=C:\CLIP53\LIB SET obj=C:\OBJ clipper seuarquivo.prg BLINKER OU RTLINK FI LIB VAI FUNCIONAR Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Ola. Eu compilo normalmente em XP, basta indicar corretamente as pastas INCLUDE, OBJ E LIB Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Boa Tarde. Veja este tópico, deu trabalho mais funcionou http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=4209 Abraços Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal ::

Ola mandai p/ seu email Luiz Arruda - iko67@ibest.com.br => Visite Corumbá/MS - Conheça o Pantanal :: Editado por - ico on 07/07/2005 10:06:08

Ai eu góóóostiuuu.. Se possível diga com qual dica funcionou, para possíveis consultas futuras. Abraços. Editado por - ico on 06/07/2005 16:46:24

Abra o Ws, carregue a dialog, clik botao direito na parte branca defina como POPUP e nao como CHILD. VAI FUNCIONAR. ICO - Corumba/MS iko67@ibest.com.br => Visite Corumbá - Conheça o Pantanal :: Editado por - ico on 06/07/2005 16:01:27 Editado por - ico on 06/07/2005 16:03:37

Retire o que eu disse. coloque sua dialog como style popup no WS ICO - Corumba/MS iko67@ibest.com.br => Visite Corumbá - Conheça o Pantanal :: Editado por - ico on 06/07/2005 15:56:22

Retire o que eu disse. coloque sua dialog como style popup. ICO - Corumba/MS iko67@ibest.com.br => Visite Corumbá - Conheça o Pantanal ::