FiveTech Software tech support forums

Hola amigos

A que puede ser debido el error:
****************************
Application
===========
Path and name: C:\mocwin\GESPAQ.EXE (32 bits)
Size: 772,608 bytes
Time from start: 0 hours 0 mins 4 secs
Error occurred at: 11/11/06, 19:01:36
Error description: Error BASE/44 Assigned value is wrong class: TDATABASE:CALIAS
Args:
[ 1] = C PROPIE

Stack Calls
===========
Called from: => TDATABASE:_CALIAS(0)
Called from: => TDATABASE:NEW(0)
Called from: C:\fuentes\harbour\mocwin2006\PRG\empresa.prg => EMPRESA(41)
********************************************

En la linea 45 a la que hace referencia es:

dbUseArea(.T.,,cUbica+"\PROPIE",,.T.)
propie->(Ordsetfocus("Codigo"))
propie->(Dbgotop())
Database Publicas:oDbfprop <= Esta es la linea 41

Esto funcionaba en fivewin.

Un saludo

Jose Luis

Como creas el objeto Database ?

Como lo utilizo en muchas partes del programa, lo declaro como publico en el prg principal

Publicas:=miclase()

CLASS miclase()
DATA oDbfProp
ENDCLASS

luego en el prg en cuestion declaro memvar la variable Publicas

Un Saludo

Jose Luis

Jose Luis,

En source\classes\database.prg modifica esta línea:

DATA cAlias, cFile, cDriver AS String INIT ""

por

DATA cAlias, cFile, cDriver

Joer Antonio, es que los maestros no duermen?
Siempre estás al pié del cañón.

Bueno he hecho el cambio y sigue igual.
O es que hay que recompilar alguna libreria o algo?

Un saludo

Jose Luis

Jose Luis,

Se duerme de vez en cuando

Tienes que compilar database.prg después de ese cambio y o bien enlazas database.obj en tu aplicación ó lo reemplazas en fivehc.lib

Perfecto Antonio.

He hecho lo mismo con bBof, ya que me daba el mismo error

Saludos

Jose Luis