12.176 cursos gratis
8.741.914 alumnos
Facebook Twitter YouTube
Busca cursos gratis:

Uso de Stringgrid en Delphi 2010

Autor: Alexander Alvarez Vaca
Curso:
|63 alumnos|Fecha publicaciýn: 24/11/2011
Envýa un mensaje al autor

Hoy aprenderemos a usar un Stringgrid de Delphi 2010, a cómo usar sus  filas y sus columnas, para eso haremos un pequeño proyecto en la cual usaremos una matriz de números y en la cual los datos serán llenados por el usuario, no permitiremos que se puedan escribir letras solo números en lo EDIT, y además no dejaremos que se introduzcan datos vacíos en los EDIT.

Para quienes no lo saben Delphi es un entorno de desarrollo de programas el cual permite crear diferentes tipos de aplicaciones para distintos sistemas operativos. A continuación estarás conociendo el uso que podemos darle a los Stringgrid dentro de Delphi 2010.

http://https://www.facebook.com/xander.technology.bolivia

Debemos iniciar abriendo un el entorno de DELPHI 2010 y creando un nuevo proyecto, tal como se  muestra en siguiente imagen:

Nuevo formulario. Delphi 2

Una vez hecho esto arrastramos un STRINGGRID, tres LABELS, tres EDIT y un botón haciendo que nuestro formulario quede de esta manera:

Embarcadero RAD studio. Delphi 1

Ahora guardamos nuestro proyecto, haciendo clic en FILE y SAVEL ALL como se muestra en la imagen:

Guardar la muestra. Delphi 3

Posteriormente vamos a realizar un clic en el componente EDIT1 y después iremos a sus propiedades y pondremos que solo pueda entrar números, lo mismo con el EDIT2 y con el EDIT3como se muestra en la siguiente imagen:

NUMBERSONLY (TRUE)

Objeto inspector. Delphi 4

Ahora hacemos clic en el formulario y entramos a sus propiedades o inspector de objetos que está en la parte izquierda inferior por defecto  y hacemos  clic en la pestaña eventos después hacemos doble clic en el evento ONCREATE así como se muestra en la imagen:

Pestaña de eventos. Delphi 5

Una vez demos el doble clic nos saldrá el editor de código y escribiremos el siguiente código:

var

i : integer;

begin

StringGrid1.Cells[0,0] := 'Celdas'; //para las nomenclatura

for i:= 0 to 4 do

  begin

  StringGrid1.Cells[0,i]:= IntToStr(i);  //para indexer las filas

            StringGrid1.Cells[i,0]:= IntToStr(i); //para indexer las columnas

  end;

end;

Debe quedarnos como en la siguiente imagen:

Delphi. Codigos 6

Cuando hayamos realizado todo esto, volvemos al diseño del formulario y le hacemos doble clic en el botón Insertar para entrar al editor de código del botón el cual deberá mostrarnos esto:

Boton de editor de codigos. Delphi 8

Ahora en medio de BEGIN y END; o sea en la línea 4 (puede que  en tu editor de código no esté en la línea 4 para asegúrate de escribir en medio de BEGIN y END; de la función BUTTON1CLICK) arriba en la imagen escribimos es el siguiente código:

procedure TForm1.Button1Click(Sender: TObject);

var

fil : integer;

col : integer;

num : integer;

begin

//verificamos que ningun dato este vacio

if ((Length(Edit1.Text)= 0) or (Length(Edit2.Text)= 0) or (Length(Edit2.Text)= 0)) 

then

begin

  ShowMessage('Todos los datos son obligatorios');

end

else

begin

  fil := StrToInt(Edit1.Text);

  col := StrToInt(Edit2.Text);

  num := StrToInt(Edit3.Text);

  if( (fil > 0) and (col > 0) and (num > 0) and (fil<5) and (col<5)) then

  begin

    StringGrid1.Cells[col,fil]:=IntToStr(num);

  end

  else

  begin

    ShowMessage('Error uno de los datos es muy grande');

  end;

end;

end ;

Si lo hemos hecho bien nos debe salir como en la siguiente imagen:

Codigo completo. Delphi 9

Ahora solo nos quedará guardar nuestro proyecto y ejecutarlo, verás cómo te funciona.

Sobre el curso rýpido

Nuestras novedades en tu e-mail

Escribe tu e-mail:



MailxMail tratarý tus datos para realizar acciones promocionales (výa email y/o telýfono).
En la polýtica de privacidad conocerýs tu derechos y gestionarýs la baja.

ýQuieres ser el primero en opinar sobre Uso de Stringgrid en Delphi 2010?


Cursos similares

Delphi 2010. Uso de Checkbox
0 alumnos  
Aprende sobre el elemento de interacción checkbox en Delphi 2010 el autor te expone... [29/11/11]
Uso de Combobox en Delphi 2010. Instrucciones
22 alumnos  
En este curso vamos a realizar un proyecto en DELPHI 2010 que nos enseñe las... [01/12/11]
Uso de Stringgrid en C++Builder 2010
13 alumnos  
En este curso aprenderemos a usar un Stringgrid de C++BUILDER para usar sus ... [21/11/11]


ýQuý es mailxmail.com?|ISSN: 1699-4914|Ayuda
Publicidad|Condiciones legales de mailxmail