Delphi - Arreglos bidimensionales

 
Vista:

Arreglos bidimensionales

Publicado por Irma (1 intervención) el 17/01/2005 23:49:28
Hola, estoy haciendo un programa en que cual el usuario proporciona algunos datos, para ello utilicé el TEdit, en realidad son dos datos, el nombre de una variable y su valor, por lo que uno es del tipo string y el otro de tipo integer. Esos datos deben ser guardados en una tabla, un arreglo bidimensional pero no sé como hacerlo, me ayudaria mucho una explicación y sobre todo algún ejemplo de código... muchas gracias
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:Arreglos bidimensionales

Publicado por Kwerty (112 intervenciones) el 18/01/2005 01:36:04
A ver si este código te ayuda:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

//definimos el tipo de estructura
type TUsuarios = record
Nombre: String;
Valor: integer;
end;

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
//Declaramos una variable array para la estructura
Usuarios: array [0..100] of TUsuarios;
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Usuarios[0].Nombre:='Ejemplo';
Usuarios[0].Valor:=10;
end;

end.
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