fxxプロジェクトをvclに変換する

Question

プロジェクトでfirebaseを使用しようとしましたが、firebaseについての例が見つかりましたFirebase4Delphiしかし、VCLの代わりにFMXを使用しています FMXではなくVCLプロジェクトでどのように使用できますか？

主な問題は、私はVCLアプリケーションライブラリにTListViewItemを見つけることができない、ここにある：

procedure TMainForm.OnNewMessage(AChatMsg: TChatMessage); 
var 
    Item: TListViewItem; 
begin 
    try 
    ListView1.BeginUpdate; 
    try 
     Item := ListView1.Items.Add; 
     Item.Text := AChatMsg.Msg; 
     Item.Detail := AChatMsg.Username; 
    finally 
     ListView1.EndUpdate; 
    end; 

    finally 
    AChatMsg.Free; 
    end; 
end; 

Answer 1

これは、VCLプロジェクトに自動的にFMXプロジェクトを変換することはできません。 VCLプロジェクトでは、ListViewの項目はTListItem型からのものです。試してみてください：

procedure TMainForm.OnNewMessage(AChatMsg: TChatMessage); 
var 
    Item: TListItem; 
begin 
    try 
    Item := ListView1.Items.Add; 
    Item.Caption := AChatMsg.Msg; 
    finally 
    AChatMsg.Free; 
    end; 
end;