Page 1 of 1

Bug in piccolo testar.prg 32/bit

Posted: Mon May 15, 2006 7:55 pm
by Piscicelli Zingoni
Vi allego questo piccolo test che mi va in 16bit ma non mi va in 32bit (harbour):

*------------------

#include "FiveWin.ch"

//----------------------------------------------------------------------------//
function Main()

local oDlg, oBrw
local aData := { { "1", "Cliente", "=", "123456" },;
{ "2", "Direccion", "$", "Spain" },;
{ "3", "Telefono", "<>", "889977665" } }

DEFINE DIALOG oDlg FROM 0, 0 TO 30, 100

@ 1, 1 LISTBOX oBrw FIELDS aData[ oBrw:nAt ][ 1 ],;
aData[ oBrw:nAt ][ 2 ],;
aData[ oBrw:nAt ][ 3 ],;
aData[ oBrw:nAt ][ 4 ] OF oDlg ;
SIZE 150, 100

oBrw:SetArray( aData )

@ 9 , 9 BUTTON "&End" OF oDlg ACTION oDlg:End()



ACTIVATE DIALOG oDlg CENTERED



return nil

*-------

In 32 bit mi da questo errore:
Application
===========
Path and name: C:\FWH24\SAMPLES\testar.exe (32 bits)
Size: 951,296 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 05/15/06, 21:54:07
Error description: Error BASE/1002 Alias does not exist

Mentre in fw24 tutto ok!

Grazie
Piscicelli/Zingoni

Re: Bug in piccolo testar.prg 32/bit

Posted: Mon May 15, 2006 8:33 pm
by Enrico Maria Giordano
Confermato. Se vuoi segnala il problema ad Antonio nel forum in inglese.

EMG