Ver Mensaje Individual
  #1  
Antiguo 24-10-2017
kratos1981 kratos1981 is offline
Registrado
NULL
 
Registrado: oct 2017
Posts: 1
Reputación: 0
kratos1981 Va por buen camino
Tengo dudas con el libro delphi2006

Hola buen dia, hace una semana comencé a leer DELPHI2006, ya que quiero aprender a programar aplicaciones para puntos de venta y rockolas, todo iba bien con los ejemplos a pesar de que uso el delphiXE2, hasta que no pude entender donde se coloca este procedimiento

procedure TMainForm.ShowButtons(Sender: TObject);
begin
Button1.Visible := CheckBox1.Checked;
Button2.Visible := CheckBox1.Checked;
Button3.Visible := CheckBox1.Checked;
Button4.Visible := CheckBox1.Checked;
end;

En los demàs ejemplos al colocar cualquier objeto al formulario, en propiedades en la pestaña evento se crea un procedimiento, bueno pues al día de hoy no he podido encontrar donde se crea ese procedimiento y al intentar escribirlo tal cual, el programa me muestra un error a la hora de correrlo, para evitar ese problema usè el evento onClick del CheckBox.

quedando de esta manera.

procedure TForm.CheckBox1.Click(Sender: TObject);
begin
Button1.Visible := CheckBox1.Checked;
Button2.Visible := CheckBox1.Checked;
Button3.Visible := CheckBox1.Checked;
Button4.Visible := CheckBox1.Checked;
end;

El cual me ha servido, todo estaba bien, hasta que al avanzar con otros ejemplos me muestra un error, cada vez que activo y desactivo la el checkbox.

El codigo del nuevo ejemplo es este

procedure TForm1.CheckBox1Click(Sender: TObject);
var
Cnt: Integer;
Comp: TComponent;
begin
for Cnt := 1 to 7 do
begin
Comp := FindComponent('Button' + IntToStr(Cnt));
TButton(Comp).Visible := CheckBox1.Checked;
end;
end;

y el error que me aparece dice ACCESS VIOLATION AT ADDRESS 0483FBB IN MODULE 'CHECKBOX1.EXE'. READ OF ADDRESS 00000061

echenme una explicaciòn, no quiero desanimarme mas del delphi
Responder Con Cita