Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Programa de Facturacion, Inventarios, Produccion, Completo (https://www.clubdelphi.com/foros/showthread.php?t=38055)

Caral 05-05-2007 22:47:49

Hola
mcs : Efectivamente la conexion a el archivo datos se hace en el datamodule, asi en cuanto empieza el programa lo primero que hace es conectarse a la base de datos, ten en cuenta que si cambias la ruta en el archivo datos, el programa buscara la base de datos en esa nueva ruta, de eso se trata, de que si se quiere mover la base de datos a otro directorio no alla que modificar nada en el programa, es muy practico.
gdlrinfo: No te preocupes por ser novato, ya somos dos.:D
Juan Reyes: Es un placer ayudar a este club con algo aunque sea un pequeño programa.
La idea de este es que todos los mas novatos, empiecen viendo codigo, de utilidad y que se aprenda de mis muchos errores.:)
Saludos

joarleco 17-05-2007 19:43:54

punto de venta
 
hola de nuevo discupen tal vez mi pregunta estuvo mal , pero lo qeu deseo hacer es realizar una sumatoria de productos en un punto de venta y despues lanzar el resultado pero no se como sumer las cantidades .... no se como se me falicitaria hacerlo y con que componentes ...soy nuevo en esto pero me gustaria aprender mas sobre este lenguaje...gracias.

Caral 17-05-2007 20:18:09

Hola joarleco
Te sugiero que inicies un nuevo hilo con tu problema y que lo expliques con mas detalle.
Saludos

joarleco 18-05-2007 08:36:10

hola
 
hola caral , disculpa en tu programa de facturacion al compilarlo me sale el siguiente error
[Fatal Error] UMainF.pas(15): File not found: 'NumEdit.dcu'

quisiera saber por qu eme sale este error y si es posibel compilarlo o si falta alguna libreria , agradezco tu atencion .

joarleco 18-05-2007 09:03:59

hola de nuevo
 
hola caral;
como estas disculpa pero la duda que te mencione hace rato ya fue aclarada desde hace tiempo , me puse a leer con detalle de ese error y me uno a los demas en agradecerte por compartir tu conocimiento y me alegro unirme al club, me gustaria eu me orientaras donde encontrar tutoriales para saber mas de delphi y me da mucho gusto qeu alla gente que apoye este lenguaje que para mi se me hace de lo mejor para realizar todo tipo de aplicaciones ...gracias.

joarleco 18-05-2007 23:52:12

hola tengo una duda
 
hola disculpen tengo dos dudas la primera:
en el programa de facturacion ya instale los componentes y me sige saliendo la leyenda
EconvertError
'0.00' is not a valid floating point value
no se que debo hacer mas ara que ya no me salga ese leyenda que mas se debe de instalar
la segunda quisiera saber las diferentes funciones que hay para convertir cadenas , por ejemplo mi interes es convertir un tipo de dato doble a integer.
muchas gracias.

Caral 19-05-2007 00:13:12

Hola joarleco
Me alegro que estes probando el programa y ya haciendo los cambios que necesitas.
El error que mencionas es precisamente, aunque sin ver, me parece que ya hiciste algun cambio en la base de datos.
Si usas los componentes numedit, estos buscaran numeros o integer o float, dependiendo del componente, si modificas la tabla, pues el componente no funcionara.
Ahora, si no has modificado nada, el problema viene del windows, me explico:
En Panel de control, configuracion regional, opciones regionales, personalizar, vas a ver que los decimales estan con coma y los miles con punto, hay que cambiarlos, pones los decimales con punto y los miles tambien con punto, osea los dos.
La tabla y los componentes lo identifican asi.
No hay que instalar nada mas para que el programa funcione.
En cuanto a la conversion, se puede usar algo como:
FloatToInt
IntToFloat

ect.
Recuerda que si cambias algun tipo de dato, este no funcionara correctamente.
Saludos

joarleco 21-05-2007 09:16:13

Hi ...!!!!
 
hola tengo un programa echo en delphi que da el nombre de cualquier numero pero los numeros por ejemplo separadas 2 230 que se leria como " dos mil docientos treinta " no lo quiere leer por que no puede leer el numero si se encuentra separado .. me gustaria compartir el archivo por que lo baje de internet . me gustaria saber como lo subo y ver si me pueden ayudar para qeu lo lea con el espacio o como puedo juntar un numero y moestrlo en un edit por ejemplo.... gracias.

tenporal 12-06-2007 08:40:17

Saludos Joarleco

Lo primero que debes checar es que para que sea tomado como numero solamente debe tener digitos y el separados de decimales (en mexico es el punto, tengo entendido que en españa es la coma) y te pongo el siguiente ejemplo:

En un formulario nuevo, inserta dos cuadros de texto (edit), y un boton "salir " y otro boton "convertir"

Código PHP:

procedure TForm1.Button2Click(SenderTObject);
var
//variable que contiene el codigo de error, si es cero no hay error
codigoerror:integer;
// variable que va a contener un numero con decimales
numero:real;
begin
// se trata de convertir el dato que existe en el edit1
VAL(EDIT1.Text,numero,codigoerror);
if 
codigoerror 0 then //si es cero se convirtio en numero
edit2.Text := floattostr(numero)  // ahora lo convierto en texto
else
begin // si no se pudo realizar la conversion
showmessage('teclea un numero sin espacios');
edit1.SetFocus
end
;
end


Yo programo en otros lenguajes, apenas estoy aprendiendo la sintaxis de Delphi, no se si tu problema es que los datos estan en un archivo (si es asi, deberias checar que realmente sean tomados como numero) o los tecleas en un programa (si es asi deberias validar la entrada de los datos numericos), bueno, espero que el codigo te sirva...

Hasta luego...

mramos65 15-06-2007 20:12:57

Estoy haciendo un programa en el que tengo un DbGrid, DataSource, Tedit y Table (DBF), la captura se descompone en para obtener talla y color en el dbgrid.
en segunda instancia tengo otro DbGrid, DataSource y Query en el cual quiero que aparezca la cuenta de unidades capturadas por talla de acuerdo al color que le corresponda:
COLOR 31 32 33
NEGRO_ 2_ 3_ 5
he puesto este codigo en el Query pero me falta para el resultado esperado, alguien me puede dar una manita?


Código SQL [-]
SELECT color, count(talla)
FROM invent.dbf
group by color





de antemano gracias por su gran ayuda.
Miguel

thelibmx 18-06-2007 20:05:35

Menus en botones
 
hola en el ejemplo que puso caral en su programa de facturacion, en el boton de facturar,se despliega un menu, y en el boton reportes se despliega otro menu, alguien podria decirme como es que se logra hacer eso, si me dieran los pasos y algo de codigo seria de mucha ayuda..., lo quiero implantar en un pequeño sistema que voy hacer, de antemano muchas gracias.. y que tengan lindo dia :) y por cierto felicidades a caral, abrio un mundo de ideas je je je ojala pusieran mas ejemplos de este tipo un saludos

Caral 18-06-2007 20:15:16

Hola
Para hacer esto que dices se usa el componnete PopupMenu, es muy facil de usar casi intuitivo, pruebalo si tienes dudas las postealas.
Saludos

thelibmx 18-06-2007 20:35:14

ok ya lo vi, pero como soy principiante no tengo idea, entonces ya introduje algunos menus, digamos formulario1, formulario2 y formulario3,en el componente popmenu y tengo un boton de nuevo, entonces siguiendo el ejemplo, cuando presione nuevo, quiero q se despliegue en el menu, los formularios, entonces en el boton le doy en el evento click, y mando a llamar al menu o me equivoco, supongo que si por que no me sale je je, podrias poner un poco de codigo por favor, le entenderia un poco mejor, gracias caral, o que se desplegara un mensaje nada mas mensaje 1, mensaje 2 , te lo agradeceria muchisimo

Caral 18-06-2007 20:46:54

Hola
Es muy facil, en el buton pones el codigo para llamar al popupmenu, si le das dobleclick al popup te saldra la pantalla para poner los items o menus, si le das boton derecho te saldran varias opciones entre ellas las de submenu, todos estos menus tienen el evento onclick, igual al boton, en este ya puedes hacer lo que necesites, este ejemplo mas simple tal vez te ayude:
Saludos

thelibmx 18-06-2007 20:55:09

Mucho mejor,. Gracias caral, con el ejemplo que me diste lo entendi todo je je je, ;) buen dia..saludos

servicomp 18-06-2007 23:02:28

Agradeciendo Tu iniciativa
 
Agradeciendop tu iniciativa, creo que es lo que le faltaba al foro, tambien como tu pertenezco al club hace tiempo, pero apenas en este momento tratare de migrar mi antiguo aplicativo personal a otra base de datos y a la actualización de la aplicación y creo que me servira bastante.

Gracias de antemano :)

janexa 16-01-2008 19:42:33

No funciona FloatToInt
 
:confused:

H!....MArca Undeclared identifier FloatToInt
y tambien el IntToFloat

Caral 16-01-2008 19:47:17

Hola
El programa tiene dos componentes (FloatEdit e IntEdit) dentro de NumEdit.
Creo si mas no me acuerdo que los puse con el codigo, deben estar en una carpeta aparte, hay que instalarlos y ya.
Si no quisieras usarlos simplemente los cambias por edits, el problema es que tendrias que cambiar parte del codigo tambien.
Es mas facil instalar los componentes.
Saludos

chapu79 13-06-2008 16:53:02

exelente tu aporte, me sirve mucho para aprender! gracias :)

DeG 03-07-2008 23:42:59

Solución al "... EconvertError '0.00' ..."
 
Cita:

Empezado por joarleco (Mensaje 202165)
hola disculpen tengo dos dudas la primera:
en el programa de facturacion ya instale los componentes y me sige saliendo la leyenda
EconvertError
'0.00' is not a valid floating point value
no se que debo hacer mas ara que ya no me salga ese leyenda que mas se debe de instalar
la segunda quisiera saber las diferentes funciones que hay para convertir cadenas , por ejemplo mi interes es convertir un tipo de dato doble a integer.
muchas gracias.

La solución esta cambiando el FormCreate por este

procedure TFMainForm.FormCreate(Sender: TObject);

begin
DecimalSeparator:='.';//separador decimal
ThousandSeparator:=',';//separador de miles
ShortDateFormat:='dd/MM/yyyy';
// Muestra la pantalla de Login
FLogin:=TFLogin.Create(self);
try
FLogin.ShowModal;
finally
FLogin.Free;
end;

end;

sensei 16-12-2008 20:43:30

Mil gracias caral por la aportacion , tambien al club por este espacio tan valioso sobre todo para los que nos iniciamos en esto de la programacion y desarrollo,seguro siempre encontramos alguna solucion y tambien apoyo de parte de los mienbros del club.

aunque veo no es nuevo el aporte para mi apenas lo veo y creo que me servira asi como lo mencionas para ver mejor el codigo y su funcionamiento y entenderlo de una forma practica.

Gracias.

darkerbyte 27-01-2009 18:05:46

Gracias
 
Gracias por este aporte. Con este programa le agarré el hilo al QuickReport, ya que nunca lo había utilizado.

El error del archivo .ini cualquiera se da cuenta a la primera, no es problema.

Caljim 17-02-2010 18:23:59

Hola a todos,

He buscado el link para descargarmelo, pero no encuentro el enlace a la descarga dentro la web. Me podeis indicar como conseguirlo, o es que ya no está disponible.

Gracias

thelibmx 17-02-2010 20:57:20

El programa esta en el primer pos en la pagina uno, hecha un ojo aca

http://www.terawiki.clubdelphi.com/Delphi/Proyectos/

:cool:

Creo que se llama FacturasCaral o algo asi

Caljim 20-02-2010 11:04:21

Ok, muchas gracias a todos y en especial a Caral.

escorpionrojo43 14-04-2010 06:28:01

Ayuda para ejecutar en delphi 2010
 
Hola companero estiy tratando de probar la aplicacion pero me da el error del numedit, cuando logro por fin instalar el compononte en ves de 1 me salen 3 errores quisiera saber si me puedes ayudar acorregirlo.

[DCC Error] UFOrdProd.pas(259): E2010 Incompatible types: 'AnsiString' and 'TBytes'
[DCC Error] UFOrdProd.pas(261): E2010 Incompatible types: 'TBytes' and 'AnsiString'
[DCC Fatal Error] UMainF.pas(164): F2063 Could not compile used unit 'UFOrdProd.pas'

si pongo en comentario estas lineas que son las de el error

else begin
bok := QOrdProd.Bookmark;
QOrdProd.Requery();
QOrdProd.Bookmark := bok;
end;



recibo este otro error
[DCC Fatal Error] UREntMaterial.pas(6): F1026 File not found: 'QuickRpt.dcu'
espero me puedan ayudar gracias. porcierto soy novato en esto.

Caral 14-04-2010 13:51:53

Hola
Lo unico que se me ocurre es que tocaste algo sin querer.
No se la razon de los errores
Saludos

JXJ 15-04-2010 04:36:14

Cita:

Empezado por thelibmx (Mensaje 354225)
El programa esta en el primer pos en la pagina uno, hecha un ojo aca

http://www.terawiki.clubdelphi.com/Delphi/Proyectos/

:cool:

Creo que se llama FacturasCaral o algo asi


Not Found

The requested URL /clubdelphi/Delphi/Proyectos/ was not found on this server.
Additionally, a 404 Not Found error was encountered while trying to use an ErrorDocument to handle the request.

Neftali [Germán.Estévez] 15-04-2010 09:10:32

Seguramente es por los cambios en el servidor. Esperemos que en breve se solucione; Mientras tanto he subido una copia a este directorio temporal (Facturacion_Caral).

escorpionrojo43 18-04-2010 16:09:42

Gracias por el aporte.
 
Carat se que has puesto mucho de tu parte en ayudarnos a los principiantes. aun no he podido poner en marcha el proyecto. segun veo hay un par de cosas incompatibles con delphi 2010. seria posible que lo actualizaras a delphi 2010 para los que estamos aprendiendo con dicha version? gracias de antemano y espero poder contar con tu apollo.

Caral 18-04-2010 16:17:50

Hola
No tengo delphi 2010, pero de todos modos creo que el codigo deberia de funcionar.
Cual es el problema?.
Saludos
PD: CARAL

escorpionrojo43 18-04-2010 17:44:42

Fijate cuando trato de compilarlo no me permite, primero es el asunto de que no puede cambiar entre tipos de datos. segun vi por la web d2010 trabaja con unicode y delphi no. si puedes porfavor contactarme. estaria muy agradecido pues me estoy iniciando y una ayuda como la tuya seria de gran probecho. ademas de que pasar la aplicacion a 2010 estaria mas acorde con los tiempos

Caral 20-04-2010 02:07:29

Hola
Gracias a ClubDelphi.
Saludos

roman 20-04-2010 03:19:35

Para los que han seguido el hilo en los útimos días:

Lo he cerrado temporalmente para no reincidir en su desvirtualización. Espero poder abrirlo a la brevedad para que continúe siendo lo que hasta ahora: una fuente de ayuda.

Cualquier otro asunto, sugiero abrir un nuevo hilo, siempre dentro de los límites del respeto.

// Saludos


AÑADO (Neftalí): Eliminados los mensajes "OFFTOPIC", reabro el hilo para que se pueda continuar con él, ya que es un hilo importante, de interés y con mucha información.

Caral 07-05-2010 19:56:07

Hola
Revisando el programa ya que me han preguntado de algunos errores que da he visto los siguientes de momento:
El form de QRInventario da un error al querer cargarlo, esto se debe a que de alguna manera que desconozco aparecieron tres componetes que no deberian estar ahi, de hecho no hacen nada.
Solo hay que quitarlos, son: QRHTMLFilter1, QRCSVFilter1, QRTextFilter1.
Una vez hecho esto se soluciona.
Otra cosa que vi:
Al llamar al form de clientes da un error ya que no encuentra el campo Dias Credito en la tabla, tampoco se como se perdió, no me acuerdo, solo hay que crearlo y listo.
Si tenéis alguna otra duda solo decidme, ya baje el programa por que no se donde esta.
Saludos

marcoszorrilla 07-05-2010 21:34:57

Muchas gracias Carlos por las indicaciones, seguro que van a servir y mucho para la gran cantidad de usuarios que entra a este hilo exclusiva y unicamente a aprender de tu programa.

Un Saludo.

Caral 07-05-2010 21:48:05

Hola
Con gusto amigo.
Saludos

Jucho69 10-05-2010 21:20:21

Hola Caral no me habia percatado de este hilo, ya me habias ayudado con el programa de Facturación que estoy haciendo, a ver si una vez má me sirven estas indicaciones.

Saludos

fsolispa 28-05-2010 21:38:34

Felicidades
 
te felicito, es una excelente aportación, solo tengo algunas dudas, trabajo con delphi 2010, deltro del uses hay numedit, me da error ya que no encuentro el componente, alguien me podria comentar cual y como puedo instalarlo?

Caral 28-05-2010 22:00:28

Hola
En la carpeta biene el archivo del componente.
Es un componente que instala dos IntEdit y FloatEdit.
Los instalas normalmente y se instalan en la paleta samples.
Saludos


La franja horaria es GMT +2. Ahora son las 16:03:53.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi