creacion objetos

[[Caral]]

Hola
Efectivamente se desactivaron los link, desconozco la razón.
Saludos

[MOCOSO07]

hola amigos ya pude crear el componente que queria

ahora quiero saber si hay forma de eliminarlo??

este es el codigo que use para crearlo

Código Delphi [-]
  frm_DataModule.qry_revMaterias.Close;
  frm_DataModule.qry_revMaterias.SQL.Clear;
  frm_DataModule.qry_revMaterias.SQL.Add('Select Nombre_materia, id_materia');
  frm_DataModule.qry_revMaterias.SQL.Add('FROM MATERIA');
  frm_DataModule.qry_revMaterias.SQL.add('WHERE PLAN_ESTUDIOS = '+QuotedStr(cmb_plan.Text)+' AND  NUCLEO_FORMACION = "TRONCO COMUN" or clave_AA = '+QuotedStr(VarToStr(combo_AA.KeyValue))+' order by id_materia');
  frm_DataModule.qry_revMaterias.SQL.Text;
  frm_DataModule.qry_revMaterias.Open;
  frm_DataModule.qry_revMaterias.FetchAll;

  altura  := 281;
  altura1 := 281;
  bandera := 1;
 while not frm_DataModule.qry_revMaterias.Eof do
 begin
    if altura < 634 then
    begin
    Tpanel.Create(Self);
    etiqueta := tlabel.Create(Self);
    etiqueta.Parent := Self;
    etiqueta.Width := 99 ;
    etiqueta.Left := 24 ;
    etiqueta.Top := altura ;
    etiqueta.Caption := frm_DataModule.qry_revMaterias.Fields[0].AsString;

    edit := tedit.Create(Self);
    edit.Parent := Self;
    edit.Width := 99 ;
    edit.Left := 250 ;
    edit.Top := altura ;
    edit.Width := 24;
    edit.Height := 15;
    edit.Name := 'e' + frm_DataModule.qry_revMaterias.Fields[1].AsString;
    edit.Text := '';
    altura := altura + 16;
    end
    else
    begin

    etiqueta := Tlabel.Create(Self);
    etiqueta.Parent := Self;
    etiqueta.Width := 99 ;
    etiqueta.Left := 304 ;
    etiqueta.Top := altura1 ;
    etiqueta.Caption := frm_DataModule.qry_revMaterias.Fields[0].AsString;

    edit := tedit.Create(Self);
    edit.Parent := Self;
    edit.Width := 99 ;
    edit.Left := 580 ;
    edit.Top := altura1 ;
    edit.Width := 24;
    edit.Height := 15;
    edit.Name := 'e' + frm_DataModule.qry_revMaterias.Fields[1].AsString;
    edit.Text := '';

    altura1 := altura1 + 16;
    end;
    frm_DataModule.qry_revMaterias.Next;
 end;
 end;

bueno lo queria hacer era una consulta q dependiendo del plan de estudios el nucleo de formacion y el area me mandara la lista de materias que el alumno iba a cursar que es el codigo anterior

quiero saber como eliminar por que...

necesito saber como borrarlos para volver a cargar nuevamente componentes en determinado caso que el usuario quiera hacer una consulta con otro plan u otra area

espero y me haya explicado, como anteriormente dije estoy usando delphi 5
gracias por su atencion