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