¡¡Saludos!!:
Estoy haciendo un programilla de bases de datos, en especial para una biblioteca. Tengo un form para "asignar" un libro a una persona, que es cuando lo coge prestado. El caso es que quiero que en ese form se me muestre, en un DBComboBox, todos los libros disponibles (La columna Título de la tabla TblLibros, que tiene como dataset dsLibros).
Bien, cómo no podía poner el Dataset directamente desde el form para coger libros aún añadiendo las uses, he puesto el siguiente código cuando lo llamo
Código Delphi
[-]procedure TfrmUsuarios.sbCogerLibroClick(Sender: TObject);
begin
If eNombre.Text = '' Then
begin
ShowMessage('Debe de seleccionar un miembro al que añadir el libro');
Abort;
end
Else
begin
frmCogerLibro := TfrmCogerLibro.Create(Self);
frmCogerLibro.eLibro.DataSource := frmPrincipal.frmLibros1.dsLibros;
frmCogerLibro.eLibro.DataField := 'Titulo';
frmCogerLibro.ShowModal;
frmCogerLibro.Free;
end;
end;
Sin embargo, tampoco me funciona. ¿Cómo podría hacer lo que me propongo?.
Gracias, simplemente, por aguantarme
