Передать данные из ListBox и memo на первой форме во вторую форму в виде таблицы

Помогите, пожалуйста, нужно передать данные из ListBox (правый на скрине с 1 студентом) и memo (С описанием этого студента) на первой форме во вторую форму в виде таблицы и напечатать эту таблицу.

Скриншот программы:

Все данные загружаются из текстовых документов.

Код кнопки Сведения:

if (ListBox2->ItemIndex == -1) {exit;}

ListBox2->ItemIndex = 0;

if (ListBox2->Items->Strings[ListBox2->ItemIndex] == AnsiString("Васин А.В."))
{
Memo3->Lines->Clear();
Memo3->Lines->LoadFromFile("texts/vasin.txt");
}
if (ListBox2->Items->Strings[ListBox2->ItemIndex] == AnsiString("Иванов С.И"))
{
Memo3->Lines->Clear();
Memo3->Lines->LoadFromFile("texts/ivanov.txt");
}
if (ListBox2->Items->Strings[ListBox2->ItemIndex] == AnsiString("Петров Д.П."))
{
Memo3->Lines->Clear();
Memo3->Lines->LoadFromFile("texts/petrov.txt");
}
if (ListBox2->Items->Strings[ListBox2->ItemIndex] == AnsiString("Сидоров В.С."))
{
Memo3->Lines->Clear();
Memo3->Lines->LoadFromFile("texts/sidorov.txt");
}
if (ListBox2->Items->Strings[ListBox2->ItemIndex] == AnsiString("Степанов А.С."))
{
Memo3->Lines->Clear();
Memo3->Lines->LoadFromFile("texts/stepanov.txt");
}