Ver Mensaje Individual
  #1  
Antiguo 14-05-2008
Avatar de Guillermo80
Guillermo80 Guillermo80 is offline
Miembro
 
Registrado: may 2007
Posts: 87
Reputación: 20
Guillermo80 Va por buen camino
La función no es ningún misterio, y es análoga a DeshabilitaTodo (salvo en el botón de cancelar):

Cita:
procedure TForm1.HabilitaTodo(Sender: TObject);
begin
EditFileName.Enabled := true;
EditDest.Enabled := true;
Button1.Enabled := true;
BtnDecode.Enabled := true;
Titulo.Enabled := true;
Artista.Enabled := true;
Album.Enabled := true;
Fecha.Enabled := true;
Pista.Enabled := true;
Genero.Enabled := true;
CheckBoxVentana.Enabled := true;
CheckVentanas.Enabled := CheckBoxVentana.Checked;
Memo1.Enabled := true;
end;
Asímismo le añadí la cabecera del método arriba en la declaración de cabebceras:

Cita:
procedure TForm1.HabilitaTodo(Sender: TObject);
Responder Con Cita