2016-06-14 9 views
2

스마트 장치 용으로 Delphi 10 Berlin을 사용하여 응용 프로그램을 빌드하려고합니다. 이 응용 프로그램에서, 나는로드하거나 사진을 찍고 싶습니다 그리고 나는 동일한 X 위치로 다른 구성 요소를 이미지의 너비만큼 배치해야합니다. 내 문제는, TImage 컨트롤에 이미지를 할당 할 때 비트 맵이 TImage 컨트롤의 모든 영역을 차지하지 않으면 이미지가 더 작아진다는 것입니다. 어떻게하면 TImage 컨트롤에서 비트 맵의 ​​실제 X 위치와 너비를 얻을 수 있습니까?Delphi 10 TImage, 모바일 용 이미지 너비

begin 
    if Image1.Bitmap.Height > Image1.Bitmap.Width then 
    begin 
    Image1.Bitmap.Rotate(-90); 
    end; 
    Image1.Bitmap.Assign(Image); 
    Memo1.Width := Image1.Width; 
    Memo1.Text := ''; 
end; 
+0

모든 WrapMode 값을 시도했지만 TImage 컨트롤에 사진을 할당 한 후에 이미지가 이미지 컨트롤보다 작아졌습니다. 스트레치를 시도했지만 이미지가 왜곡되었습니다. WrapMode 속성을 'FIT'로 설정하고 화면에 나타나는 이미지의 너비를 조정하여 다른 컨트롤의 너비를 변경하여 정렬 된 상태로 유지해야합니다. 타임 코드 컨트롤의 비트 맵 속성에 이미지를로드 한 후 이미지 너비를 가져올 수있는 코드가 있습니까? – RicardoPin

답변

2

FireMonkey TImage 구성 요소는 이미지 비트 맵이 TImageSurface에 렌더링되는 방법을 제어에 도움이 WrapMode라는 속성이 있습니다 : 여기 내 코드입니다.

http://docwiki.embarcadero.com/Libraries/Berlin/en/FMX.Objects.TImage.WrapMode

참고 :

현재 공식 문서에 대한 자세한 내용을보실 수 있습니다이 속성을 그 연결 기능이 아닌 VCL 버전, TImage의 FireMonkey 버전에만 사용할 수 있습니다.

+0

VCL에서'TImage'는'AutoSize','Center','Proportional','Stretch' 속성을 가지고 있습니다. –

+0

VCL이 아닌 FireMonkey를 사용하고 있습니다.이 앱은 모바일 앱입니다. – RicardoPin