Comparar 2 array

Comparar 2 array

Postby goosfancito » Wed May 10, 2006 7:22 pm

Estimados,

Code: Select all  Expand view  RUN
For nItem:= 1 to 10
    for nItem2:= 1 to 10
       if aMatriz[ nItem ][ nItem2 ] == aMatriz2[ nItem ] [ nItem2 ]
           ? "son iguales"
       endif
    next nItem2
next nItem


Ese código puede reemplazarse por algo mejor? usando bloque de codigo o algo parecido?

Podrían indicarme como?

Gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Postby Antonio Linares » Thu May 11, 2006 8:09 am

Gustavo,

Prueba con:
Code: Select all  Expand view  RUN
if ! aMatriz == aMatriz2
   MsgInfo( "distintos" )
else
   MsgInfo( "iguales" )
endif
regards, saludos

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

Postby thefull » Thu May 11, 2006 8:32 am

Antonio Linares wrote:Gustavo,

Prueba con:
Code: Select all  Expand view  RUN
if ! aMatriz == aMatriz2
   MsgInfo( "distintos" )
else
   MsgInfo( "iguales" )
endif


Ummm... seria interesante aplicar algun tipo de algoritmo de ordenacion
antes, ¿ no ?
Saludos
Rafa Carmona ( rafa.thefullARROBAgmail.com___quitalineas__)
User avatar
thefull
 
Posts: 731
Joined: Fri Oct 07, 2005 7:42 am
Location: Barcelona

Postby goosfancito » Thu May 11, 2006 9:44 am

Antonio, TheFull

Gracias. Pero la Idea es comparar cada item del array o sea cada aMatriz[ Nitem][ nItem2 ], como no se utilizar bien los bBlock{||} pensé que se podría hacer algo con bBlcok{||} para minimizar algo el código.

Esto lo estoy haciendo porque quiero ponerme a escribir código mas pensado en mis app.

Gracias nuevamente.
Alguna Idea...
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 81 guests