Programa de gestión desde 0

[[José Luis Garcí]]

Empezado por fjcg02

Eres un crack !!
;-)

Saludos

Si hombre lo que me faltaba ahora andar con esas porquerías

[[José Luis Garcí]]

He de decir que el sistema de agendas con el tabcontrol, siempre me ha gustado y creo que es super útil, seguramente hay varios apartados que se pueden mejorar, en este y otros apartados, pero aun así me siento bien con ellos.

[[José Luis Garcí]]

También e de decir que esperaba muchas más criticas de los expertos y compañeros, serán que no han visto el tema , que pasa olimpicamente o que me dan por imposible

[Casimiro Notevi]

Seguro que lo han visto, es un trabajo muy grande el que has hecho, es una excelente base tanto para los novatos como para los que tienen experiencia, se puede consultar formas de hacer las cosas, tener presente detalles que se nos olvidan, etc. es realmente muy útil.
Y ahí queda, como "libro de consulta", y cuando alguien pregunte entonces se le envía a este hilo y se le dice: "lee, que ahí tienes la solución, so vago, no lo quieras todo hecho "
Saludos

[[José Luis Garcí]]

Empezado por Casimiro Notevi

Seguro que lo han visto, es un trabajo muy grande el que has hecho, es una excelente base tanto para los novatos como para los que tienen experiencia, se puede consultar formas de hacer las cosas, tener presente detalles que se nos olvidan, etc. es realmente muy útil.
Y ahí queda, como "libro de consulta", y cuando alguien pregunte entonces se le envía a este hilo y se le dice: "lee, que ahí tienes la solución, so vago, no lo quieras todo hecho "
Saludos

Que entonces no pongo los fuentes como termine, 'pá' que no vagueen estos maleantes

[Casimiro Notevi]

Eso, eso, o los pones en un zip con clave y pides 100 euros a quien quiera la clave

[[José Luis Garcí]]

Empezado por Casimiro Notevi

Eso, eso, o los pones en un zip con clave y pides 100 euros a quien quiera la clave

Oye chiquito negocio :rolleyes, habrá que hacer un plan de viabilidad, solicitar permisos al ayuntamiento, acordar costes y demás con hacienda el ayuntamiento, etc, al final voy a tener que poner dinero de mi bolsillo

Es que como ya se meten en todo.

De lo último que me he enterado, es que ahora hay que sacar una certificación para poder alquilar una casa o local, nada como una carrera o unos estudios para que el estado te ayude, a........ hundirte

[Casimiro Notevi]

Empezado por José Luis Garcí

De lo último que me he enterado, es que ahora hay que sacar una certificación para poder alquilar una casa o local, nada como una carrera o unos estudios para que el estado te ayude, a........ hundirte

Pues échale un vistazo al asunto de la energía solar. Lo último de esta semana aprobado por el gobierno que tanto nos quiere: un día decides poner tus propias placas solares porque estás harto de que te robe la empresa eléctrica y decides abastecerte únicamente de esas placas para electricidad. Pues bien, tienes que pagar a la compañía eléctrica la cantidad de electricidad que produzcan esas placas. Como lo oyes

[[José Luis Garcí]]

Empezado por Casimiro Notevi

Pues échale un vistazo al asunto de la energía solar. Lo último de esta semana aprobado por el gobierno que tanto nos quiere: un día decides poner tus propias placas solares porque estás harto de que te robe la empresa eléctrica y decides abastecerte únicamente de esas placas para electricidad. Pues bien, tienes que pagar a la compañía eléctrica la cantidad de electricidad que produzcan esas placas. Como lo oyes

Ciento decírtelo Casimiro, pero eso no es nuevo, si me permites, te Aconsejo leer el libro "Vivir del Viento" de mi autor preferido, un canario de la isala vecina Tenerife, que lleva afincado en otra de nuestras maravillosas Islas Lanzarote, Alberto Vazquez Figueroa, es un libro que hace refleccionar mucho, como varios de el, pro suerte yo tengo más del 75% de su obra, me faltan alguno de los antiguos y puedo decir que he leído la mayor parte. Lo aconsejo sinceramente tanto la mayor parte de su obra como su biografía, que es apasionante, tanto o más que su obra en si.

Volviendo al tema de la electricidad, terminaremos como mucha gente en la india y otras zonas de extrema pobreza, http://www.youtube.com/watch?v=bhHKXxEN9Q0, o como se veia mucho hace ya varias decadas, pequeños arerogeneradores con dinamos de bicicleta y la llanta de la misma, pero no demos más pistas que seguro que viene el e estado y le mete mano.

[Casimiro Notevi]

Sí, claro, conozco a Vázquez Figueroa y he leido varias obras suyas. Estoy al tanto de su empresa para producir electricidad económica y ecológica, y de su desaladora, y del sistema de frenado automático para trenes de alta velocidad, etc.

Pero lo que te comentaba antes es que desde la semana pasada, si tú instalas en tu casa unas placas solares que producen, por ejemplo, 1000 W. entonces tendrás que pagar como si gastaras esos 1000 W a la compañía eléctrica, para que ellos no "pierdan", o sea, el gobierno les ha dado a las eléctricas (iberdrola, endesa, etc.) permiso para cobrarnos el Sol. Así de duro.

[[José Luis Garcí]]

Viva el desface eléctrico y todos los españoles a pagar, no importa la de millones de beneficios que tienen al año, a pringar todo el mundo.

[[José Luis Garcí]]

Seguimos con la siguiente tabla, creo que a esta altura ya no hace falta comentarla

CREATE TABLE RUTAS (
ID INTEGER NOT NULL,
CODIGOEMPLEADO T20 NOT NULL /* T20 = VARCHAR(20) */,
MATRICULA T10 NOT NULL /* T10 = VARCHAR(20) */,
NUMERORUTA T20 NOT NULL /* T20 = VARCHAR(20) */,
TIPODOCUMENTO T20 /* T20 = VARCHAR(20) */,
NUMERODOCUMENTO T20 /* T20 = VARCHAR(20) */,
SERIE T3 NOT NULL /* T3 = VARCHAR(3) */,
CODIGOCLIENTE T20 /* T20 = VARCHAR(20) */,
NOMBRECLIENTE T40 /* T40 = VARCHAR(40) */,
FECHA DATE NOT NULL,
NOTA T80 /* T80 = VARCHAR(80) */
);

[[José Luis Garcí]]

Me falto añadir el campo

PESO NUMERIC(15,2)

[[José Luis Garcí]]

Vamos con crear las rutas



y como siempre el código https://gist.github.com/anonymous/6200188

[[José Luis Garcí]]

La gestión de rutas



su código en https://gist.github.com/anonymous/6200819

[[José Luis Garcí]]

Un cambio en el modulo de crear rutas en el botón buscar

ActQuery(IbqbusDoc,'SELECT * FROM DOCUMENTOS WHERE (((NUMERORUTA < '+QuotedStr('1')+') AND (NUMERORUTA <> '+QuotedStr('-1')+')) OR (NUMERORUTA IS NULL)) AND (DOCUMENTOS.FECHA BETWEEN '+
QuotedStr(Cambiafecha(DateTimePicker1.Date))+' AND '+QuotedStr(Cambiafecha(DateTimePicker2.Date))+
') ORDER BY DOCUMENTOS.NUMERODOCUMENTO',True,True,False);

[[José Luis Garcí]]

Si no estoy equivocado, me quedan dos módulos, sobre las comisiones, el menú, que será muy básico y comentaros que otras opciones puse en mi programa y listo, tutorial terminado, no diremos que he tardado mucho ?

[[José Luis Garcí]]

Aquí sigo dando el coñazo, vamos con el módulo de pago de comisiones



y como siempre el código en https://gist.github.com/anonymous/6203848

[[José Luis Garcí]]

Vamos con el módulo de gestión de comisiones



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

[[José Luis Garcí]]

Y de los apartados el último, el menú



El código en https://gist.github.com/anonymous/6204023

como podéis ver no hay un Splash, de entrada ni una petición de usuario inicial, pero si he puesto



ya que en cuanto suba los archivos, no tendréis información para acceder, lo explico en el código de dicho botón

Código Delphi [-]
procedure TFMenu.SpeedButtonBC2Click(Sender: TObject);
//------------------------------------------------------------------------------
//*******************************************************[ ENTRADA DIRECTA ]****
// Este botón será desactivado al terminar el programa
//------------------------------------------------------------------------------
begin //Realmente lo uso cuando estoy haciendo un programa, para no tener que
      //pasar por la ventana de usuarios, luego siempre lo elimino
   Usuario:='José Luis';
   Nivel:=9;
   VarSClaveUSuario:='231068';
   ALStatusBar1.Panels[1].Text:='Usuario [ '+Usuario+' ]-['+IntToStr(nivel)+']';
end;