functions
Wenasss!! Os hago una preguntilla tonta pero que me hace falta
Una function puede devolver 2 enteros distintos?
Ej:
function asientos(Grid:TStringGrid; col,fil:integer; texto:TEdit;
progreso:TProgressBar; dinero:integer; porcenta:integer):integer;
...
result:=dinero;
result:=porcenta;
Y despues en la llamada..
caja:=asientos(StringGrid1,ACol,ARow,Edit1,ProgressBar1,caja,porcentaje);
porcentaje:=asientos(StringGrid1,ACol,ARow,Edit1,ProgressBar1,caja,porcentaje);
Edit1.Text:=IntToStr(porcentaje);
Aver si m podeis echar una mano.. y decirme si se puede y si seria asi.
Muchas Gracias!!
|