예전 파스칼에는 int함수가 있었던것 같은데 지금 해 보니 안되네요
실수값을 정수로 바꾸는 함수 같은것 있으면 알려주세요
또하나
이미지를 두가지 놓고 한번 클릭할때마다 그림이 바뀌면서 그 내용도
바꿀수 있게 프로그램 하고 싶은데요
두가지 그림을 바꿀려면 어떻게 해야하나요
그림하나를 선택해서 onclick event에 if문을 쓰면 될것 같긴한데
또하나의 그림으로 change 할때 어떤 명령어로 어떻게 쓰면되는지요.
다음과 같이 하시면 실수를 정수로 바꿀수 있습니다..
참고하시면 도움이 될꺼 같군요...^^
function FltToInt(Value: Real): Integer;
var
Temp: string;
I: Integer;
begin
Temp := FloatToStr(Value);
for I := 0 to Length(Temp)-1 do
begin
if Temp[I] = '.' then Break;
end;
Delete(Temp, Pos('.', Temp), Length(Temp) - I + 1);
Result := StrToInt(Temp);
end;
다음과 같이 하시면 실수를 정수로 바꿀수 있습니다..
참고하시면 도움이 될꺼 같군요...^^
function FltToInt(Value: Real): Integer;
var
Temp: string;
I: Integer;
begin
Temp := FloatToStr(Value);
for I := 0 to Length(Temp)-1 do
begin
if Temp[I] = '.' then Break;
end;
Delete(Temp, Pos('.', Temp), Length(Temp) - I + 1);
Result := StrToInt(Temp);
end;