var
intWidth: Integer;
.
.
.
intWidth := 1024 * 0.34;
정수형에 정수형*실수형을 계산해서 집어넣고 싶은데...
어케해야되나요?
또 폼없는 유닛을 하나 생성해서 공통함수를 만들어 놓았는데
이 공통함수에서 폼1의 라벨캡션을 액세스하고 싶은데...
unit1
end.
untFunction <- 공통함수
.
.
procedure aa;
begin
Form1.Label1.Caption := '바보';
end;
end.
이렇게 하고 싶은데 잘안되네요...답변 부탁드립니다...
실수값을 정수변수에 넣으실려면 Round나 Trunc함수를 써서 반올림하거나 절삭해서 정수로 만드시면 됩니다.
IntWidth := Trunc(1024 * 0.34);
함수에서 라벨을 파라매터로 받으시면 되겠네요...
procedure aa(Label: TLabel);
begin
Label.Caption := '바보';
end;
호출l:
aa(Form1.Label1);
^^ 항상 즐코하세요...