Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 14-06-2006
Avatar de Alcolea
Alcolea Alcolea is offline
Miembro
 
Registrado: abr 2006
Ubicación: Santiago de Cuba, Cuba
Posts: 100
Poder: 19
Alcolea Va por buen camino
Thumbs up Entiendo pero...

Solo me limité a colocar la parte del código que no comprendía, los jugadores en mi clase original los saco de un registro y no de una clase jugador como explicas. Pienso que no importa de donde surgió el arreglo, la implentación que me propones debe servirme para cualquier arreglo.

Otro asunto es que quiero crear la clase desde cero, o sea, con todos los atributos sin valores, como debe pasar al llamar al contructor por defecto create pero me da un error, "EAccessViolation".

En la práctica el problema es este (lógico, después de tu ayuda dec)

Código Delphi [-]
   
type
 Jugador = record
           Nombre : String;
           VB     : Integer;
           Jr     : Integer;
           Hits   : Integer;
           Avg    : Integer;
          end;

 Juego = array[0..19]of Jugador;

 Team = class
 private
   Jugadores : Juego;

 public
   Index     : Byte;
   constructor CreaTeam(AIndex : Byte; AJugadores : Juego);
   procedure Insert(Nombre : String; VB, Jr, Hits, Avg : Integer);
   {Aquí van otros métodos que no me causan problemas}
 end;

implementation

   constructor Team.CreaTeam(AIndex : Byte; AJugadores : Juego);
   begin
    inherited Create;
    Index     := AIndex;       
    Jugadores := AJugadores;
   end;


Al Aplicar el costructor en la Unit de un formulario

Código Delphi [-]
procedure TForm1.Button4Click(Sender: TObject);
begin
 MiTeam := Team.CreaTeam(0,Miembros);
 {Sucede que el error estaba en la manera de llamar al constructor de
 la clase, que deber ser como está aquí, y lo tenía así  
MiTeam.CreaTeam(0,Miembros) anteriormente}
end;

Gracias dec me ha servido de mucho tu ayuda como en otras ocaciones.

Última edición por Alcolea fecha: 14-06-2006 a las 07:44:33.
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Constructor de forms lafirma OOP 6 07-11-2006 14:15:55
Implementar cliente-servidor tato Servers 6 22-08-2006 02:18:26
constructor...propiedad heredada modulay OOP 11 08-02-2006 23:27:27
Constructor kalimero OOP 8 07-09-2005 17:00:11
constructor y destructor gustavo2 OOP 11 23-04-2004 20:23:20


La franja horaria es GMT +2. Ahora son las 09:43:05.


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