Nuevamente Molestando ERROR URGENTE

Nuevamente Molestando ERROR URGENTE

Postby mantonio_08 » Thu Nov 15, 2007 9:40 pm

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
mantonio_08
 
Posts: 330
Joined: Fri May 25, 2007 9:06 pm

Postby Antonio Linares » Thu Nov 15, 2007 10:48 pm

Prueba así:

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

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42159
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby mantonio_08 » Fri Nov 16, 2007 6:19 pm

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 ) )
mantonio_08
 
Posts: 330
Joined: Fri May 25, 2007 9:06 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 33 guests