Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #9  
Antiguo 22-07-2010
Avatar de Lord Delfos
Lord Delfos Lord Delfos is offline
Miembro
 
Registrado: ene 2008
Ubicación: Tandil, Argentina
Posts: 558
Poder: 19
Lord Delfos Va por buen camino
Si entiendo lo que querés hacer, sería algo así:

Código Delphi [-]
const MisDatos : array[1..8] of Integer = (13, 32, 134, 76, 9, 41, 3, 17);

procedure Buscar(QueCosa: Integer);
var Ind: Integer;
begin
  Ind:= 1;
  while (Ind <= 8) {o length(MisDatos)} and (MisDatos[Ind] <> QueCosa) do
    Inc(Ind);

  if Ind <= 8 {o Length(MisDatos)} then
    ShowMessage('Encontrado en la posición ' + IntToStr(Ind))
  else
    ShowMessage('No encontrado.');
end;

Por cierto, si lo que querés declarar es una matriz, se sigue el mismo principio:

Código Delphi [-]
const  MiMatriz: array[1..3, 1..5] of Integer = 
(
      (1, 2, 3, 4, 5),
      (1, 2, 3, 4, 5),
      (1, 2, 3, 4, 5)
);

Por cierto, hay un 99% de probabilidad de que le erres con la cantidad de valores que pongas y obtengas el error "[Error] Unit1.pas(30): Number of elements differs from declaration"... Eso es porque pusiste cuatro en vez de cinco, o mezclaste las dimensiones y pusiste 3x5 en vez de 5x3...

¿Eso es lo que querías?

Saludetes.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Ayuda String to Array of Bytes vicoxl16 Varios 3 20-04-2009 02:04:04
Ayuda! Array dinámico Cristalero Varios 3 01-04-2009 12:56:14
Ayuda con ARRAY lord shadow OOP 6 18-02-2008 14:36:29
ayuda con array... foetus HTML, Javascript y otros 7 31-07-2007 01:58:26
ayuda con array virtual Varios 5 27-01-2004 20:06:47


La franja horaria es GMT +2. Ahora son las 10:30:47.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi