functions

[Makiley]

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!!