FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Bug harbour_3.2_32bits_MSVC2013_20142906
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Tue Jul 08, 2014 04:29 AM

Totalmente de acuerdo (CAVO: CA-Visual Objects). Pero, menudo regalazo no hizo CA con los errores que cometieron :-)
Ahora "Clipper" es "nuestro", y no pagamos ni un c茅ntimo por 茅l ;-)

Determinados errores cometidos por "grandes empresas" han sido piezas fundamentales de FiveWin:

Hace muchos a帽os, cay贸 en mis manos una versi贸n alfa de Visual dbase ("Cayenne"). Me la regal贸 un empleado de Borland en Madrid. Aun la conservo, y en ella hab铆a ideas estupendas que estan hoy en dia en FiveWin :-) Luego Borland fu茅 bastante est煤pido y tiro a la basura esa versi贸n y se fu茅 al modelo IDE (igual que Visual FoxPro, etc) desperdiciando aut茅nticas joyas de ideas que exist铆an en esa version :-) La versi贸n inicial iba a ser un compilador al estilo Clipper, pero perdieron el rumbo con los "cantos de sirenas" de los IDEs :-)

Tambien hay conceptos de FoxPro en FiveWin. Yo ten铆a una peque帽a gu铆a de bolsillo de los comandos de FoxPro. "DEFINE WINDOW", etc. muchos de ellos son conceptos de FoxPro :-)

El famoso MsgInfo(), etc. son ideas originales que encontr茅 en una versi贸n beta de Paradox de Borland. Paradox significa "Paradoja". Paradojas de la vida: 驴 donde est谩 hoy en dia "Paradox" ? :-)

Estando atentos, siempre aparecen grandes oportunidades. Hasta en los basureros se pueden encontrar aut茅nticos "tesoros" :-)

Las grandes empresas tambien cometen errores. Normalmente se creen que por ser grandes no se pueden equivocar, pero la realidad es que al ser grandes se hunden m谩s r谩pido (como el Titanic). Sus movimientos son lentos y torpes, no tienen la capacidad de reacci贸n de las mini-empresas :-)

Asi que nunca penseis que por ser peque帽os no podeis vencer a una gran empresa. David venci贸 a Goliat! Aprender de sus debilidades y errores es la clave para no cometer las mismas estupideces.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Tue Jul 08, 2014 05:07 AM
Y puestos a contar batallitas, 驴 en que me inspir茅 para construir Harbour ? En Linux, por supuesto.

Cuando v铆 el milagro que hab铆a hecho Linus Torvals entend铆 que era aplicable a un Clipper moderno y de ahi nace Harbour :-)

Y de unos a帽itos que me pas茅 aprendiendo "Lex y Yacc", en concreto aprend铆 de este libro:

http://shop.oreilly.com/product/9781565920002.do



El resto ? bueno, ya lo sabeis, el compilador que todos usamos :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
cnavarro
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Sun Jul 13, 2014 06:57 PM
Antonio

Con la version Fwh1406, obtengo este error

Compiling...
Harbour 3.2.0dev (r1406271520)
Copyright (c) 1999-2014, http://harbour-project.org/
Compiling 'prog01.prg' and generating preprocessed output to 'prog01.ppo'...
Lines 6145, Functions/Procedures 11
Generating C source output to 'prog01.c'... Done.
Compilador de optimizaci贸n de C/C++ de Microsoft (R) versi贸n 18.00.30501 para x86
(C) Microsoft Corporation. Reservados todos los derechos.

prog01.c
xhb.lib(xhbole.obj) : warning LNK4006: _HB_FUN_OLEDEFAULTARG ya se defini贸 en FiveH32.lib(OLEFUNCS.obj); segunda definic
i贸n omitida
Creando biblioteca prog01.lib y objeto prog01.exp
FiveHC32.lib(MSGS.obj) : warning LNK4217: se import贸 el s铆mbolo _strchr definido localmente en la funci贸n _LToStr
FiveHC32.lib(FWPNG.obj) : warning LNK4217: se import贸 el s铆mbolo _fclose definido localmente en la funci贸n _save_png_to_
file
FiveHC32.lib(FWPNG.obj) : warning LNK4217: se import贸 el s铆mbolo _fopen definido localmente en la funci贸n _save_png_to_f
ile
FiveHC32.lib(FWPNG.obj) : warning LNK4217: se import贸 el s铆mbolo _longjmp definido localmente en la funci贸n _ReadPng
FiveHC32.lib(LISTVIEW.obj) : warning LNK4217: se import贸 el s铆mbolo _wcslen definido localmente en la funci贸n _HB_FUN_LV
INSERTGROUP
FiveHC32.lib(FWARRAY.obj) : warning LNK4217: se import贸 el s铆mbolo _memmove definido localmente en la funci贸n _fwArrayDe
l
FiveHC32.lib(MSGS.obj) : error LNK2019: s铆mbolo externo __imp__sprintf sin resolver al que se hace referencia en la func
i贸n _LToStr
FiveHC32.lib(FWBMP.obj) : error LNK2019: s铆mbolo externo __imp__strstr sin resolver al que se hace referencia en la func
i贸n _HB_FUN_PALBTNPAINT
prog01.exe : fatal error LNK1120: 2 externos sin resolver
* Linking errors *


Mi configuracion es

if exist "%ProgramFiles%\Microsoft Visual Studio 12.0\VC\vcvarsall.bat" call "%ProgramFiles%\Microsoft

Visual Studio 12.0\VC\vcvarsall.bat"
if exist "%ProgramFiles(x86)%\Microsoft Visual Studio 12.0\VC\vcvarsall.bat" call "%ProgramFiles(x86)%

\Microsoft Visual Studio 12.0\VC\vcvarsall.bat"

rem if "%FWDIR%" == "" set FWDIR=.\..
set FWDIR=c:\fwh\fwh1406
rem if "%HBDIR%" == "" set HBDIR=c:\harbour
set HBDIR=C:\Harbour\harbvc20142906


Ocurre igual con harbvc20131007

Resumiendo:
- Fwh1402 con harbvc20131007 genera el exe OK y funciona OK
- Fwh1402 con harbvc20142906 genera el exe OK y funciona OK
- Fwh1404 con harbvc20131007 genera el exe OK pero da Error:
Error description: Error BASE/1004 Message not found: TBTNFLAT:DEFCONTROL
- Fwh1404 con harbvc20142906 genera el exe OK pero da Error:
Error description: Error BASE/1004 Message not found: TBTNFLAT:DEFCONTROL
- Fwh1406 con harbvc20131007 obtengo los errores descritos anteriormente
(En este caso como no genera el exe no puedo saber si tambien da error en TBTNFLAT)
- Fwh1406 con harbvc20142906 obtengo los errores descritos anteriormente
(En este caso como no genera el exe no puedo saber si tambien da error en TBTNFLAT)
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Sun Jul 13, 2014 10:54 PM

Cristobal,

Que PRG est谩s construyendo ? Puedes copiar el fuente aqui ? gracias

regards, saludos

Antonio Linares
www.fivetechsoft.com
cnavarro
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Mon Jul 14, 2014 06:49 PM

Antonio
Te lo he enviado por mail
Gracias

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Maurizio
Posts: 842
Joined: Mon Oct 10, 2005 01:29 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Fri Jul 18, 2014 04:45 PM
Antonio ,
same error
Code (fw): Select all Collapse
hbmk2: Linking... MASTROSQL.EXE
   Creazione della libreria MASTROSQL.lib e dell'oggetto MASTROSQL.exp in corso.
..
fivehc32.lib(MSGS.obj) : warning LNK4217: simbolo _strchr definito localmente im
portato nella funzione _LToStr
fivehc32.lib(FWPNG.obj) : warning LNK4217: simbolo _fclose definito localmente i
mportato nella funzione _save_png_to_file
fivehc32.lib(FWPNG.obj) : warning LNK4217: simbolo _fopen definito localmente im
portato nella funzione _save_png_to_file
fivehc32.lib(FWPNG.obj) : warning LNK4217: simbolo _longjmp definito localmente
importato nella funzione _ReadPng
fivehc32.lib(LISTVIEW.obj) : warning LNK4217: simbolo _wcslen definito localment
e importato nella funzione _HB_FUN_LVINSERTGROUP
fivehc32.lib(FWARRAY.obj) : warning LNK4217: simbolo _memmove definito localment
e importato nella funzione _fwArrayDel
fivehc32.lib(MSGS.obj) : error LNK2019: riferimento al simbolo esterno __imp__sp
rintf non risolto nella funzione _LToStr
fivehc32.lib(FWBMP.obj) : error LNK2019: riferimento al simbolo esterno __imp__s
trstr non risolto nella funzione _HB_FUN_PALBTNPAINT
MASTROSQL.EXE : fatal error LNK1120: 2 esterni non risolti
hbmk2: Error: Running linker. 1120
link.exe @C:\Users\Maurizio\AppData\Local\Temp\st87y4.lnk

hbmk2: Error: Referenced, missing, but unknown function(s): LVINSERTGROUP(),
       PALBTNPAINT()
****************** Linking errors *


Maurizio
www.nipeservice.com
Maurizio
www.nipeservice.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Sun Jul 20, 2014 03:54 AM
Cristobal,

Debe faltar un fichero de cabecera que no me has enviado:

Microsoft (R) C/C++ Optimizing Compiler Version 18.00.30501 for x86
Copyright (C) Microsoft Corporation. All rights reserved.

prog01.c
prog01.prg(808) : error C2065: 'IDC_WIN32PROJECT1' : undeclared identifier
prog01.prg(909) : error C2065: 'IDS_APP_TITLE' : undeclared identifier
prog01.prg(910) : error C2065: 'IDC_WIN32PROJECT1' : undeclared identifier
prog01.prg(936) : error C2065: 'IDC_WIN32PROJECT1' : undeclared identifier
prog01.prg(1061) : error C2065: 'IDI_WIN32PROJECT1' : undeclared identifier
prog01.prg(1064) : error C2065: 'IDC_WIN32PROJECT1' : undeclared identifier
prog01.prg(1066) : error C2065: 'IDI_SMALL' : undeclared identifier
prog01.prg(1146) : error C2065: 'IDM_ABOUT' : undeclared identifier
prog01.prg(1146) : error C2051: case expression not constant
prog01.prg(1147) : error C2065: 'IDD_ABOUTBOX' : undeclared identifier
prog01.prg(1149) : error C2065: 'IDM_EXIT' : undeclared identifier
prog01.prg(1149) : error C2051: case expression not constant
prog01.prg(1154) : warning C4065: switch statement contains 'default' but no 'ca
se' labels
prog01.prg(1316) : error C3861: '_T': identifier not found
prog01.prg(1356) : error C3861: '_tcslen': identifier not found
prog01.prg(1358) : error C3861: '_tcslen': identifier not found
prog01.prg(1359) : error C3861: '_tcslen': identifier not found
prog01.prg(1366) : error C2065: 'IDC_WIN32PROJECT1' : undeclared identifier
Microsoft (R) Windows (R) Resource Compiler Version 6.3.9600.17029
Copyright (C) Microsoft Corporation. All rights reserved.

prog01.RC(3) : fatal error RC1015: cannot open include file 'resource.h'.
LINK : fatal error LNK1181: cannot open input file 'prog01.obj'
* Linking errors *
regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Sun Jul 20, 2014 03:59 AM

Maurizio,

What Visual Studio version are you using ?

Please try: FWH\samples\buildh32.bat tutor01

and let me know if you also get those warnings.

With VS2013 it works fine, as tutor01.prg calls MsgInfo() which it is in msgs.c module and thats where LToStr() is and from it strchr() is called.

I guess that you are using an older Visual Studio version.

regards, saludos

Antonio Linares
www.fivetechsoft.com
cnavarro
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Sun Jul 20, 2014 06:59 AM
Antonio,
Creo que con esto est谩 completo

Fichero: win32project1.h
Code (fw): Select all Collapse
#pragma once

#include "resource.h"


Y fichero resource.h
Code (fw): Select all Collapse
//{{NO_DEPENDENCIES}}
// Microsoft Visual C++ generated include file.
// Used by Win32Project1.rc
//

#define IDS_APP_TITLE聽 聽聽 聽 聽 聽 103

#define IDR_MAINFRAME聽 聽聽 聽 聽 聽 128
#define IDD_WIN32PROJECT1_DIALOG聽 聽 102
#define IDD_ABOUTBOX聽 聽 聽 聽 聽 聽 103
#define IDM_ABOUT聽 聽聽 聽 聽 聽 聽 聽 104
#define IDM_EXIT聽 聽 聽 聽 聽 聽 聽 聽 105
#define IDI_WIN32PROJECT1聽 聽聽 聽 聽 聽 107
#define IDI_SMALL聽 聽聽 聽 聽 聽 聽 聽 108
#define IDC_WIN32PROJECT1聽 聽聽 聽 聽 聽 109
#define IDC_MYICON聽 聽 聽 聽 聽 聽 聽 2
#ifndef IDC_STATIC
#define IDC_STATIC聽 聽 聽 聽 聽 聽 聽 -1
#endif
// Valores predeterminados siguientes para nuevos objetos
//
#ifdef APSTUDIO_INVOKED
#ifndef APSTUDIO_READONLY_SYMBOLS

#define _APS_NO_MFC聽聽 聽 聽 聽 聽 聽 聽 聽 130
#define _APS_NEXT_RESOURCE_VALUE聽 聽 129
#define _APS_NEXT_COMMAND_VALUE聽聽 聽 32771
#define _APS_NEXT_CONTROL_VALUE聽聽 聽 1000
#define _APS_NEXT_SYMED_VALUE聽 聽聽 聽 110
#endif
#endif
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
cnavarro
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Sun Jul 20, 2014 07:03 AM
Y tambien

Win32Project1.rc

Code (fw): Select all Collapse
//Script de recursos generado en Microsoft Visual C++.
//
#include "resource.h"

#define APSTUDIO_READONLY_SYMBOLS
/////////////////////////////////////////////////////////////////////////////
//
// Generado a partir del recurso TEXTINCLUDE 2.
//
#ifndef APSTUDIO_INVOKED
#include "targetver.h"
#endif
#define APSTUDIO_HIDDEN_SYMBOLS
#include "windows.h"
#undef APSTUDIO_HIDDEN_SYMBOLS
/////////////////////////////////////////////////////////////////////////////
#undef APSTUDIO_READONLY_SYMBOLS

#if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_ESN)
LANGUAGE 10, 3

/////////////////////////////////////////////////////////////////////////////
//
// Icono
//

// Icono con el valor de id. menor colocado en primer lugar para garantizar que el icono de la aplicaci贸n
// es el mismo en todos los sistemas.

IDI_WIN32PROJECT1       ICON         "Win32Project1.ico"
IDI_SMALL               ICON         "small.ico"

/////////////////////////////////////////////////////////////////////////////
//
// Men煤
//

IDC_WIN32PROJECT1 MENU
BEGIN
    POPUP "&Archivo"
    BEGIN
        MENUITEM "&Salir",                IDM_EXIT
    END
    POPUP "Ay&uda"
    BEGIN
        MENUITEM "&Acerca de...",           IDM_ABOUT
    END
END


/////////////////////////////////////////////////////////////////////////////
//
// Acelerador
//

IDC_WIN32PROJECT1 ACCELERATORS
BEGIN
    "?",            IDM_ABOUT,              ASCII,  ALT
    "/",            IDM_ABOUT,              ASCII,  ALT
END


/////////////////////////////////////////////////////////////////////////////
//
// Cuadro de di谩logo
//

IDD_ABOUTBOX DIALOGEX 0, 0, 170, 62
STYLE DS_SETFONT | DS_MODALFRAME | DS_FIXEDSYS | WS_POPUP | WS_CAPTION | WS_SYSMENU
CAPTION "Acerca de Win32Project1"
FONT 8, "MS Shell Dlg"
BEGIN
    ICON            IDR_MAINFRAME,IDC_STATIC,14,14,21,20
    LTEXT           "Win32Project1, versi贸n 1.0",IDC_STATIC,42,14,114,8,SS_NOPREFIX
    LTEXT           "Copyright (C) 2014",IDC_STATIC,42,26,114,8
    DEFPUSHBUTTON   "Aceptar",IDOK,113,41,50,14,WS_GROUP
END

/////////////////////////////////////////////////////////////////////////////
//
// DESIGNINFO
//

#ifdef APSTUDIO_INVOKED
GUIDELINES DESIGNINFO
BEGIN
    IDD_ABOUTBOX, DIALOG
    BEGIN
        LEFTMARGIN, 7
        RIGHTMARGIN, 163
        TOPMARGIN, 7
        BOTTOMMARGIN, 55
    END
END
#endif    // APSTUDIO_INVOKED

#ifdef APSTUDIO_INVOKED
/////////////////////////////////////////////////////////////////////////////
//
// TEXTINCLUDE
//
1 TEXTINCLUDE
BEGIN
    "resource.h\0"
END

2 TEXTINCLUDE
BEGIN
    "#ifndef APSTUDIO_INVOKED\r\n"
    "#include ""targetver.h""\r\n"
    "#endif\r\n"
    "#define APSTUDIO_HIDDEN_SYMBOLS\r\n"
    "#include ""windows.h""\r\n"
    "#undef APSTUDIO_HIDDEN_SYMBOLS\r\n"
    "\0"
END

3 TEXTINCLUDE
BEGIN
    "\r\n"
    "\0"
END

#endif    // APSTUDIO_INVOKED

/////////////////////////////////////////////////////////////////////////////
//
// Tabla de cadenas
//

STRINGTABLE
BEGIN
   IDC_WIN32PROJECT1   "WIN32PROJECT1"
   IDS_APP_TITLE       "Win32Project1"
END

#endif
/////////////////////////////////////////////////////////////////////////////



#ifndef APSTUDIO_INVOKED
/////////////////////////////////////////////////////////////////////////////
//
// Generado a partir del recurso TEXTINCLUDE 3.
//

/////////////////////////////////////////////////////////////////////////////
#endif    // No APSTUDIO_INVOKED
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
cnavarro
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Sun Jul 20, 2014 07:11 AM

Antonio
Te he vuelto a enviar un nuevo mail

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Maurizio
Posts: 842
Joined: Mon Oct 10, 2005 01:29 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Mon Jul 21, 2014 08:22 AM
Antonio ,
Thank the broblem was ( I use hbmk2 )
-ldflag=/force:multiple
-ldflag=/NODEFAULTLIB:libc

I have this warnings , are they important ?

MSVCRT.lib(MSVCR120.dll) : warning LNK4006: _memmove gi definito in LIBCMT.lib(
memmove.obj); seconda definizione ignorata
Creazione della libreria MASTROSQL.lib e dell'oggetto MASTROSQL.exp in corso.
..
LINK : warning LNK4098: la libreria predefinita 'MSVCRT' in conflitto con l'util
izzo di altre librerie; utilizzare /NODEFAULTLIB:libreria
MASTROSQL.EXE : warning LNK4088: immagine generata grazie all'opzione /FORCE; l'
immagine potrebbe non essere eseguita
------------------ Application successfully built *


Maurizio
www.nipeservice.it
Maurizio
www.nipeservice.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Bug harbour_3.2_32bits_MSVC2013_20142906
Posted: Mon Jul 21, 2014 10:46 AM

Maurizio,

No, they don't seem to be important.

Is the app properly working ? If yes, then its fine.

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions