[Neftali [Germán.Estévez]]

Empezado por Luli

Hola, bueno no me expliqué bien, lo del arreglo es porque quiero tener una tabla con los datos que introdujo el usuario para usarlos más tarde, estos datos son: el nombre de una variable cualquiera (a, b, w, etc) y su valor (1, 28, 3, etc.) estos datos los da el usuario y para recibirlos utilicé un TEdit.

Lo que no sé es como los guardo en esa tabla, en ese arreglo, ya me habían comentado que tendría que convertir uno de los datos a int y yo escribí este codigo

Éste código tiene algunos errores (y alguno de concepto también).
Lo primero, es que si debes almacenar una cadena y un Integer, el array debe ser de Strings (en lugar de enteros), ya que un entero se puede almacenar como string, pero no al contrario.

Otro error que he visto, es que Tabla lo tienes definido dentro de tipos (type) y no dentro de variables (var) y luego intentas trabajar con el; Si lo defines como Tipo debes definir una variable de ese tipo, y si lo defines como variable puedes usarla directamente.

El código con alguna corrección quedaría así, revísa los cambios:

Código Delphi [-]
 const
   Longitud=2;
   Altura=3;
 type
   Horizontal = 1..Longitud;
   Vertical   = 1..Altura;
 
 var
   Tabla: Array[Horizontal,Vertical] of String;
   Form1: TForm1;
   contador_variable: integer;
   Variable: String;
   Valor:    String;
   i: integer;
   j: integer;
 
 
 implementation
 {$R *.dfm}
 
 procedure TForm1.Button1Click(Sender: TObject);
 begin
   if(contador_variable < 3)  //este tres es porque quiero que acepte
     //un numero determinado de variables
 
     then begin
   //1.- Se guarda la variable y su valor en la tabla
   //2.- Se incrementa el contador porque solo seran tres variables las que se puedan recibir
 
   contador_variable:=contador_variable+1;
   ///////////////////////////////////////////////////////////////////////////////
   //SE GUARDA LA VARIABLE Y SU VALOR EN LA TABLA
 
   Variable:= Edit1.Text;
   Valor:= Edit2.Text;
 
 
   // aqui es donde ya no sé como guardar el nombre de la variable en una celda y su valor en la celda de junto... lo que se me ocurre es algo así:
 
     Tabla[i,j]:= Variable;
     j:=j+1;
     Tabla[i,j]:= Valor;
   //pero no sé si se pueda y otra cosa ¿como imprimo los valores de la tabla en un TEdit, por ejemplo? esto para poder comprobar que se guardaron los datos correctos y en los sitios correctos
 
   ///////////////////////////////////////////////////////////////////////////////
 
   //3.- Se limpia el formulario, listo para recibir otra variable
    ListBox1.Items.Add('           '+Edit1.Text+'                      '+Edit2.Text);
    //ValueListEditor1.keys[Edit1.Text];
 
   end;
 
   if(contador_variable>3)
   then begin
   //Mostrar mensaje de que solo se pueden recibir X variables
   ShowMessage ('No es posible declarar más variables');
 
   end;
 
  // Limpiar los edit 1 y 2
  Edit1.Text:= '';
  Edit2.Text:= '';
 
 end;
 
 
 procedure TForm1.Button2Click(Sender: TObject);
 begin
   Close;
 end;
 
 end.