FireMonkey iOS 앱에서 TLabel의 색상을 변경하고 TStringGrid에 항목을 추가 하시겠습니까?

Question

유효한 회사 인증서가있는 XE-script-prep (Xcode 폴더 만들기) 후 XE2 빌드 FireMonkey iOS HD 앱을 제 (jailbroken) iPhone으로 밀어 넣는 Xcode (Windows에서 VM으로 실행)를 얻을 수있었습니다.

어쨌든, 네이티브 코코아 컨트롤을 위장하는 것은 다소 어려워 보이지만 TToolbar (표준 iPhone 그라디언트가있는 패널), 몇 개의 TSpeedButtons (이 호기심 V 기울기가있는 것) 및 TStringGrid를 사용하면 ' 거의 기본 아이폰 앱 디자인의 영역에있다.

캡션을 위해 TToolbar에 TLabel을 놓고 즉시 변경할 수있는 색상을 변경하려고합니다. 그래,하지만 모든 스타일 (TLayout) 이제는 내가 말한 것을 들었다. 나는 스타일 디자이너가 스타일 디자이너의 TLayout 또는 TText 측면에서 색상 (color !?) 속성을 가지고 있지 않다는 것을 알았다.

신발 horning은 빨리 제 2 질문은, 내가 거기에 TStringGrid를 떨어 나는 동적으로 행을 설정 줄 알았는데, 그래서 문자열 열을 생성, 6 행 개수를 설정 한 다음

설정

Cells[1, n] := 'Row ' + IntToStr(iLoop); 

... 효과 없음 (제로 기반 목록 인 경우 셀 [0, n]도 시도 함).

화가나요?

iPhone 4에서 TFloatAnimation을 사용하여 48x48 이미지를 회전시키는 성능은 상당히 솔직하게 소름 끼쳤습니다. 그러나 나는 낙관적이다, 우리는 이것을 가지고있다!

Answer 1

레이블의 색상을 변경하려면 스타일을 사용해야합니다. 그런 다음 색상을 변경하기 위해 Fill 속성을 조정 정의 스타일 ...

를 다음 찾을 Tlayout을 확장하여 TText

를 선택 |

오른쪽 구성 요소를 클릭하고 편집을 선택합니다.

Answer 2

나를 위해 잘 작동합니다.

procedure TForm3.Button1Click(Sender: TObject); 
var 
    i: Integer; 
begin 
    for i:= 0 to 6 do 
    begin 
    StringGrid1.Cells[0,i] := 'Row:' + IntToStr(i); 
    end; 
end; 

난 당신이 모두 n 및 iLoop 느릅 나무 하나가 루프 변수이었다 있었다 발견? 당신은 당신이 Label1.FontFill.Color := TAlphaColorRec.Beige;

더 좋은 방법을 할 수있는 코드에서 설정하려면 로버츠의 대답을 설정 색상으로

는 디자인 타임을 작동합니다.

Label1.ApplyStyleLookup; 
Label1.FontFill.Color := TAlphaColorRec.White; 

는하지만 올바른 접근 방식은 FontFill에게 같은 setter 함수 제공하는 것입니다 생각 : 나는 당신을 위해 쉽게 알

function GetFontFill: TBrush; 
begin 
    if FNeedStyleLookup then ApplyStyleLookup; 
    Result := FFontFill; 
end;