FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#22
|
||||
|
||||
Implementar el ProgressBar en delphi 7.0
Saludos amigos, gracias por ayudarmen, pude terminar mi pequeño programita con exito, ahora me gustaria saber si alguien sabe el codigo, para hacer dinamico el progressbar, y asi quede animado, para simular que esta cargando un programa o lo que sea....
Posdata: Que no sea el ejemplo que viene incluido en delphi 7.0, es que no lo entiendo por que soy pollo....algo que sea sencillo de entender.... Gracias por su atencion prestada.y asi me quedo el codigo de mi programita.
|
#23
|
||||
|
||||
Cita:
Saludos, Última edición por Delphius fecha: 02-02-2008 a las 02:29:59. Razón: corrección del texto |
#24
|
||||
|
||||
argh, veo con tristeza que ninguna de mis recomendaciones te sirvieron...
__________________
|
#25
|
||||
|
||||
Delphi
Jejee lo dices por mi contraveneno ?, si man por ti fue que pude pensar mejor, y plantear la idea de como era el programita, gracias men, enserio.....y pues lo tro que pregunte fue que si alguien tiene que me pase un codigo completico para el porgressbar, como el que sale cuando esta iniciando windowx xp....es que es para adornar mi programita, y para analizarlo, solo se que hay un maximo, y un minimo, y que son bleanos, tambien ilncluye un bucle, pero el resto no tengo ni idea de la estructura ni nda de esas cosas...ojala puedeas ayudarme o darme una manito con eso, gracias amigos....
|
#26
|
||||
|
||||
si lo digo por ti... pero me refería a esto:
pones prefijo de Label cuando es un Edit Utilizas variables que no son necesarias. Lo único que hacen es estorbar y ocupar memoria.
No, no, yo no le hago a esas cochinadas ....
__________________
Última edición por ContraVeneno fecha: 02-02-2008 a las 19:16:16. |
#27
|
||||
|
||||
Delphi
Jajaja, no contraveneno, solo lo hice asi, por que hasta ahora empece parcero, pero tambien lo tengo hecho transformando los flotantes a strin, solo que me toca exponer mi programita en clase, y si me pongo a explicarles como tu me dijiste de seguro se van a perder, por que no llevamos si no pocos dias programando, y de seguro toca comenzar desde lo mas suave, para ir adquiriendo conocimiento, no puedo embutirles todo de una sola vez, cada cosa a su tiempo...igual gracias amigo, por que me aclaraste muchas cosas...
|
#28
|
|||
|
|||
Cita:
Cita:
Salud OS
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney |
#29
|
||||
|
||||
Cita:
Saludos, |
#30
|
||||
|
||||
Cita:
Aquí tienes uno de nivel muy básico y muy bien explicado.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#31
|
||||
|
||||
Imprimir Label
Hola amigos, como hago para imprimir en un label...por ejemplo tengo la variable llamada resultado de tipo entero...como haria pa imprimirla....gracias por ayudarme siempre amigos gracias...
|
#32
|
|||
|
|||
Cita:
Salud OS
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney |
#34
|
||||
|
||||
Programa delphi ciclo if
Gracias amigo si es asi...pero es que hasta ahora estoy manejando mi primer ciclo y miren el programa que me toca hacer, es una bobada pero tengo errores y me estreza....este es el programa que me piden:
Construya una aplicación que capture dos datos enteros(VyNUM) y muestre en un labe el resultado de la siguiente funcion: función: nf(V) = 100*V si NUM =1 nf(V) = 100*Vsi NUM = 2; nf(V) = 100/V si NUM = 3, para cualquier otro valor de NUM el valor de la función es 0. |
#35
|
||||
|
||||
Cita:
Tal como dices, es una tontera... y como recién te estas iniciando te pido que por favor tomes mas en serio esto. A modo en que pones el texto, quieriendo resaltar el problema, más no asi los errores que haz tenido... das pie que surjan malinterpretaciones. Sobre todo esta: ¡Clubdelphi no hace tareas! Por favor, te invito a leer nuevamente la guia de estilo. Saludos, |
#36
|
||||
|
||||
Codigo if delphi
Que pena delphius, pero yo tomo la seriedad de las cosas, lo que pasa es que no soy antiguo ni en el club ni soy maestro en delphi, y que pena por no haber redactado bien...y escribi el enunciado por que es una base de lo que me estan pidiendo, no para que me hagas la tares, creeme amigo no soy parasito para estar diciendole a las personas que hagan mis cosas...tratare de explicar lo que necesito....esto es lo que llevo del codigo:
Código Delphi [-]unit ufrmcuarto; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type Tfrmcuarto = class(TForm) StaticText2: TStaticText; Edit1: TEdit; Edit2: TEdit; Label1: TLabel; StaticText1: TStaticText; procedure Edit1Change(Sender: TObject); procedure Edit2Change(Sender: TObject); procedure Label1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var frmcuarto: Tfrmcuarto; resultado: integer; implementation {$R *.dfm} procedure Tfrmcuarto.Edit1Change(Sender: TObject); var num : integer; begin num := strtoint(Edit1.Text); end; procedure Tfrmcuarto.Edit2Change(Sender: TObject); var v: integer; begin v := strtoint(Edit2.Text); end; procedure Tfrmcuarto.Label1Click(Sender: TObject); begin Label1.Caption := strtoint(resultado); If (strtoint(Edit1.Text) := 1) then resultado := (100) * strtoint(Edit2.Text); Else ShowMessage('prueba'); end; end. Bueno el problema es que no se como manejar bien el if, ya que solo me dieron la estructura general...el hecho es que como pueden ver en el codigo recivo los datos por medio de Edit. Me dicen que si num = 1 o num = 2 ejecuto una funcion que es esta: f(V) = 100*V si NUM =1 f(V) = 100*Vsi NUM = 2 y si num es diferente a 1 o 2 la funcion va ser 0 inmediatamente, y v es el segundo edit, ese dato lo implementa el usuario, y se ejecutara en caso de que el programa desarrolle cualquier funcion. Lo que no entiendo es que si estoy manejando mal algo en el programa me ayuden a ver que es ?....y me digan como es la forma correcta....mi problema suerge en el manejo del IF y de los edit... OBSERVACION: Tengo a resultado en una variable global tipo entero, para poderlo imprimir en el Label. |
#37
|
||||
|
||||
¿Podrías por favor editar el mensaje y usar las etiquetas [ DELPHI ] [ /DELPHI ] (sin espacios)?
Esto hará que el código sea más legible. Tengo una duda respecto al código que tienes... ¿Porqué haces que al presionar clic en el label ejecute la operación? Sería más indicado emplear el evento OnClick de un botón. Por el tema del if, sería más correcto emplear un CASE. Su sintaxis es como sigue:
Con esto ya tienes para arreglar un poco más tu código. Perdona si soy duro... es que pedimos que las personas que preguntan se interioricen y participen del problema. Dijiste que te lo tomas en serio, pero es que si te lo tomaras más en serio, hubieras expuesto los detalles y los errores en vez de esperar a que los adinivinemos. Prueba nuevamente siguiendo el case, no estás tan errado. Saludos, |
#38
|
||||
|
||||
If delphi
Ok, entiendo delphius, si se ve mas facil por el switch que utilizas, estaba pensando en hacerlo asi, y lo hare como me dijiste, pero haber si va asi la estructura, tu me escribiste esto:
que pena amigo preguntar tanto, pero es lo que no entiendo, y yo digo las cosas que no entiendo....y que tendria que modificar en mi codifo si lo hago por if, es que es un trabajo de clase, y tu me entiendes me toca seguir la rutina del profesor, ya que estamos viendo especificamente el if, pues aun no lo ha explicado pero me gusta adelantarme por mis propios medios....garcais delphius y que pena molestar tanto... |
#39
|
||||
|
||||
BuRtOn,
Respondiendo a tu duda, variable debe ser reemplaza por aquella variable que tu desees evaluar. En tu caso NUM. ¿Que va después de los dos puntos? Las sentencias que deben hacerse en caso de que variable cumpla dicho valor. por ejemplo:
El ejemplo es simple, si Nota tiene el valor 1, mostrará en pantalla un cuadro de díalogo con el mensaje Burro. En cambio si Nota tiene el valor 10, mostrará Genio, y una vez confirmado el mensaje (botón aceptar), se ejecutará la función (tema que verás más adelante) PedirBeca que recibe como parámetro la variable Nota, y guardará el resultado esperado en alguna variable Beca. Si Nota tiene cualquier otro valor que no sea 1 o 10... no se hace nada. Si te resulta cómodo usar IFs:
Notarás que es más engorroso el proceso... en fin... usa lo que te guste. El valor resultado lo estás mostrando bien. Saludos, |
#40
|
||||
|
||||
Cita:
O te estas equivocando de carrera, o de plano tu profe es muy malo o no se que pensar... Un libro Burton, lee un libro...
__________________
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
AYUDA por favor!!! | Melcv | Varios | 2 | 28-06-2006 21:19:35 |
AYUDA, por favor! | Waldo | Conexión con bases de datos | 5 | 01-11-2003 17:49:02 |
ayuda por favor | haffo | Varios | 6 | 23-10-2003 03:50:33 |
ayuda por favor | haffo | Varios | 2 | 14-10-2003 16:08:45 |
Por Favor Ayuda | DML | Varios | 3 | 16-05-2003 00:44:26 |
|