Tutorial vídeo club

[[José Luis Garcí]]

Después de 2 semanas en las que no he podido dedicarme al tutorial, volvemos no con mucho tiempo, pero entre hoy y mañana espero sacar el módulo de Alquiler y los que este lleva adosados.

Para ello vamos a ver el modulo Uvernotas



Y como su código es pequeño lo subo aquí también

Código Delphi [-]
unit Uvernota;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls, Buttons;

type
  TFvernota = class(TForm)
    Panel1: TPanel;
    SBSalir: TSpeedButton;
    Memo1: TMemo;
    procedure SBSalirClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Fvernota: TFvernota;

implementation

{$R *.dfm}

procedure TFvernota.SBSalirClick(Sender: TObject);
//------------------------------------------------------------------------------
//**************************************************************[ SBSalir ]*****
//------------------------------------------------------------------------------
begin
  Close;
end;

end.

[[José Luis Garcí]]

Bien ahora vamos a mostrar los campos de búsqueda , para ello añadimos a nuestro módulo DM una nueva variable que llamaremos varSBusqueda de tipo string

empecemos por buscar clientes



el código en https://gist.github.com/anonymous/8816e6d0705a950e7047


Y nada que comentar sobre este ya que lo haré en el siguiente

[[José Luis Garcí]]

Módulo de buscar unidad



el código en https://gist.github.com/anonymous/da4c9a74ad43969ef4ab

Bueno de este apartado podremos ver la búsqueda activa con un radiogrup, para seleccionar el campo de búsqueda. Este tiene un botón de búsqueda, pero se podría modificar haciéndolo más efectivo usando el onchange del edit.

También en la rejilla usamos el color para poder visualizar la disponibilidad de la unidad o si esta esta bloqueada, bien por estar vendida o perdida. esto también seria mejorable añadiendo un checkbox para que nos mostrase solo las disponibles o sea DISPONIBLE=S, VENDIDA=N y PERDIDA=N.

Mejoras que podemos hacer, pues por ejemplo quitar los grids de Género y Formato y añadir dos DBText que nos lo pusiera directamente

Por cierto en los títulos de género y formato tenemos unos timagen que nos permiten desplazarnos por los grids.

[[José Luis Garcí]]

Ya por último por hoy os pongo como va quedando el módulo de Alquiler donde implantaremos todos estos módulos comentados hoy, mañana intentare seguir un saludo a todos.

[Casimiro Notevi]

[[José Luis Garcí]]

Como ayer no pude seguir he buscado un rato hoy para no atrasarme más, os pongo el módulo de buscar alquiler



Y el código en https://gist.github.com/anonymous/9dc334b3215f17e3b3e7

Primero decir que el módulo no lo he probado ya que no esta terminado el de alquileres, segundo que en este he usado alguno de los sistemas ya comentados anteriormente, por lo que tenéis búsquedas según escribimos en el apartado de buscar por el nombre de cliente, el botón de búsqueda con un selector (El checkbox) permitiéndonos usar una sentencia SQL u otra según nos interese.

Por hoy poco más, en estos días seguiré introduciendo poco a poco este módulo de alquiler, pero estoy bastante liado corrigiendo mi sexta novela, que espero poder presentar a concurso en los próximos meses

[[José Luis Garcí]]

Primero pediros disculpas por la tardanza en continuar, no es que me haya olvidado, pero debo terminar algunas cosas así que en una o dos semanas espero volver a seguir con el tútorial