Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 26-02-2012
chelo_lpa chelo_lpa is offline
Registrado
NULL
 
Registrado: abr 2011
Posts: 4
Poder: 0
chelo_lpa Va por buen camino
ayuda con calculadora

mi idea es hacer una calculadora que me sirva para el negocio. pero me estoy volviendo loco. les muestro como es la idea de la calculadora
(k18.kn3.net/D7130472A.png) esa es la imagen de la calculadora. si me pueden ir ayudando.
donde calcula precio por cantidad, y siempre va poniendos los resultados en el total de abajo
los edit de la izquierda se les ingresa enteros o flotantes, en cambio los del medio solo enteros, y a la derecha van los subtotales. pero a la hora de programar las tareas me estoy volviendo loco, no se ni por donde empezar
la idea es qe no se use el mouse, todo con el teclado. (Escape se encarga de limpiar y volver la calculadora al principio)
y cada vez qe se ingrea un numero va cambiando los subtotales y por supuesto, un cambio en un subtotal cmabia el total. espero respuestas gracias
Responder Con Cita
  #2  
Antiguo 26-02-2012
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Poder: 25
Delphius Va camino a la fama
A ver tiro idea, y luego tu le das forma, chapa, pintura y quizá un cambio de aceite:

Código Delphi [-]
type
  TSubTotal = record
    Precio: currency;
    Cant: integer;
    SubTotal: currency;
  end;

  TVentas = array of TSubTotal;

var
  MisVentas: TVentas;

Código Delphi [-]
begin
  SetLength(MiVentas, 10);
  for i := Low(MisVentas) to High(MisVentas) do
  begin
    MisVentas[i].Precio := StrToCurr(FrameSubTotal.EditPrecio);
    MisVentas[i].Cant := StrToInt(FrameSubTotal.EditCant);
    MisVentas[i].SubTotal := MisVentas[i].Precio x MisVentas[i].Cant;
    FrameSubTotal.EditSubTotal := CurrToStr(MisVentas[i].SubTotal);
    Total := Total + MisVentas[i].SubTotal;
  end;
end;

En el ejemplo me baso en el uso de Frames. Básicamente el Frame contiene los edits para el precio, cantidad y subtotal. La aplicación crea tanto frames como se requiera.
En cuanto a la lógica es muy simple, dispongo de un arreglo dinámico y creo tantos registros subtotales como frames, les paso los datos y calculo.

Ahora te resta pulir y ver el modo de "actualizar" los cálculos antes algún cambio en algún frame... juega con los eventos.

Por otro lado, es muy fácil caer así sin nada sin siquiera al menos tirar una idea; es como pedir que te lo hagan. Pon de tu parte primero; PUNTUALIZA en tus propias dudas, que llevas hecho, o como lo estuviste al menos encarando, etc.

Saludos,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita
  #3  
Antiguo 26-02-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Demasiado sencillo para ponerle interes.
Me parece que deberias complicarlo algo mas para que fuera interesante y poder aprender.
Por ejemplo:
1- tener los precios y la descripcion de los articulos en una BD
2- buscar el articulo y colocarlo en el primer edit. asi sucesivamente.
3- Calcular el monto fina.
Asi si merece la pena trabajar.
Por otro lado:
En cuanto al tema de sumas en edits hay mucha informacion en el foro.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #4  
Antiguo 26-02-2012
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Poder: 25
Delphius Va camino a la fama
Cita:
Empezado por Caral Ver Mensaje
Hola
Demasiado sencillo para ponerle interes.
Me parece que deberias complicarlo algo mas para que fuera interesante y poder aprender.
Por ejemplo:
1- tener los precios y la descripcion de los articulos en una BD
2- buscar el articulo y colocarlo en el primer edit. asi sucesivamente.
3- Calcular el monto fina.
Asi si merece la pena trabajar.
Parecería ser que el ya cuenta en el negocio con una aplicación, sea propia o no, y busca algo que le ayude a sacar algunas cuentas que dicha aplicación no le hace.
O bien no tiene una base de datos, ni aplicación alguna y hace las cosas con la "libreta de almacenero" y quiere algo simple y rápido.

Saludos,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita
  #5  
Antiguo 26-02-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Es que la idea es ponerlo dificil para aprender, si no, que gusto tiene .
Saludos
__________________
Siempre Novato
Responder Con Cita
  #6  
Antiguo 26-02-2012
chelo_lpa chelo_lpa is offline
Registrado
NULL
 
Registrado: abr 2011
Posts: 4
Poder: 0
chelo_lpa Va por buen camino
es qe solamente necesito algo para cuando hago una nueva venta. la idea es hacer una calculadora, pero facil de usar, para no tener qe anotar los subtotales, y despues sumarlos. solo qiuero la aplicacion qe sume es decir 2 cosas de $34, 123 cosas de $12.45 y 132 cosas de $1.30, y tener el total de la venta, y tmb los resultados parciales para mostrar ante cualquier duda. es simple. pero me tira errores por todos lados
Responder Con Cita
  #7  
Antiguo 26-02-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.059
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración.


No somos adivinos para saber los errores que te salen
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
ayuda calculadora basica!! ciberTron Varios 7 08-02-2011 13:58:35
Calculadora en sistema capo979 Varios 2 07-12-2007 02:20:12
Calculadora sebaguillen Varios 17 28-08-2007 15:27:23
Calculadora Epunamun OOP 3 19-12-2005 22:33:11
Calculadora licencia GNU bismarck_sierra Varios 0 05-04-2005 06:56:33


La franja horaria es GMT +2. Ahora son las 00:05:48.


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
Copyright 1996-2007 Club Delphi