StringGrid

CommaText

   ShowMessage(StringGrid1->Rows[i]->CommaText);  
   //Liefert die Werte aus der Zeile i getrennt mit Komma

Werte aus StringGrid in eine ListBox schreiben

   ListBox1->Items->Clear();     //ListBox wird gelöscht
   for (int i=0; i < StringGrid1->RowCount; i++) {
        //Jede Reihe wird in die ListBox hinzugefügt
	ListBox1->Items->Add(StringGrid1->Rows[i]->CommaText);
   }

ListBox speichern

if (SaveDialog1->Execute()){ListBox1->Items->SaveToFile(SaveDialog1->FileName);

Daten öffnen, in ListBox schreiben und weiter ins StringGrid

if (OpenDialog1->Execute()){ListBox1->Items->LoadFromFile(OpenDialog1->FileName);
   for (int i=0; i < StringGrid1->RowCount; i++) {
		   StringGrid1->Rows[i]->CommaText=ListBox1->Items->Strings[i];
   }
}

Übung Sommertheater

Einfügen von Werten

   StringGrid1->Cells[j][i]=InputBox("Reihe "+IntToStr(i+1)+", Spalte "+IntToStr(j+1),"Zahl eingeben:","");

Für ein (kleineres) Sommertheater soll ein Kartenverkaufssystem programmiert werden.

Das Theater hat 18 Reihen zu je 10 Plätzen.

Das Programm soll folgende Punkte umfassen:

Im StringGrid sollen entsprechende Zeichen (z.B. X oder 0 oder ähnliches) für „verkauft“ bzw. „frei“ eingegeben werden.

Bonus: