Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 03-12-2004
maruenda maruenda is offline
Miembro
 
Registrado: oct 2003
Ubicación: elche
Posts: 173
Poder: 21
maruenda Va por buen camino
Thumbs down devolver array de tipo tdate

hola a tod@s. mi pregunta es la siguiente.
quiero hacer una funcion que me devuelva un array con valores Tdate.

declaro lo siguiente:

function nombre:array[0..1] of tdate;

pues al compilar me dice que en lugar de array espera un identificador.

alguien me puede explicar que hago mal ?
__________________
frenadol
Responder Con Cita
  #2  
Antiguo 03-12-2004
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 26
delphi.com.ar Va por buen camino
No lo recomiendo, pero:
Código Delphi [-]
type
  TMiArrayOfDate = array[0..1] of TDate;

implementation

function MiFuncion: TMiArrayOfDate;
begin
  ...
end;

Una opción mas estandar:
Código Delphi [-]
procedure MiProcedure(var AValue: array of TDate);
begin
end;

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
  #3  
Antiguo 03-12-2004
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.604
Poder: 29
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
Smile

¡Buen día a todos!


Cita:
Empezado por maruenda
...function nombre:array[0..1] of tdate;
pues al compilar me dice que en lugar de array espera un identificador...
Maruenda:

Cuando se trata del valor de devolución de una función, el compilador sólo permite indicar tipos de datos que han sido previamente declarados. La solución es muy sencilla:

Código:
Type
  TArregloParFechas = Array [0..1] Of TDate;

Function Nombre :TArregloParFechas;
Espero esto sea de utilidad, seguimos en contacto.

Al González.
Responder Con Cita
  #4  
Antiguo 03-12-2004
maruenda maruenda is offline
Miembro
 
Registrado: oct 2003
Ubicación: elche
Posts: 173
Poder: 21
maruenda Va por buen camino
Thumbs down

gracias a todos por las respuestas. tiene logica. Necesita un tipo de datos, y yo no se lo daba. un saludo. y feliz puente. Espero que todos volvais. Cuidado con la carretera.
__________________
frenadol
Responder Con Cita
  #5  
Antiguo 03-12-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por delphi.com.ar
No lo recomiendo
¿Por qué?

// Saludos
Responder Con Cita
  #6  
Antiguo 03-12-2004
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 26
delphi.com.ar Va por buen camino
Cita:
Empezado por roman
¿Por qué?
Simplemente porque una cuestión de gustos, porque no me gusta quedar atado a un tipo de datos estricto en funciones que podrían ser mas flexibles, a no ser que si lo requiera. Posiblemente este no sea el caso.

Puede haber sido un comentario "de mas"...

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
Respuesta



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


La franja horaria es GMT +2. Ahora son las 07:06:45.


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