Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Novato en delphi (https://www.clubdelphi.com/foros/showthread.php?t=32998)

papu24ar 23-06-2006 11:01:07

Novato en delphi
 
hola me llamo emmanuel y soy muy muy novato en esto de delphi xD asi que espero me comprendan..

mi problema es que quiero colocarle un progres bar a un programa y me tira un error la cosa es asi .. es un edit(edit1) tonces kiero ponerle al progresbar el numero q yo escriba en el edit q sea el progressmax y de ahi tengo otro edit(edit2) que es una cuenta regresiva del otro edit(edit1) tonces kiero hacer un progressbar y q muestre .. EJ: si en el edit1 puse 1000 y en el edit2 la cuenta va en 900 q me marque seria el 10%.. y bueno q eso lo represente en el progressbar no se si me explico puse este codigo pero no va .. esta mal XD y como soy nuevo keria ver q solucion me dan :(

ProgressBar1.Position := edit2.text ;
ProgressBar1.Max := edit1.text ;

y me tira este error keria ver como solucionarlo .. seguro se puede pero yo no tengo ni idea :(

[Error] Unit1.pas(467): Incompatible types: 'Integer' and 'TCaption'
:( :( :(

Casimiro Noteví 23-06-2006 11:08:34

hola, bienvenido y te recomendamos que leas la guía de estilo para poder ayudarte mejor.

En tu pregunta, el error es que el edit.text es... eso, texto, y el valor que espera el progresbar es un número, puedes convertirlo mediante StrToInt(edit1.text).

Por cierto, cambia el orden, pon primero el valor máximo que tendrá el progresbar y luego lo "posicionas" donde quieras, o sea:
Código Delphi [-]
ProgressBar1.Max := StrToInt(edit1.text);
ProgressBar1.Position := StrToInt(edit2.text);

Neftali [Germán.Estévez] 23-06-2006 11:15:23

Hola, ante todo, bienvenido al ClubDelphi.
Te aconsejo que revises la guía de estilo de los foros y este mensaje en concreto.

En cuanto al error que comentas, es debido a los diferentes tipos de los "cosas" que estás asignando. Cuando utilices el operador := debes tener en centa que ambas cosas deben ser iguales (o compatibles como mínimo), sino deberás convertirlas para evitar el error.

En éste caso la propiedad .Position y la propiedad .Max son enteros(integer) -miralo en la ayuda de Delphi- y la propiedad .Text es de tipo cadena (string).
Para asignarlo sin problemas debes usar funciones de conversión (en este caso para convertir la cadena a entero -> StrToInt o IntToStr que es la contraria).

Cita:

Empezado por papu24ar
ProgressBar1.Position := edit2.text ;
ProgressBar1.Max := edit1.text ;

[Error] Unit1.pas(467): Incompatible types: 'Integer' and 'TCaption'

prueba con conversiones:

Código Delphi [-]
ProgressBar1.Position := StrToInt(edit2.text);
ProgressBar1.Max := StrToInt(edit1.text);

EDITO: Casimiro se me adelanto...:(

Casimiro Noteví 23-06-2006 12:14:33

Cita:

Empezado por Neftali
Hola, ante todo, bienvenido al ClubDelphi.
Te aconsejo que revises la guía de estilo de los foros y este mensaje en concreto.

En cuanto al error que comentas, es debido a los diferentes tipos de los "cosas" que estás asignando. Cuando utilices el operador := debes tener en centa que ambas cosas deben ser iguales (o compatibles como mínimo), sino deberás convertirlas para evitar el error.

En éste caso la propiedad .Position y la propiedad .Max son enteros(integer) -miralo en la ayuda de Delphi- y la propiedad .Text es de tipo cadena (string).
Para asignarlo sin problemas debes usar funciones de conversión (en este caso para convertir la cadena a entero -> StrToInt o IntToStr que es la contraria).



prueba con conversiones:

Código Delphi [-]ProgressBar1.Position := StrToInt(edit2.text); ProgressBar1.Max := StrToInt(edit1.text);


EDITO: Casimiro se me adelanto...:(


Pero como las respuestas son similares, entonces quiere decir que no le hemos aconsejado mal :D

Que le hemos puesto ambos hasta lo de la guía de estilo y todo... :D

papu24ar 23-06-2006 22:32:03

Gracias :d
 
Me funciono de 10 mil gracias :D


La franja horaria es GMT +2. Ahora son las 08:43:54.

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