SRL Archive - OSR Help

Can a Function return two values ..

for a auto color function i need to reurn turn the x and y's for the found color ..

i've tried puting return:= MSCX,MSCY but i dosent work ..

i need it to retturn something like ..124,321
X Y

function a: TPoint;
begin
Result.x := x;
Result.y := y;
end;

From: mormonman
function a: TPoint;
begin
Result.x := x;
Result.y := y;
end;

Then to use the X and Y, use .x and .y of the result you set it too E.x.

MyPoints := a;
a.x is x
a.y is y

From: mormonman
function a: TPoint;
begin
Result.x := x;
Result.y := y;
end;

or Result := Point(x, y); if your looking to save some lines. ;)

Or for more.

function Func : array [0..1] of integer;
begin
  result := TIntegerArray([2, 3]);
end;    

Etc.

But for 2 value results just use the TPoint method mentioned above.

function test(const varIn: Integer; out Result1: string): Integer;
begin
end;

Would be the formal way to return multiple variables :)

Isn't out like almost the same as var?

From: Sex
Isn't out like almost the same as var?

Using const it should already be initialized and have a value. (In)
Using var it should already be initialized and have a value. (In and Out)
Using out it shouldn't. (Out)
Using nothing is the same as const. (I think)