이 델파이 코드를 C++ 빌더로 변환 할 수있는 방법이 있습니까?

Question

대부분의 경우 델파이를 C++로 변환 할 수 있지만이 것은 다소 골치 거리가 있습니다. 어쩌면 당신 중 일부가 도울 수 있습니다.

이 링크에서 볼 수있는 것처럼, Embarcadero (FMX)의 TListView에서 새로운 기능을 참조하는 here. Delphi보다 C++에 훨씬 익숙하기 때문에 저는 C++ Builder를 사용합니다. 대부분의 경우 번역 및 이해하고 대안을 찾아야합니다.

procedure TForm1.FormCreate(Sender: TObject); 
I: Integer; 
begin 
// ListView1 uses a classic Appearance 
for I in [0..63] do 
with ListView1.Items.Add do 
begin 
    Text := Format('%d pages', [1000 + Random(1234567)]); 
    Detail := Format('%d kg of paper', [1000 + Random(1234)]); 
    ImageIndex := Random(ImageList1.Count); 
end; 

// ListView4 uses a dynamic appearance with items named 
// Text1, Detail1, Portrait 
for I in [0..63] do 
with ListView4.Items.Add do 
begin 
    Data['Text1'] := Format('%d pages', [1000 + Random(1234567)]); 
    Data['Detail1'] := Format('%d kg of paper', [1000 + Random(1234)]); 
    Data['Portrait'] := Random(ImageList1.Count); 
end; 
end; 

end. 

내가 고민하고 섹션이 번역되는 방법

with ListView4.Items.Add do 
begin 
    Data['Text1'] := Format('%d pages', [1000 + Random(1234567)]); 
    Data['Detail1'] := Format('%d kg of paper', [1000 + Random(1234)]); 
    Data['Portrait'] := Random(ImageList1.Count); 
end; 

, 또는 단순히 C에없는 존재 ++ 않는이 기능은 다음과 같습니다 그러나 나는 여기 붙어?

Answer 1

뷰 TListView의 항목 속성의 자녀입니다() 함수를 추가 사용 . 그런 다음 item의 Data 속성에 TValue가 필요하므로 문자열에 넣거나 다른 항목에서 TValue를 가져와야합니다. 이 작업의 성능을 향상시키기 위해 ListView에 항목을 추가 할 위치를 지정하기 전에 BeginUpdate()를 사용하고 EndUpdate()를 사용해야합니다.

ListView4->BeginUpdate(); 

TListViewItem* item = ListView4->Items->Add(); 
UnicodeString string1 = "content of the String"; 

item->Data["Text1"] = TValue::From<UnicodeString>(string1); 
item->Data["Detail1"] = TValue::From<UnicodeString>(string1); 
item->Data["visitTime"] =TValue::From<int>(Random(ImageList1->Count)) 

ListView4->EndUpdate(); 

Answer 2

With 종류에는 이름이없는 변수와 범위가 있습니다. C++에서는 명시 적이어야합니다. 델파이 프래그먼트는

var 
    li: TListItem; 
begin 
    li := ListView4.Items.Add; 
    li.Data['Text1'] := Format('%d pages', [1000 + Random(1234567)]); 
    li.Data['Detail1'] := Format('%d kg of paper', [1000 + Random(1234)]); 
    li.Data['Portrait'] := Random(ImageList1.Count); 
end; 

과 같습니다 (나는 엉망이되지 않으면 :-)). 이 같은

Answer 3

시도 뭔가 : 당신은 당신이 첫번째 항목 개체 (TListViewItem *)를 만들 필요가있는 ListView에 항목을 추가 할

// Never use the OnCreate event in C++, 
// use the class constructor instead... 
__fastcall TForm1::TForm1(TComponent *Owner) 
    : TForm(Owner) 
{ 
    // ListView1 uses a classic Appearance 
    for(int i = 0; i < 64; ++i) 
    { 
     TListViewItem *Item = ListView1->Items->Add(); 
     Item->Text = Format(L"%d pages", ARRAYOFCONST((1000 + Random(1234567)))); 
     Item->Detail = Format(L"%d kg of paper", ARRAYOFCONST((1000 + Random(1234)))); 
     Item->ImageIndex = Random(ImageList1->Count); 
    } 

    // ListView4 uses a dynamic appearance with items named 
    // Text1, Detail1, Portrait 
    for(int i = 0; i < 64; ++i) 
    { 
     TListViewItem *Item = ListView4->Items->Add(); 
     Item->Data[L"Text1"] = Format(L"%d pages", ARRAYOFCONST((1000 + Random(1234567)))); 
     Item->Data[L"Detail1"] = Format(L"%d kg of paper", ARRAYOFCONST((1000 + Random(1234)))); 
     Item->Data[L"Portrait"] = Random(ImageList1->Count); 
    } 
}