Nuevamente Molestando ERROR URGENTE

Post Reply
mantonio_08
Posts: 330
Joined: Fri May 25, 2007 9:06 pm

Nuevamente Molestando ERROR URGENTE

Post by mantonio_08 »

Amigos:

Creo que pasar de 16 a 32 bits, ha sido mas traumatico de lo que pensaba, ya que lo que funcionaba, aqui es un error. Me tiene de cabezas y no logro dar con el error, por eso recurro a los maestros.

Tengo lo siguiente:

**INICIO DE PROGRAMA

MEMVAR c_base

Function Main()
....
....
Local oBar

MeMvar->c_base="Men_cla" && Asigno Valor a Variable

**** EN ESTA LINEA SE PRODUCE EL ERROR
--> if !Usored(&c_base,1,.f.,,&c_base) // Aqui Mando a Abrir la Base de Datos que va en la variable c_base
Tone(3000,1);Tone(4000,1);Tone(5000,1)
MsgInfo("Error No Pudo Abrir Base de Dato")
Return (.F.)
Endif

AL tratar de pasar la variable con el nombre de la base de datos, me arroja el siguiente error:

c:\util\sistemas\rutina.prg(16) Warning W0001 Ambiguou

Estoy usando Fwh 701 y Xharbour 00.99.71, Bcc55 y Verce 5.1.
Los Flags para Xhabour que uso en verce es:
/n /m /w /es2 /gc1

Saludos,
Antonio
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Prueba así:

if !Usored(&( Memvar->c_base ),1,.f.,,&( MemVar->c_base ) )
regards, saludos

Antonio Linares
www.fivetechsoft.com
mantonio_08
Posts: 330
Joined: Fri May 25, 2007 9:06 pm

Post by mantonio_08 »

Antonio:

Maestro como siempre, funciono perfecto, un millon de gracias.

Saludos,
Antonio


Antonio Linares wrote:Prueba así:

if !Usored(&( Memvar->c_base ),1,.f.,,&( MemVar->c_base ) )
Post Reply