Delphi - Pasar Matriz

 
Vista:

Pasar Matriz

Publicado por Triby (25 intervenciones) el 08/01/2002 17:15:33
Hola a Todos,

Lo que necesito saber es como pasar una matriz a una funcion en Delphi 5, ejemplo

Private
Function Mi_Funcion(Matriz of String): Integer;
...

procedure TProg.BitBtn2Click(Sender: TObject);
Var Matriz: Array[0..100,0..3] of String;
Begin
...
Mi_Funcion(Matriz)
...
End;

Function TProg.Mi_Funcion(Matriz of String): Integer;
Begin
....
End;

De esta forma me resulta bien si la matriz es de una dimension, pero como es de dos dimensiones al compilar me da un error que dice: Incompatible Types.

Desde ya gracias por la ayuda.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Pasar Matriz

Publicado por beosman (163 intervenciones) el 09/01/2002 11:11:09

Lo mejor que puedes hacer es declarar un nuevo tipo con la matriz que quieras, ya sea uni o multidimensional. Se haria mas o menos asi:

type MiMatriz: array[1..n] of UnTipo;

Despues, a las funciones, en lugar de pasarles una matriz propiamente dicha, les pasas el nuevo tipo que has creado, mas o menos asi:

procedure miFuncion(a: MiMatriz);

procedure TProg.ButtonClick(Sender: TObject)
var m: MiMatriz;
begin
...
MiFuncion(M);
...
end;

Espero que te sirva. Un saludo.

Diego -> chairman
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar