Hola! tengo un problemita quiero hacer un array de botones y asignarles un nombre al evento click de cada uno para despues crear en cada evento unformulario nuevo.Mientras lo voy escribiendo me reconoce cada nombre de los eventos a la hora llamar al procedimiento pero cuando lo ejecuto me aparece una venta marcandome un error que dice:"Access violation at address ...in module "Project1.exe" .Write of address...."Que estoy haciendo mal?
Código:
For j:=1 to 6 do
begin
MisBotonesPrincipales[j]:=TButton.Create(Self);//Creo el boton
MisBotonesPrincipales[1].OnClick:= MiBotonSociosClick;
MisBotonesPrincipales[2].OnClick:= MiBotonLibrosClick;
MisBotonesPrincipales[3].OnClick:= MiBotonPrestamosClick;
MisBotonesPrincipales[4].OnClick:= MiBotonDevolucionesClick;
MisBotonesPrincipales[5].OnClick:= MiBotonHistoricoClick;
MisBotonesPrincipales[6].OnClick:= MiBotonPendientesClick;
end;
procedure TForm1.MiBotonSociosClick(Sender:TObject);
begin
end;
Luly