자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Firemonkey MultiView에서 MultiDetail3.InternalPlaceOffset.X 를 수정할 수가 없네요.

2016.07.17 08:34

어려워 조회 수:139

* 사용 개발툴 버전 : 시애틀

* 테스트 단말기 모델명 : ios5c...ios...

* 테스트 단말기 O/S 버전 :

 

procedure TMultiDetailItemAppearance.UpdateSizes(const FinalSize : TSizeF);
var
  LInternalWidth: Single;
  LImagePlaceOffset: Single;
  LImageTextPlaceOffset: Single;
begin
  BeginUpdate;
  try
    inherited;
    // Update the widths and positions of renderening objects within a TListViewItem
    if Image.ActualWidth = 0 then
    begin
      LImagePlaceOffset := 0;
      LImageTextPlaceOffset := 0;
    end
    else
    begin
      LImagePlaceOffset := cDefaultImagePlaceOffsetX;
      LImageTextPlaceOffset := cDefaultImageTextPlaceOffsetX;
    end;
    Image.InternalPlaceOffset.X := GlyphButton.ActualWidth + LImagePlaceOffset;

    if Image.ActualWidth > 0 then
      Text.InternalPlaceOffset.X := Image.ActualPlaceOffset.X + Image.ActualWidth + LImageTextPlaceOffset
    else
      Text.InternalPlaceOffset.X := 0 + GlyphButton.ActualWidth;

    MultiDetail1.InternalPlaceOffset.X := Text.InternalPlaceOffset.X;
    MultiDetail2.InternalPlaceOffset.X := Text.InternalPlaceOffset.X;
    MultiDetail3.InternalPlaceOffset.X := Text.InternalPlaceOffset.X;

 

    LInternalWidth := FinalSize.Width - Text.ActualPlaceOffset.X - Accessory.ActualWidth;

    if Accessory.ActualWidth > 0 then
      LInternalWidth := LInternalWidth - cTextMarginAccessory;

 

    Text.InternalWidth := Max(1, LInternalWidth);


    MultiDetail1.InternalWidth := Text.InternalWidth;
    MultiDetail2.InternalWidth := Text.InternalWidth;
    MultiDetail3.InternalWidth := Text.InternalWidth;

 

    If FinalSize.Width < 330 Then   //아이폰이 4인치라면
     begin
       MultiDetail3.InternalPlaceOffset.X := 220;   // MultiDetail3.PlaceOffset.X := 220 요렇게 하고 싶은데

       showmessage('4인치');  //  요건 실행이 되는데 수정은 안되네요 ^^)
     end;
  finally
    EndUpdate;
  end;
end;

 

부탁합니다...

이 게시물을
목록
목록
번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 17260
공지 유용한 관련 사이트 관리자2 2014.03.20 56157
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99579
1419 10.2 TOKYO 버전과 C++ Builder 6.0 간의 호환 질문 [3] goinma 2018.01.16 464
1418 블루투스 권한 획득 질문 [1] 민은기 2015.04.16 464
1417 안드로이드 KeyBoard 관련 질문입니다. [2] syc 2017.02.28 464
1416 경로 문제에 대하여 [1] file 손보라 2016.07.28 465
1415 오라클 클라이언트를 설치하지 않고 오라클 서버에 접속 할 수 있는 방법이 없나요? [2] 맛재현 2018.07.30 465
1414 카메라 권한을 runtime 시에 권한설정하려고 합니다. [3] 김하나 2017.02.28 465
1413 Unable to open include file '*.hpp' [1] jina 2016.07.26 466
1412 앱삭제시 데이타베이스도 삭제되나요.? [2] 희망나라 2018.11.06 466
1411 안드로이드 앱 테더링 연결 문제 [2] file YGPOS 2017.05.24 467
1410 [문의] 릴리즈 모드에서 컴파일 시 에러가 발생합니다 [2] file 손보라 2017.08.31 467
1409 [XE8 출시세미나] 안드로이드 앱에서 메모리 릭(누수)을 점검하려면 어떻게 하나요? [1] Humphery 2015.04.30 468
1408 델파이 10.4 -- 안드로이드 구버전 빌드에 대하여... 혹시 방법이 있나요? [2] 델사냥 2020.08.18 468
1407 iOS 앱스토어에 업로드중 에러 메세지... [1] file silkroad99 2015.07.14 469
1406 stringgrid 숫자 왼쪽정렬 문의 [2] file 천년바우 2016.09.19 470
1405 Memory leak 탐지 방법 angks 2015.04.17 470
1404 XE7에서 bpl 컴포넌트 설치가 안됩니다. [1] 김동현 2021.05.13 470
1403 delphi 10.2.3 도쿄 다국어 관련 질문입니다. [10] file 신우 2018.05.28 471
1402 delphi 10.2.3 +Xcode 10 + IOS 12 환경에서 빌드시 왜 에라메세지가 뜨는지요? [1] file 화이부동 2018.09.26 472
1401 XE8 iOS Device 에러나는 이유가? [1] silkroad99 2015.05.29 473
1400 반투명폼 위에 올려져 있는 컨트롤들을 선명하게... [1] 파랑 2017.02.16 473
쓰기
태그