Foros Club Delphi - Problema con las interfaces gráficas

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Gráficos (https://www.clubdelphi.com/foros/forumdisplay.php?f=8)

- - Problema con las interfaces gráficas (https://www.clubdelphi.com/foros/showthread.php?t=52905)

Problema con las interfaces gráficas

Hola a todos, estamos haciendo un programa y al compilar nos da un error que pone: [Error] Unit2.pas(96): Undeclared identifier: 'button'

En la línea de pizza:=... hemos probado de todo pero no sabemos que hacer. A ver si alguien nos puede echar una manilla :D

(La parte del código que nos da el error)
-----------------------------------------

Código Delphi [-] 
procedure FormShow (Sender:TObject);
var
pizza, bebidas, postres:integer;
a,b,c,i,precio:real;
begin
pizza:= strtoint (form2.PIZZA.button); 
bebidas:= strtoint (form2.BEBIDAS.text);
postres:= strtoint (form2.POSTRES.text);
{a traves de una funcion predeterminda por delphi pasamos el string a integer para poder calcaular el precio viendo el numero de pizzas, bebidas y postres que ha seleccionado}
if form3.Pequena.Checked then
a:= 10
{a la pizza pequeña le asigna el precio 10}
else
if form3.Mediana.checked then
a:= 15
{a la pizza mediada le asigna el precio 15}
else
if form3.Familiar.checked then
a:= 18
{a la pizza famialiar le asigna el precio 18}
else
if form6.ACEPTARclick then
a:= 18
{a la oferta uno le asigna el precio de 18, solo paga la pizza familiar}
else
if form7.Aceptarclick then
a:=20
{el menu para dos, al tener un 20% de descuento, solo pagan 20€}
if form2.BEBIDASclick then
b:= 2
{cada bebida elegida cuesta 2€}
if form4.RadioButton4.checked then
c:= 3
{el precio del helado de 100 ml es 3€}
else
if form4.RadioButton5.checked then
c:= 7
{el preico del helado de 500 ml es 7€}
begin
precio:= pizza * a + bebidas * b + postres *c  + i ;
{calcula el precio}
and
form2.TOTAL.Items.append(FloatToStr(total));
{le asignamos precio al listbox}
end;
end.

--------------------------------------

Muchas gracias ;)

¿Qué es PIZZA? y ¿Qué es button?

Delphi está buscando en el Form2 (supongo que es un formulario) el componente PIZZA (no se qué tipo de componente es)
y dentro de ese componente una propiedad llamada Button.

Código Delphi [-]  pizza:= strtoint (form2.PIZZA.button);

Hola.

En primer lugar, bienvenid@ al clubdelphi. He editado tu mensaje para añadir la etiqueta delphi. ¡Aprendé a usarla!.

También te recomiendo la lectura de la guia de estilo, que contiene las reglas de convivencia (obligatorias) de este sitio.

Hasta luego.

;)

Bueno al parecer alguien se comió tu PIZZA en el codigo... por eso te saca error :D...

Hablando en serio, como dice Neftali que es pizza y que es button ?, acaso button esta contenido en pizza ?, pizza esta en otra unidad ?, ya probaste cambiando el nombre button por otra cosa ?...:confused:

PD: Tu código me dio hambre

Ahora que lo veo... PIZZA debe ser un Edit, al igual que BEBIDAS y POSTRES.

Eso de nombrar las variables en mayúsculas me parece de pésimo gusto, por no hablar de la falta de indentación.

Volviendo al tema, la línea correcta en cuestión debe ser:

Código Delphi [-]  pizza:= strtoint (form2.PIZZA.Text);

Por lo que has comentado, supongo que no has sido vos quien ha hecho el programa, pero tambié supongo que no sos un programador Delphi. Si esto es una tarea de la escuela... que mal que no la hayas hecho vos mismo... si es un programa que va para producción, ¡mejor contrata a un programador!.

Un saludo.

;)