Hi,

I created this function:

function TForm1.GetClickedTijdvak(ClickedIndex:integer):integer;
begin
ClickedIndex:=dec(ClickedIndex);
Result:=ClickedIndex;
end;

but if I call it with: ShowMessage(IntToStr(GetClickedTijdvak(10))); I get 10 as answer. Only if I change in the function: dec(ClickedIndex,1) then I get 9 as answer.
Don't I use it correct?

Greetings,
Ronald

Oops, it works fine, I used dec as a function. My mistake, sorry.


Ronald wrote:

Hi,

I created this function:

function TForm1.GetClickedTijdvak(ClickedIndex:integer):integer;
begin
ClickedIndex:=dec(ClickedIndex);
Result:=ClickedIndex;
end;

but if I call it with: ShowMessage(IntToStr(GetClickedTijdvak(10))); I get 10 as answer. Only if I change in the function: dec(ClickedIndex,1) then I get 9 as answer.
Don't I use it correct?

Greetings,
Ronald

Ronald,

<< Oops, it works fine, I used dec as a function. My mistake, sorry. >>

Yeah, but the compiler shouldn't allow this, so I'll log it as an incident report.

Tim Young
Elevate Software
www.elevatesoft.com